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