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