{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module JSDOM.Generated.BiquadFilterNode
(getFrequencyResponse, setType, getType, getFrequency, getDetune,
getQ, getGain, BiquadFilterNode(..), gTypeBiquadFilterNode)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import qualified Prelude (error)
import Data.Typeable (Typeable)
import Data.Traversable (mapM)
import Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, asyncFunction, new, array, jsUndefined, (!), (!!))
import Data.Int (Int64)
import Data.Word (Word, Word64)
import JSDOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Enums
getFrequencyResponse ::
(MonadDOM m, IsFloat32Array frequencyHz,
IsFloat32Array magResponse, IsFloat32Array phaseResponse) =>
BiquadFilterNode ->
Maybe frequencyHz ->
Maybe magResponse -> Maybe phaseResponse -> m ()
getFrequencyResponse self frequencyHz magResponse phaseResponse
= liftDOM
(void
(self ^. jsf "getFrequencyResponse"
[toJSVal frequencyHz, toJSVal magResponse, toJSVal phaseResponse]))
setType ::
(MonadDOM m) => BiquadFilterNode -> BiquadFilterType -> m ()
setType self val = liftDOM (self ^. jss "type" (toJSVal val))
getType :: (MonadDOM m) => BiquadFilterNode -> m BiquadFilterType
getType self = liftDOM ((self ^. js "type") >>= fromJSValUnchecked)
getFrequency :: (MonadDOM m) => BiquadFilterNode -> m AudioParam
getFrequency self
= liftDOM ((self ^. js "frequency") >>= fromJSValUnchecked)
getDetune :: (MonadDOM m) => BiquadFilterNode -> m AudioParam
getDetune self
= liftDOM ((self ^. js "detune") >>= fromJSValUnchecked)
getQ :: (MonadDOM m) => BiquadFilterNode -> m AudioParam
getQ self = liftDOM ((self ^. js "Q") >>= fromJSValUnchecked)
getGain :: (MonadDOM m) => BiquadFilterNode -> m AudioParam
getGain self = liftDOM ((self ^. js "gain") >>= fromJSValUnchecked)