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