{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.SVGMarkerElement (js_setOrientToAuto, setOrientToAuto, js_setOrientToAngle, setOrientToAngle, pattern SVG_MARKERUNITS_UNKNOWN, pattern SVG_MARKERUNITS_USERSPACEONUSE, pattern SVG_MARKERUNITS_STROKEWIDTH, pattern SVG_MARKER_ORIENT_UNKNOWN, pattern SVG_MARKER_ORIENT_AUTO, pattern SVG_MARKER_ORIENT_ANGLE, js_getRefX, getRefX, getRefXUnchecked, js_getRefY, getRefY, getRefYUnchecked, js_getMarkerUnits, getMarkerUnits, getMarkerUnitsUnchecked, js_getMarkerWidth, getMarkerWidth, getMarkerWidthUnchecked, js_getMarkerHeight, getMarkerHeight, getMarkerHeightUnchecked, js_getOrientType, getOrientType, getOrientTypeUnchecked, js_getOrientAngle, getOrientAngle, getOrientAngleUnchecked, SVGMarkerElement, castToSVGMarkerElement, gTypeSVGMarkerElement) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord) import Data.Typeable (Typeable) import GHCJS.Types (JSVal(..), JSString) import GHCJS.Foreign (jsNull) import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..)) import GHCJS.Marshal (ToJSVal(..), FromJSVal(..)) import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..)) import Control.Monad (void) import Control.Monad.IO.Class (MonadIO(..)) import Data.Int (Int64) import Data.Word (Word, Word64) import Data.Maybe (fromJust) import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName) import GHCJS.DOM.JSFFI.Generated.Enums foreign import javascript unsafe "$1[\"setOrientToAuto\"]()" js_setOrientToAuto :: SVGMarkerElement -> IO () -- | setOrientToAuto :: (MonadIO m) => SVGMarkerElement -> m () setOrientToAuto self = liftIO (js_setOrientToAuto (self)) foreign import javascript unsafe "$1[\"setOrientToAngle\"]($2)" js_setOrientToAngle :: SVGMarkerElement -> Nullable SVGAngle -> IO () -- | setOrientToAngle :: (MonadIO m) => SVGMarkerElement -> Maybe SVGAngle -> m () setOrientToAngle self angle = liftIO (js_setOrientToAngle (self) (maybeToNullable angle)) pattern SVG_MARKERUNITS_UNKNOWN = 0 pattern SVG_MARKERUNITS_USERSPACEONUSE = 1 pattern SVG_MARKERUNITS_STROKEWIDTH = 2 pattern SVG_MARKER_ORIENT_UNKNOWN = 0 pattern SVG_MARKER_ORIENT_AUTO = 1 pattern SVG_MARKER_ORIENT_ANGLE = 2 foreign import javascript unsafe "$1[\"refX\"]" js_getRefX :: SVGMarkerElement -> IO (Nullable SVGAnimatedLength) -- | getRefX :: (MonadIO m) => SVGMarkerElement -> m (Maybe SVGAnimatedLength) getRefX self = liftIO (nullableToMaybe <$> (js_getRefX (self))) -- | getRefXUnchecked :: (MonadIO m) => SVGMarkerElement -> m SVGAnimatedLength getRefXUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getRefX (self))) foreign import javascript unsafe "$1[\"refY\"]" js_getRefY :: SVGMarkerElement -> IO (Nullable SVGAnimatedLength) -- | getRefY :: (MonadIO m) => SVGMarkerElement -> m (Maybe SVGAnimatedLength) getRefY self = liftIO (nullableToMaybe <$> (js_getRefY (self))) -- | getRefYUnchecked :: (MonadIO m) => SVGMarkerElement -> m SVGAnimatedLength getRefYUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getRefY (self))) foreign import javascript unsafe "$1[\"markerUnits\"]" js_getMarkerUnits :: SVGMarkerElement -> IO (Nullable SVGAnimatedEnumeration) -- | getMarkerUnits :: (MonadIO m) => SVGMarkerElement -> m (Maybe SVGAnimatedEnumeration) getMarkerUnits self = liftIO (nullableToMaybe <$> (js_getMarkerUnits (self))) -- | getMarkerUnitsUnchecked :: (MonadIO m) => SVGMarkerElement -> m SVGAnimatedEnumeration getMarkerUnitsUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getMarkerUnits (self))) foreign import javascript unsafe "$1[\"markerWidth\"]" js_getMarkerWidth :: SVGMarkerElement -> IO (Nullable SVGAnimatedLength) -- | getMarkerWidth :: (MonadIO m) => SVGMarkerElement -> m (Maybe SVGAnimatedLength) getMarkerWidth self = liftIO (nullableToMaybe <$> (js_getMarkerWidth (self))) -- | getMarkerWidthUnchecked :: (MonadIO m) => SVGMarkerElement -> m SVGAnimatedLength getMarkerWidthUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getMarkerWidth (self))) foreign import javascript unsafe "$1[\"markerHeight\"]" js_getMarkerHeight :: SVGMarkerElement -> IO (Nullable SVGAnimatedLength) -- | getMarkerHeight :: (MonadIO m) => SVGMarkerElement -> m (Maybe SVGAnimatedLength) getMarkerHeight self = liftIO (nullableToMaybe <$> (js_getMarkerHeight (self))) -- | getMarkerHeightUnchecked :: (MonadIO m) => SVGMarkerElement -> m SVGAnimatedLength getMarkerHeightUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getMarkerHeight (self))) foreign import javascript unsafe "$1[\"orientType\"]" js_getOrientType :: SVGMarkerElement -> IO (Nullable SVGAnimatedEnumeration) -- | getOrientType :: (MonadIO m) => SVGMarkerElement -> m (Maybe SVGAnimatedEnumeration) getOrientType self = liftIO (nullableToMaybe <$> (js_getOrientType (self))) -- | getOrientTypeUnchecked :: (MonadIO m) => SVGMarkerElement -> m SVGAnimatedEnumeration getOrientTypeUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getOrientType (self))) foreign import javascript unsafe "$1[\"orientAngle\"]" js_getOrientAngle :: SVGMarkerElement -> IO (Nullable SVGAnimatedAngle) -- | getOrientAngle :: (MonadIO m) => SVGMarkerElement -> m (Maybe SVGAnimatedAngle) getOrientAngle self = liftIO (nullableToMaybe <$> (js_getOrientAngle (self))) -- | getOrientAngleUnchecked :: (MonadIO m) => SVGMarkerElement -> m SVGAnimatedAngle getOrientAngleUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getOrientAngle (self)))