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