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