{-# LANGUAGE PatternSynonyms #-} module Language.Javascript.JSaddle.DOM.Generated.SVGFEColorMatrixElement (pattern SVG_FECOLORMATRIX_TYPE_UNKNOWN, pattern SVG_FECOLORMATRIX_TYPE_MATRIX, pattern SVG_FECOLORMATRIX_TYPE_SATURATE, pattern SVG_FECOLORMATRIX_TYPE_HUEROTATE, pattern SVG_FECOLORMATRIX_TYPE_LUMINANCETOALPHA, getIn1, getType, getValues, SVGFEColorMatrixElement, castToSVGFEColorMatrixElement, gTypeSVGFEColorMatrixElement) 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_FECOLORMATRIX_TYPE_UNKNOWN = 0 pattern SVG_FECOLORMATRIX_TYPE_MATRIX = 1 pattern SVG_FECOLORMATRIX_TYPE_SATURATE = 2 pattern SVG_FECOLORMATRIX_TYPE_HUEROTATE = 3 pattern SVG_FECOLORMATRIX_TYPE_LUMINANCETOALPHA = 4 -- | getIn1 :: (MonadDOM m) => SVGFEColorMatrixElement -> m (Maybe SVGAnimatedString) getIn1 self = liftDOM ((self ^. js "in1") >>= fromJSVal) -- | getType :: (MonadDOM m) => SVGFEColorMatrixElement -> m (Maybe SVGAnimatedEnumeration) getType self = liftDOM ((self ^. js "type") >>= fromJSVal) -- | getValues :: (MonadDOM m) => SVGFEColorMatrixElement -> m (Maybe SVGAnimatedNumberList) getValues self = liftDOM ((self ^. js "values") >>= fromJSVal)