{-# LANGUAGE PatternSynonyms #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} module JSDOM.Generated.SVGFEBlendElement (pattern SVG_FEBLEND_MODE_UNKNOWN, pattern SVG_FEBLEND_MODE_NORMAL, pattern SVG_FEBLEND_MODE_MULTIPLY, pattern SVG_FEBLEND_MODE_SCREEN, pattern SVG_FEBLEND_MODE_DARKEN, pattern SVG_FEBLEND_MODE_LIGHTEN, getIn1, getIn1Unsafe, getIn1Unchecked, getIn2, getIn2Unsafe, getIn2Unchecked, getMode, getModeUnsafe, getModeUnchecked, SVGFEBlendElement(..), gTypeSVGFEBlendElement) 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 pattern SVG_FEBLEND_MODE_UNKNOWN = 0 pattern SVG_FEBLEND_MODE_NORMAL = 1 pattern SVG_FEBLEND_MODE_MULTIPLY = 2 pattern SVG_FEBLEND_MODE_SCREEN = 3 pattern SVG_FEBLEND_MODE_DARKEN = 4 pattern SVG_FEBLEND_MODE_LIGHTEN = 5 -- | getIn1 :: (MonadDOM m) => SVGFEBlendElement -> m (Maybe SVGAnimatedString) getIn1 self = liftDOM ((self ^. js "in1") >>= fromJSVal) -- | getIn1Unsafe :: (MonadDOM m, HasCallStack) => SVGFEBlendElement -> m SVGAnimatedString getIn1Unsafe self = liftDOM (((self ^. js "in1") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getIn1Unchecked :: (MonadDOM m) => SVGFEBlendElement -> m SVGAnimatedString getIn1Unchecked self = liftDOM ((self ^. js "in1") >>= fromJSValUnchecked) -- | getIn2 :: (MonadDOM m) => SVGFEBlendElement -> m (Maybe SVGAnimatedString) getIn2 self = liftDOM ((self ^. js "in2") >>= fromJSVal) -- | getIn2Unsafe :: (MonadDOM m, HasCallStack) => SVGFEBlendElement -> m SVGAnimatedString getIn2Unsafe self = liftDOM (((self ^. js "in2") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getIn2Unchecked :: (MonadDOM m) => SVGFEBlendElement -> m SVGAnimatedString getIn2Unchecked self = liftDOM ((self ^. js "in2") >>= fromJSValUnchecked) -- | getMode :: (MonadDOM m) => SVGFEBlendElement -> m (Maybe SVGAnimatedEnumeration) getMode self = liftDOM ((self ^. js "mode") >>= fromJSVal) -- | getModeUnsafe :: (MonadDOM m, HasCallStack) => SVGFEBlendElement -> m SVGAnimatedEnumeration getModeUnsafe self = liftDOM (((self ^. js "mode") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getModeUnchecked :: (MonadDOM m) => SVGFEBlendElement -> m SVGAnimatedEnumeration getModeUnchecked self = liftDOM ((self ^. js "mode") >>= fromJSValUnchecked)