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