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