{-# LANGUAGE PatternSynonyms #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} module JSDOM.Generated.SVGFEDiffuseLightingElement (getIn1, getIn1Unsafe, getIn1Unchecked, getSurfaceScale, getSurfaceScaleUnsafe, getSurfaceScaleUnchecked, getDiffuseConstant, getDiffuseConstantUnsafe, getDiffuseConstantUnchecked, getKernelUnitLengthX, getKernelUnitLengthXUnsafe, getKernelUnitLengthXUnchecked, getKernelUnitLengthY, getKernelUnitLengthYUnsafe, getKernelUnitLengthYUnchecked, SVGFEDiffuseLightingElement(..), gTypeSVGFEDiffuseLightingElement) 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 Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, new, array) 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) import JSDOM.Enums -- | getIn1 :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m (Maybe SVGAnimatedString) getIn1 self = liftDOM ((self ^. js "in1") >>= fromJSVal) -- | getIn1Unsafe :: (MonadDOM m, HasCallStack) => SVGFEDiffuseLightingElement -> m SVGAnimatedString getIn1Unsafe self = liftDOM (((self ^. js "in1") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getIn1Unchecked :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m SVGAnimatedString getIn1Unchecked self = liftDOM ((self ^. js "in1") >>= fromJSValUnchecked) -- | getSurfaceScale :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m (Maybe SVGAnimatedNumber) getSurfaceScale self = liftDOM ((self ^. js "surfaceScale") >>= fromJSVal) -- | getSurfaceScaleUnsafe :: (MonadDOM m, HasCallStack) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getSurfaceScaleUnsafe self = liftDOM (((self ^. js "surfaceScale") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getSurfaceScaleUnchecked :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getSurfaceScaleUnchecked self = liftDOM ((self ^. js "surfaceScale") >>= fromJSValUnchecked) -- | getDiffuseConstant :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m (Maybe SVGAnimatedNumber) getDiffuseConstant self = liftDOM ((self ^. js "diffuseConstant") >>= fromJSVal) -- | getDiffuseConstantUnsafe :: (MonadDOM m, HasCallStack) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getDiffuseConstantUnsafe self = liftDOM (((self ^. js "diffuseConstant") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getDiffuseConstantUnchecked :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getDiffuseConstantUnchecked self = liftDOM ((self ^. js "diffuseConstant") >>= fromJSValUnchecked) -- | getKernelUnitLengthX :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m (Maybe SVGAnimatedNumber) getKernelUnitLengthX self = liftDOM ((self ^. js "kernelUnitLengthX") >>= fromJSVal) -- | getKernelUnitLengthXUnsafe :: (MonadDOM m, HasCallStack) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getKernelUnitLengthXUnsafe self = liftDOM (((self ^. js "kernelUnitLengthX") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getKernelUnitLengthXUnchecked :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getKernelUnitLengthXUnchecked self = liftDOM ((self ^. js "kernelUnitLengthX") >>= fromJSValUnchecked) -- | getKernelUnitLengthY :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m (Maybe SVGAnimatedNumber) getKernelUnitLengthY self = liftDOM ((self ^. js "kernelUnitLengthY") >>= fromJSVal) -- | getKernelUnitLengthYUnsafe :: (MonadDOM m, HasCallStack) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getKernelUnitLengthYUnsafe self = liftDOM (((self ^. js "kernelUnitLengthY") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getKernelUnitLengthYUnchecked :: (MonadDOM m) => SVGFEDiffuseLightingElement -> m SVGAnimatedNumber getKernelUnitLengthYUnchecked self = liftDOM ((self ^. js "kernelUnitLengthY") >>= fromJSValUnchecked)