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