{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
module THREE.QuadraticBezierCurve
(
QuadraticBezierCurve (..)
, THREE.QuadraticBezierCurve.new
) where
import Miso
import qualified THREE.Internal as THREE
newtype QuadraticBezierCurve
= QuadraticBezierCurve
{ QuadraticBezierCurve -> JSVal
unQuadraticBezierCurveCamera :: JSVal
} deriving (QuadraticBezierCurve -> IO Object
(QuadraticBezierCurve -> IO Object)
-> ToObject QuadraticBezierCurve
forall a. (a -> IO Object) -> ToObject a
$ctoObject :: QuadraticBezierCurve -> IO Object
toObject :: QuadraticBezierCurve -> IO Object
ToObject)
new :: THREE.Three QuadraticBezierCurve
new :: Three QuadraticBezierCurve
new = (JSVal -> QuadraticBezierCurve)
-> MisoString -> [MisoString] -> Three QuadraticBezierCurve
forall args con.
ToArgs args =>
(JSVal -> con) -> MisoString -> args -> Three con
THREE.new JSVal -> QuadraticBezierCurve
QuadraticBezierCurve MisoString
"QuadraticBezierCurve" ([] :: [MisoString])