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