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