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