{-# LANGUAGE PatternSynonyms #-} module Language.Javascript.JSaddle.DOM.Generated.SVGMatrix (multiply, inverse, translate, scale, scaleNonUniform, rotate, rotateFromVector, flipX, flipY, skewX, skewY, setA, getA, setB, getB, setC, getC, setD, getD, setE, getE, setF, getF, SVGMatrix, castToSVGMatrix, gTypeSVGMatrix) 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 -- | multiply :: (MonadDOM m) => SVGMatrix -> Maybe SVGMatrix -> m (Maybe SVGMatrix) multiply self secondMatrix = liftDOM ((self ^. jsf "multiply" [toJSVal secondMatrix]) >>= fromJSVal) -- | inverse :: (MonadDOM m) => SVGMatrix -> m (Maybe SVGMatrix) inverse self = liftDOM ((self ^. js "inverse") >>= fromJSVal) -- | translate :: (MonadDOM m) => SVGMatrix -> Float -> Float -> m (Maybe SVGMatrix) translate self x y = liftDOM ((self ^. jsf "translate" [toJSVal x, toJSVal y]) >>= fromJSVal) -- | scale :: (MonadDOM m) => SVGMatrix -> Float -> m (Maybe SVGMatrix) scale self scaleFactor = liftDOM ((self ^. jsf "scale" [toJSVal scaleFactor]) >>= fromJSVal) -- | scaleNonUniform :: (MonadDOM m) => SVGMatrix -> Float -> Float -> m (Maybe SVGMatrix) scaleNonUniform self scaleFactorX scaleFactorY = liftDOM ((self ^. jsf "scaleNonUniform" [toJSVal scaleFactorX, toJSVal scaleFactorY]) >>= fromJSVal) -- | rotate :: (MonadDOM m) => SVGMatrix -> Float -> m (Maybe SVGMatrix) rotate self angle = liftDOM ((self ^. jsf "rotate" [toJSVal angle]) >>= fromJSVal) -- | rotateFromVector :: (MonadDOM m) => SVGMatrix -> Float -> Float -> m (Maybe SVGMatrix) rotateFromVector self x y = liftDOM ((self ^. jsf "rotateFromVector" [toJSVal x, toJSVal y]) >>= fromJSVal) -- | flipX :: (MonadDOM m) => SVGMatrix -> m (Maybe SVGMatrix) flipX self = liftDOM ((self ^. js "flipX") >>= fromJSVal) -- | flipY :: (MonadDOM m) => SVGMatrix -> m (Maybe SVGMatrix) flipY self = liftDOM ((self ^. js "flipY") >>= fromJSVal) -- | skewX :: (MonadDOM m) => SVGMatrix -> Float -> m (Maybe SVGMatrix) skewX self angle = liftDOM ((self ^. jsf "skewX" [toJSVal angle]) >>= fromJSVal) -- | skewY :: (MonadDOM m) => SVGMatrix -> Float -> m (Maybe SVGMatrix) skewY self angle = liftDOM ((self ^. jsf "skewY" [toJSVal angle]) >>= fromJSVal) -- | setA :: (MonadDOM m) => SVGMatrix -> Double -> m () setA self val = liftDOM (self ^. jss "a" (toJSVal val)) -- | getA :: (MonadDOM m) => SVGMatrix -> m Double getA self = liftDOM ((self ^. js "a") >>= valToNumber) -- | setB :: (MonadDOM m) => SVGMatrix -> Double -> m () setB self val = liftDOM (self ^. jss "b" (toJSVal val)) -- | getB :: (MonadDOM m) => SVGMatrix -> m Double getB self = liftDOM ((self ^. js "b") >>= valToNumber) -- | setC :: (MonadDOM m) => SVGMatrix -> Double -> m () setC self val = liftDOM (self ^. jss "c" (toJSVal val)) -- | getC :: (MonadDOM m) => SVGMatrix -> m Double getC self = liftDOM ((self ^. js "c") >>= valToNumber) -- | setD :: (MonadDOM m) => SVGMatrix -> Double -> m () setD self val = liftDOM (self ^. jss "d" (toJSVal val)) -- | getD :: (MonadDOM m) => SVGMatrix -> m Double getD self = liftDOM ((self ^. js "d") >>= valToNumber) -- | setE :: (MonadDOM m) => SVGMatrix -> Double -> m () setE self val = liftDOM (self ^. jss "e" (toJSVal val)) -- | getE :: (MonadDOM m) => SVGMatrix -> m Double getE self = liftDOM ((self ^. js "e") >>= valToNumber) -- | setF :: (MonadDOM m) => SVGMatrix -> Double -> m () setF self val = liftDOM (self ^. jss "f" (toJSVal val)) -- | getF :: (MonadDOM m) => SVGMatrix -> m Double getF self = liftDOM ((self ^. js "f") >>= valToNumber)