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