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