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