{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module JSDOM.Generated.SVGGraphicsElement
(getBBox, getBBox_, getCTM, getCTM_, getScreenCTM, getScreenCTM_,
getTransformToElement, getTransformToElement_, getTransform,
getNearestViewportElement, getFarthestViewportElement,
SVGGraphicsElement(..), gTypeSVGGraphicsElement,
IsSVGGraphicsElement, toSVGGraphicsElement)
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 Data.Traversable (mapM)
import Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, asyncFunction, new, array, jsUndefined, (!), (!!))
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, unsafeEventNameAsync)
import JSDOM.Enums
getBBox ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGRect
getBBox self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getBBox" ()) >>=
fromJSValUnchecked)
getBBox_ :: (MonadDOM m, IsSVGGraphicsElement self) => self -> m ()
getBBox_ self
= liftDOM (void ((toSVGGraphicsElement self) ^. jsf "getBBox" ()))
getCTM ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGMatrix
getCTM self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getCTM" ()) >>=
fromJSValUnchecked)
getCTM_ :: (MonadDOM m, IsSVGGraphicsElement self) => self -> m ()
getCTM_ self
= liftDOM (void ((toSVGGraphicsElement self) ^. jsf "getCTM" ()))
getScreenCTM ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGMatrix
getScreenCTM self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getScreenCTM" ()) >>=
fromJSValUnchecked)
getScreenCTM_ ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m ()
getScreenCTM_ self
= liftDOM
(void ((toSVGGraphicsElement self) ^. jsf "getScreenCTM" ()))
getTransformToElement ::
(MonadDOM m, IsSVGGraphicsElement self, IsSVGElement element) =>
self -> Maybe element -> m SVGMatrix
getTransformToElement self element
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getTransformToElement"
[toJSVal element])
>>= fromJSValUnchecked)
getTransformToElement_ ::
(MonadDOM m, IsSVGGraphicsElement self, IsSVGElement element) =>
self -> Maybe element -> m ()
getTransformToElement_ self element
= liftDOM
(void
((toSVGGraphicsElement self) ^. jsf "getTransformToElement"
[toJSVal element]))
getTransform ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m SVGAnimatedTransformList
getTransform self
= liftDOM
(((toSVGGraphicsElement self) ^. js "transform") >>=
fromJSValUnchecked)
getNearestViewportElement ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGElement
getNearestViewportElement self
= liftDOM
(((toSVGGraphicsElement self) ^. js "nearestViewportElement") >>=
fromJSValUnchecked)
getFarthestViewportElement ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGElement
getFarthestViewportElement self
= liftDOM
(((toSVGGraphicsElement self) ^. js "farthestViewportElement") >>=
fromJSValUnchecked)