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