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