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