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