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