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