{-# LANGUAGE PatternSynonyms #-} module Language.Javascript.JSaddle.DOM.Generated.SVGFECompositeElement (pattern SVG_FECOMPOSITE_OPERATOR_UNKNOWN, pattern SVG_FECOMPOSITE_OPERATOR_OVER, pattern SVG_FECOMPOSITE_OPERATOR_IN, pattern SVG_FECOMPOSITE_OPERATOR_OUT, pattern SVG_FECOMPOSITE_OPERATOR_ATOP, pattern SVG_FECOMPOSITE_OPERATOR_XOR, pattern SVG_FECOMPOSITE_OPERATOR_ARITHMETIC, getIn1, getIn2, getOperator, getK1, getK2, getK3, getK4, SVGFECompositeElement, castToSVGFECompositeElement, gTypeSVGFECompositeElement) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..)) 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 Language.Javascript.JSaddle.DOM.Types import Control.Applicative ((<$>)) import Control.Monad (void) import Control.Lens.Operators ((^.)) import Language.Javascript.JSaddle.DOM.EventTargetClosures (EventName, unsafeEventName) import Language.Javascript.JSaddle.DOM.Enums pattern SVG_FECOMPOSITE_OPERATOR_UNKNOWN = 0 pattern SVG_FECOMPOSITE_OPERATOR_OVER = 1 pattern SVG_FECOMPOSITE_OPERATOR_IN = 2 pattern SVG_FECOMPOSITE_OPERATOR_OUT = 3 pattern SVG_FECOMPOSITE_OPERATOR_ATOP = 4 pattern SVG_FECOMPOSITE_OPERATOR_XOR = 5 pattern SVG_FECOMPOSITE_OPERATOR_ARITHMETIC = 6 -- | getIn1 :: (MonadDOM m) => SVGFECompositeElement -> m (Maybe SVGAnimatedString) getIn1 self = liftDOM ((self ^. js "in1") >>= fromJSVal) -- | getIn2 :: (MonadDOM m) => SVGFECompositeElement -> m (Maybe SVGAnimatedString) getIn2 self = liftDOM ((self ^. js "in2") >>= fromJSVal) -- | getOperator :: (MonadDOM m) => SVGFECompositeElement -> m (Maybe SVGAnimatedEnumeration) getOperator self = liftDOM ((self ^. js "operator") >>= fromJSVal) -- | getK1 :: (MonadDOM m) => SVGFECompositeElement -> m (Maybe SVGAnimatedNumber) getK1 self = liftDOM ((self ^. js "k1") >>= fromJSVal) -- | getK2 :: (MonadDOM m) => SVGFECompositeElement -> m (Maybe SVGAnimatedNumber) getK2 self = liftDOM ((self ^. js "k2") >>= fromJSVal) -- | getK3 :: (MonadDOM m) => SVGFECompositeElement -> m (Maybe SVGAnimatedNumber) getK3 self = liftDOM ((self ^. js "k3") >>= fromJSVal) -- | getK4 :: (MonadDOM m) => SVGFECompositeElement -> m (Maybe SVGAnimatedNumber) getK4 self = liftDOM ((self ^. js "k4") >>= fromJSVal)