{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LANGUAGE JavaScriptFFI #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} module GHCJS.DOM.JSFFI.Generated.SVGComponentTransferFunctionElement (pattern SVG_FECOMPONENTTRANSFER_TYPE_UNKNOWN, pattern SVG_FECOMPONENTTRANSFER_TYPE_IDENTITY, pattern SVG_FECOMPONENTTRANSFER_TYPE_TABLE, pattern SVG_FECOMPONENTTRANSFER_TYPE_DISCRETE, pattern SVG_FECOMPONENTTRANSFER_TYPE_LINEAR, pattern SVG_FECOMPONENTTRANSFER_TYPE_GAMMA, js_getType, getType, getTypeUnsafe, getTypeUnchecked, js_getTableValues, getTableValues, getTableValuesUnsafe, getTableValuesUnchecked, js_getSlope, getSlope, getSlopeUnsafe, getSlopeUnchecked, js_getIntercept, getIntercept, getInterceptUnsafe, getInterceptUnchecked, js_getAmplitude, getAmplitude, getAmplitudeUnsafe, getAmplitudeUnchecked, js_getExponent, getExponent, getExponentUnsafe, getExponentUnchecked, js_getOffset, getOffset, getOffsetUnsafe, getOffsetUnchecked, SVGComponentTransferFunctionElement(..), gTypeSVGComponentTransferFunctionElement, IsSVGComponentTransferFunctionElement, toSVGComponentTransferFunctionElement) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord) import qualified Prelude (error) 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 pattern SVG_FECOMPONENTTRANSFER_TYPE_UNKNOWN = 0 pattern SVG_FECOMPONENTTRANSFER_TYPE_IDENTITY = 1 pattern SVG_FECOMPONENTTRANSFER_TYPE_TABLE = 2 pattern SVG_FECOMPONENTTRANSFER_TYPE_DISCRETE = 3 pattern SVG_FECOMPONENTTRANSFER_TYPE_LINEAR = 4 pattern SVG_FECOMPONENTTRANSFER_TYPE_GAMMA = 5 foreign import javascript unsafe "$1[\"type\"]" js_getType :: SVGComponentTransferFunctionElement -> IO (Nullable SVGAnimatedEnumeration) -- | getType :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m (Maybe SVGAnimatedEnumeration) getType self = liftIO (nullableToMaybe <$> (js_getType (toSVGComponentTransferFunctionElement self))) -- | getTypeUnsafe :: (MonadIO m, IsSVGComponentTransferFunctionElement self, HasCallStack) => self -> m SVGAnimatedEnumeration getTypeUnsafe self = liftIO ((nullableToMaybe <$> (js_getType (toSVGComponentTransferFunctionElement self))) >>= maybe (Prelude.error "Nothing to return") return) -- | getTypeUnchecked :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m SVGAnimatedEnumeration getTypeUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getType (toSVGComponentTransferFunctionElement self))) foreign import javascript unsafe "$1[\"tableValues\"]" js_getTableValues :: SVGComponentTransferFunctionElement -> IO (Nullable SVGAnimatedNumberList) -- | getTableValues :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m (Maybe SVGAnimatedNumberList) getTableValues self = liftIO (nullableToMaybe <$> (js_getTableValues (toSVGComponentTransferFunctionElement self))) -- | getTableValuesUnsafe :: (MonadIO m, IsSVGComponentTransferFunctionElement self, HasCallStack) => self -> m SVGAnimatedNumberList getTableValuesUnsafe self = liftIO ((nullableToMaybe <$> (js_getTableValues (toSVGComponentTransferFunctionElement self))) >>= maybe (Prelude.error "Nothing to return") return) -- | getTableValuesUnchecked :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m SVGAnimatedNumberList getTableValuesUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getTableValues (toSVGComponentTransferFunctionElement self))) foreign import javascript unsafe "$1[\"slope\"]" js_getSlope :: SVGComponentTransferFunctionElement -> IO (Nullable SVGAnimatedNumber) -- | getSlope :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m (Maybe SVGAnimatedNumber) getSlope self = liftIO (nullableToMaybe <$> (js_getSlope (toSVGComponentTransferFunctionElement self))) -- | getSlopeUnsafe :: (MonadIO m, IsSVGComponentTransferFunctionElement self, HasCallStack) => self -> m SVGAnimatedNumber getSlopeUnsafe self = liftIO ((nullableToMaybe <$> (js_getSlope (toSVGComponentTransferFunctionElement self))) >>= maybe (Prelude.error "Nothing to return") return) -- | getSlopeUnchecked :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m SVGAnimatedNumber getSlopeUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getSlope (toSVGComponentTransferFunctionElement self))) foreign import javascript unsafe "$1[\"intercept\"]" js_getIntercept :: SVGComponentTransferFunctionElement -> IO (Nullable SVGAnimatedNumber) -- | getIntercept :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m (Maybe SVGAnimatedNumber) getIntercept self = liftIO (nullableToMaybe <$> (js_getIntercept (toSVGComponentTransferFunctionElement self))) -- | getInterceptUnsafe :: (MonadIO m, IsSVGComponentTransferFunctionElement self, HasCallStack) => self -> m SVGAnimatedNumber getInterceptUnsafe self = liftIO ((nullableToMaybe <$> (js_getIntercept (toSVGComponentTransferFunctionElement self))) >>= maybe (Prelude.error "Nothing to return") return) -- | getInterceptUnchecked :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m SVGAnimatedNumber getInterceptUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getIntercept (toSVGComponentTransferFunctionElement self))) foreign import javascript unsafe "$1[\"amplitude\"]" js_getAmplitude :: SVGComponentTransferFunctionElement -> IO (Nullable SVGAnimatedNumber) -- | getAmplitude :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m (Maybe SVGAnimatedNumber) getAmplitude self = liftIO (nullableToMaybe <$> (js_getAmplitude (toSVGComponentTransferFunctionElement self))) -- | getAmplitudeUnsafe :: (MonadIO m, IsSVGComponentTransferFunctionElement self, HasCallStack) => self -> m SVGAnimatedNumber getAmplitudeUnsafe self = liftIO ((nullableToMaybe <$> (js_getAmplitude (toSVGComponentTransferFunctionElement self))) >>= maybe (Prelude.error "Nothing to return") return) -- | getAmplitudeUnchecked :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m SVGAnimatedNumber getAmplitudeUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getAmplitude (toSVGComponentTransferFunctionElement self))) foreign import javascript unsafe "$1[\"exponent\"]" js_getExponent :: SVGComponentTransferFunctionElement -> IO (Nullable SVGAnimatedNumber) -- | getExponent :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m (Maybe SVGAnimatedNumber) getExponent self = liftIO (nullableToMaybe <$> (js_getExponent (toSVGComponentTransferFunctionElement self))) -- | getExponentUnsafe :: (MonadIO m, IsSVGComponentTransferFunctionElement self, HasCallStack) => self -> m SVGAnimatedNumber getExponentUnsafe self = liftIO ((nullableToMaybe <$> (js_getExponent (toSVGComponentTransferFunctionElement self))) >>= maybe (Prelude.error "Nothing to return") return) -- | getExponentUnchecked :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m SVGAnimatedNumber getExponentUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getExponent (toSVGComponentTransferFunctionElement self))) foreign import javascript unsafe "$1[\"offset\"]" js_getOffset :: SVGComponentTransferFunctionElement -> IO (Nullable SVGAnimatedNumber) -- | getOffset :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m (Maybe SVGAnimatedNumber) getOffset self = liftIO (nullableToMaybe <$> (js_getOffset (toSVGComponentTransferFunctionElement self))) -- | getOffsetUnsafe :: (MonadIO m, IsSVGComponentTransferFunctionElement self, HasCallStack) => self -> m SVGAnimatedNumber getOffsetUnsafe self = liftIO ((nullableToMaybe <$> (js_getOffset (toSVGComponentTransferFunctionElement self))) >>= maybe (Prelude.error "Nothing to return") return) -- | getOffsetUnchecked :: (MonadIO m, IsSVGComponentTransferFunctionElement self) => self -> m SVGAnimatedNumber getOffsetUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getOffset (toSVGComponentTransferFunctionElement self)))