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