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