{-# LANGUAGE PatternSynonyms #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} module JSDOM.Generated.SVGTextPositioningElement (getX, getXUnsafe, getXUnchecked, getY, getYUnsafe, getYUnchecked, getDx, getDxUnsafe, getDxUnchecked, getDy, getDyUnsafe, getDyUnchecked, getRotate, getRotateUnsafe, getRotateUnchecked, SVGTextPositioningElement(..), gTypeSVGTextPositioningElement, IsSVGTextPositioningElement, toSVGTextPositioningElement) 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 -- | getX :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m (Maybe SVGAnimatedLengthList) getX self = liftDOM (((toSVGTextPositioningElement self) ^. js "x") >>= fromJSVal) -- | getXUnsafe :: (MonadDOM m, IsSVGTextPositioningElement self, HasCallStack) => self -> m SVGAnimatedLengthList getXUnsafe self = liftDOM ((((toSVGTextPositioningElement self) ^. js "x") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getXUnchecked :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m SVGAnimatedLengthList getXUnchecked self = liftDOM (((toSVGTextPositioningElement self) ^. js "x") >>= fromJSValUnchecked) -- | getY :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m (Maybe SVGAnimatedLengthList) getY self = liftDOM (((toSVGTextPositioningElement self) ^. js "y") >>= fromJSVal) -- | getYUnsafe :: (MonadDOM m, IsSVGTextPositioningElement self, HasCallStack) => self -> m SVGAnimatedLengthList getYUnsafe self = liftDOM ((((toSVGTextPositioningElement self) ^. js "y") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getYUnchecked :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m SVGAnimatedLengthList getYUnchecked self = liftDOM (((toSVGTextPositioningElement self) ^. js "y") >>= fromJSValUnchecked) -- | getDx :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m (Maybe SVGAnimatedLengthList) getDx self = liftDOM (((toSVGTextPositioningElement self) ^. js "dx") >>= fromJSVal) -- | getDxUnsafe :: (MonadDOM m, IsSVGTextPositioningElement self, HasCallStack) => self -> m SVGAnimatedLengthList getDxUnsafe self = liftDOM ((((toSVGTextPositioningElement self) ^. js "dx") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getDxUnchecked :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m SVGAnimatedLengthList getDxUnchecked self = liftDOM (((toSVGTextPositioningElement self) ^. js "dx") >>= fromJSValUnchecked) -- | getDy :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m (Maybe SVGAnimatedLengthList) getDy self = liftDOM (((toSVGTextPositioningElement self) ^. js "dy") >>= fromJSVal) -- | getDyUnsafe :: (MonadDOM m, IsSVGTextPositioningElement self, HasCallStack) => self -> m SVGAnimatedLengthList getDyUnsafe self = liftDOM ((((toSVGTextPositioningElement self) ^. js "dy") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getDyUnchecked :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m SVGAnimatedLengthList getDyUnchecked self = liftDOM (((toSVGTextPositioningElement self) ^. js "dy") >>= fromJSValUnchecked) -- | getRotate :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m (Maybe SVGAnimatedNumberList) getRotate self = liftDOM (((toSVGTextPositioningElement self) ^. js "rotate") >>= fromJSVal) -- | getRotateUnsafe :: (MonadDOM m, IsSVGTextPositioningElement self, HasCallStack) => self -> m SVGAnimatedNumberList getRotateUnsafe self = liftDOM ((((toSVGTextPositioningElement self) ^. js "rotate") >>= fromJSVal) >>= maybe (Prelude.error "Nothing to return") return) -- | getRotateUnchecked :: (MonadDOM m, IsSVGTextPositioningElement self) => self -> m SVGAnimatedNumberList getRotateUnchecked self = liftDOM (((toSVGTextPositioningElement self) ^. js "rotate") >>= fromJSValUnchecked)