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