SVGTransform.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from SVG2 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.SVGTransform
       (js_setMatrix, js_setRotate, js_setScale, js_setSkewX, js_setSkewY, js_setTranslate, js_getType, js_getMatrix, js_getAngle, setMatrix, setRotate, setScale, setSkewX, setSkewY, setTranslate, getType, getMatrix, getAngle, pattern SVG_TRANSFORM_UNKNOWN, pattern SVG_TRANSFORM_MATRIX, pattern SVG_TRANSFORM_TRANSLATE, pattern SVG_TRANSFORM_SCALE, pattern SVG_TRANSFORM_ROTATE, pattern SVG_TRANSFORM_SKEWX, pattern SVG_TRANSFORM_SKEWY, SVGTransform(..), gTypeSVGTransform)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(($1, $2) => { return $1[\"setMatrix\"]($2); })"
        js_setMatrix :: SVGTransform -> JSVal -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/setMatrix MDN SVGTransform.setMatrix documentation>
setMatrix :: (MonadDOM m, IsDOMMatrix2DInit matrix) => SVGTransform -> Maybe matrix -> m ()
setMatrix self matrix = liftDOM (void (((P.maybe (P.return jsUndefined) toJSVal matrix) >>= \a2' -> js_setMatrix (self) a2')))

foreign import javascript safe "(($1, $2, $3, $4) => { return $1[\"setRotate\"]($2, $3, $4); })"
        js_setRotate :: SVGTransform -> Float -> Float -> Float -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/setRotate MDN SVGTransform.setRotate documentation>
setRotate :: (MonadDOM m) => SVGTransform -> Float -> Float -> Float -> m ()
setRotate self angle cx cy = liftDOM (void ((js_setRotate (self) (angle) (cx) (cy))))

foreign import javascript safe "(($1, $2, $3) => { return $1[\"setScale\"]($2, $3); })"
        js_setScale :: SVGTransform -> Float -> Float -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/setScale MDN SVGTransform.setScale documentation>
setScale :: (MonadDOM m) => SVGTransform -> Float -> Float -> m ()
setScale self sx sy = liftDOM (void ((js_setScale (self) (sx) (sy))))

foreign import javascript safe "(($1, $2) => { return $1[\"setSkewX\"]($2); })"
        js_setSkewX :: SVGTransform -> Float -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/setSkewX MDN SVGTransform.setSkewX documentation>
setSkewX :: (MonadDOM m) => SVGTransform -> Float -> m ()
setSkewX self angle = liftDOM (void ((js_setSkewX (self) (angle))))

foreign import javascript safe "(($1, $2) => { return $1[\"setSkewY\"]($2); })"
        js_setSkewY :: SVGTransform -> Float -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/setSkewY MDN SVGTransform.setSkewY documentation>
setSkewY :: (MonadDOM m) => SVGTransform -> Float -> m ()
setSkewY self angle = liftDOM (void ((js_setSkewY (self) (angle))))

foreign import javascript safe "(($1, $2, $3) => { return $1[\"setTranslate\"]($2, $3); })"
        js_setTranslate :: SVGTransform -> Float -> Float -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/setTranslate MDN SVGTransform.setTranslate documentation>
setTranslate :: (MonadDOM m) => SVGTransform -> Float -> Float -> m ()
setTranslate self tx ty = liftDOM (void ((js_setTranslate (self) (tx) (ty))))

foreign import javascript unsafe "(($1) => { return $1[\"type\"]; })"
        js_getType :: SVGTransform -> IO Word
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/type MDN SVGTransform.type documentation>
getType :: (MonadDOM m) => SVGTransform -> m Word
getType self = liftDOM ((js_getType (self)))

foreign import javascript unsafe "(($1) => { return $1[\"matrix\"]; })"
        js_getMatrix :: SVGTransform -> IO DOMMatrix
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/matrix MDN SVGTransform.matrix documentation>
getMatrix :: (MonadDOM m) => SVGTransform -> m DOMMatrix
getMatrix self = liftDOM ((js_getMatrix (self)))

foreign import javascript unsafe "(($1) => { return $1[\"angle\"]; })"
        js_getAngle :: SVGTransform -> IO Float
-- | <https://developer.mozilla.org/docs/Web/API/SVGTransform/angle MDN SVGTransform.angle documentation>
getAngle :: (MonadDOM m) => SVGTransform -> m Float
getAngle self = liftDOM ((js_getAngle (self)))

pattern SVG_TRANSFORM_UNKNOWN = 0

pattern SVG_TRANSFORM_MATRIX = 1

pattern SVG_TRANSFORM_TRANSLATE = 2

pattern SVG_TRANSFORM_SCALE = 3

pattern SVG_TRANSFORM_ROTATE = 4

pattern SVG_TRANSFORM_SKEWX = 5

pattern SVG_TRANSFORM_SKEWY = 6