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