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