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