module JSDOM.Generated.SVGPatternElement
(getPatternUnits, getPatternUnitsUnsafe, getPatternUnitsUnchecked,
getPatternContentUnits, getPatternContentUnitsUnsafe,
getPatternContentUnitsUnchecked, getPatternTransform,
getPatternTransformUnsafe, getPatternTransformUnchecked, getX,
getXUnsafe, getXUnchecked, getY, getYUnsafe, getYUnchecked,
getWidth, getWidthUnsafe, getWidthUnchecked, getHeight,
getHeightUnsafe, getHeightUnchecked, SVGPatternElement(..),
gTypeSVGPatternElement)
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
getPatternUnits ::
(MonadDOM m) =>
SVGPatternElement -> m (Maybe SVGAnimatedEnumeration)
getPatternUnits self
= liftDOM ((self ^. js "patternUnits") >>= fromJSVal)
getPatternUnitsUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGPatternElement -> m SVGAnimatedEnumeration
getPatternUnitsUnsafe self
= liftDOM
(((self ^. js "patternUnits") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getPatternUnitsUnchecked ::
(MonadDOM m) => SVGPatternElement -> m SVGAnimatedEnumeration
getPatternUnitsUnchecked self
= liftDOM ((self ^. js "patternUnits") >>= fromJSValUnchecked)
getPatternContentUnits ::
(MonadDOM m) =>
SVGPatternElement -> m (Maybe SVGAnimatedEnumeration)
getPatternContentUnits self
= liftDOM ((self ^. js "patternContentUnits") >>= fromJSVal)
getPatternContentUnitsUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGPatternElement -> m SVGAnimatedEnumeration
getPatternContentUnitsUnsafe self
= liftDOM
(((self ^. js "patternContentUnits") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getPatternContentUnitsUnchecked ::
(MonadDOM m) => SVGPatternElement -> m SVGAnimatedEnumeration
getPatternContentUnitsUnchecked self
= liftDOM
((self ^. js "patternContentUnits") >>= fromJSValUnchecked)
getPatternTransform ::
(MonadDOM m) =>
SVGPatternElement -> m (Maybe SVGAnimatedTransformList)
getPatternTransform self
= liftDOM ((self ^. js "patternTransform") >>= fromJSVal)
getPatternTransformUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGPatternElement -> m SVGAnimatedTransformList
getPatternTransformUnsafe self
= liftDOM
(((self ^. js "patternTransform") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getPatternTransformUnchecked ::
(MonadDOM m) => SVGPatternElement -> m SVGAnimatedTransformList
getPatternTransformUnchecked self
= liftDOM ((self ^. js "patternTransform") >>= fromJSValUnchecked)
getX ::
(MonadDOM m) => SVGPatternElement -> m (Maybe SVGAnimatedLength)
getX self = liftDOM ((self ^. js "x") >>= fromJSVal)
getXUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGPatternElement -> m SVGAnimatedLength
getXUnsafe self
= liftDOM
(((self ^. js "x") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getXUnchecked ::
(MonadDOM m) => SVGPatternElement -> m SVGAnimatedLength
getXUnchecked self
= liftDOM ((self ^. js "x") >>= fromJSValUnchecked)
getY ::
(MonadDOM m) => SVGPatternElement -> m (Maybe SVGAnimatedLength)
getY self = liftDOM ((self ^. js "y") >>= fromJSVal)
getYUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGPatternElement -> m SVGAnimatedLength
getYUnsafe self
= liftDOM
(((self ^. js "y") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getYUnchecked ::
(MonadDOM m) => SVGPatternElement -> m SVGAnimatedLength
getYUnchecked self
= liftDOM ((self ^. js "y") >>= fromJSValUnchecked)
getWidth ::
(MonadDOM m) => SVGPatternElement -> m (Maybe SVGAnimatedLength)
getWidth self = liftDOM ((self ^. js "width") >>= fromJSVal)
getWidthUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGPatternElement -> m SVGAnimatedLength
getWidthUnsafe self
= liftDOM
(((self ^. js "width") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getWidthUnchecked ::
(MonadDOM m) => SVGPatternElement -> m SVGAnimatedLength
getWidthUnchecked self
= liftDOM ((self ^. js "width") >>= fromJSValUnchecked)
getHeight ::
(MonadDOM m) => SVGPatternElement -> m (Maybe SVGAnimatedLength)
getHeight self = liftDOM ((self ^. js "height") >>= fromJSVal)
getHeightUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGPatternElement -> m SVGAnimatedLength
getHeightUnsafe self
= liftDOM
(((self ^. js "height") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getHeightUnchecked ::
(MonadDOM m) => SVGPatternElement -> m SVGAnimatedLength
getHeightUnchecked self
= liftDOM ((self ^. js "height") >>= fromJSValUnchecked)