module JSDOM.Generated.SVGGraphicsElement
(getBBox, getBBox_, getBBoxUnsafe, getBBoxUnchecked, getCTM,
getCTM_, getCTMUnsafe, getCTMUnchecked, getScreenCTM,
getScreenCTM_, getScreenCTMUnsafe, getScreenCTMUnchecked,
getTransformToElement, getTransformToElement_,
getTransformToElementUnsafe, getTransformToElementUnchecked,
getTransform, getTransformUnsafe, getTransformUnchecked,
getNearestViewportElement, getNearestViewportElementUnsafe,
getNearestViewportElementUnchecked, getFarthestViewportElement,
getFarthestViewportElementUnsafe,
getFarthestViewportElementUnchecked, 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 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 JSDOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import JSDOM.EventTargetClosures (EventName, unsafeEventName)
import JSDOM.Enums
getBBox ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m (Maybe SVGRect)
getBBox self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getBBox" ()) >>= fromJSVal)
getBBox_ :: (MonadDOM m, IsSVGGraphicsElement self) => self -> m ()
getBBox_ self
= liftDOM (void ((toSVGGraphicsElement self) ^. jsf "getBBox" ()))
getBBoxUnsafe ::
(MonadDOM m, IsSVGGraphicsElement self, HasCallStack) =>
self -> m SVGRect
getBBoxUnsafe self
= liftDOM
((((toSVGGraphicsElement self) ^. jsf "getBBox" ()) >>= fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
getBBoxUnchecked ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGRect
getBBoxUnchecked self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getBBox" ()) >>=
fromJSValUnchecked)
getCTM ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m (Maybe SVGMatrix)
getCTM self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getCTM" ()) >>= fromJSVal)
getCTM_ :: (MonadDOM m, IsSVGGraphicsElement self) => self -> m ()
getCTM_ self
= liftDOM (void ((toSVGGraphicsElement self) ^. jsf "getCTM" ()))
getCTMUnsafe ::
(MonadDOM m, IsSVGGraphicsElement self, HasCallStack) =>
self -> m SVGMatrix
getCTMUnsafe self
= liftDOM
((((toSVGGraphicsElement self) ^. jsf "getCTM" ()) >>= fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
getCTMUnchecked ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGMatrix
getCTMUnchecked self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getCTM" ()) >>=
fromJSValUnchecked)
getScreenCTM ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m (Maybe SVGMatrix)
getScreenCTM self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getScreenCTM" ()) >>=
fromJSVal)
getScreenCTM_ ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m ()
getScreenCTM_ self
= liftDOM
(void ((toSVGGraphicsElement self) ^. jsf "getScreenCTM" ()))
getScreenCTMUnsafe ::
(MonadDOM m, IsSVGGraphicsElement self, HasCallStack) =>
self -> m SVGMatrix
getScreenCTMUnsafe self
= liftDOM
((((toSVGGraphicsElement self) ^. jsf "getScreenCTM" ()) >>=
fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
getScreenCTMUnchecked ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGMatrix
getScreenCTMUnchecked self
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getScreenCTM" ()) >>=
fromJSValUnchecked)
getTransformToElement ::
(MonadDOM m, IsSVGGraphicsElement self, IsSVGElement element) =>
self -> Maybe element -> m (Maybe SVGMatrix)
getTransformToElement self element
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getTransformToElement"
[toJSVal element])
>>= fromJSVal)
getTransformToElement_ ::
(MonadDOM m, IsSVGGraphicsElement self, IsSVGElement element) =>
self -> Maybe element -> m ()
getTransformToElement_ self element
= liftDOM
(void
((toSVGGraphicsElement self) ^. jsf "getTransformToElement"
[toJSVal element]))
getTransformToElementUnsafe ::
(MonadDOM m, IsSVGGraphicsElement self, IsSVGElement element,
HasCallStack) =>
self -> Maybe element -> m SVGMatrix
getTransformToElementUnsafe self element
= liftDOM
((((toSVGGraphicsElement self) ^. jsf "getTransformToElement"
[toJSVal element])
>>= fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
getTransformToElementUnchecked ::
(MonadDOM m, IsSVGGraphicsElement self, IsSVGElement element) =>
self -> Maybe element -> m SVGMatrix
getTransformToElementUnchecked self element
= liftDOM
(((toSVGGraphicsElement self) ^. jsf "getTransformToElement"
[toJSVal element])
>>= fromJSValUnchecked)
getTransform ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m (Maybe SVGAnimatedTransformList)
getTransform self
= liftDOM
(((toSVGGraphicsElement self) ^. js "transform") >>= fromJSVal)
getTransformUnsafe ::
(MonadDOM m, IsSVGGraphicsElement self, HasCallStack) =>
self -> m SVGAnimatedTransformList
getTransformUnsafe self
= liftDOM
((((toSVGGraphicsElement self) ^. js "transform") >>= fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
getTransformUnchecked ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m SVGAnimatedTransformList
getTransformUnchecked self
= liftDOM
(((toSVGGraphicsElement self) ^. js "transform") >>=
fromJSValUnchecked)
getNearestViewportElement ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m (Maybe SVGElement)
getNearestViewportElement self
= liftDOM
(((toSVGGraphicsElement self) ^. js "nearestViewportElement") >>=
fromJSVal)
getNearestViewportElementUnsafe ::
(MonadDOM m, IsSVGGraphicsElement self, HasCallStack) =>
self -> m SVGElement
getNearestViewportElementUnsafe self
= liftDOM
((((toSVGGraphicsElement self) ^. js "nearestViewportElement") >>=
fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
getNearestViewportElementUnchecked ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGElement
getNearestViewportElementUnchecked self
= liftDOM
(((toSVGGraphicsElement self) ^. js "nearestViewportElement") >>=
fromJSValUnchecked)
getFarthestViewportElement ::
(MonadDOM m, IsSVGGraphicsElement self) =>
self -> m (Maybe SVGElement)
getFarthestViewportElement self
= liftDOM
(((toSVGGraphicsElement self) ^. js "farthestViewportElement") >>=
fromJSVal)
getFarthestViewportElementUnsafe ::
(MonadDOM m, IsSVGGraphicsElement self, HasCallStack) =>
self -> m SVGElement
getFarthestViewportElementUnsafe self
= liftDOM
((((toSVGGraphicsElement self) ^. js "farthestViewportElement") >>=
fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
getFarthestViewportElementUnchecked ::
(MonadDOM m, IsSVGGraphicsElement self) => self -> m SVGElement
getFarthestViewportElementUnchecked self
= liftDOM
(((toSVGGraphicsElement self) ^. js "farthestViewportElement") >>=
fromJSValUnchecked)