{-# LANGUAGE PatternSynonyms #-} module Language.Javascript.JSaddle.DOM.Generated.SVGPathSegCurvetoCubicSmoothAbs (setX, getX, setY, getY, setX2, getX2, setY2, getY2, SVGPathSegCurvetoCubicSmoothAbs, castToSVGPathSegCurvetoCubicSmoothAbs, gTypeSVGPathSegCurvetoCubicSmoothAbs) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..)) 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 Language.Javascript.JSaddle.DOM.Types import Control.Applicative ((<$>)) import Control.Monad (void) import Control.Lens.Operators ((^.)) import Language.Javascript.JSaddle.DOM.EventTargetClosures (EventName, unsafeEventName) import Language.Javascript.JSaddle.DOM.Enums -- | setX :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> Float -> m () setX self val = liftDOM (self ^. jss "x" (toJSVal val)) -- | getX :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> m Float getX self = liftDOM (realToFrac <$> ((self ^. js "x") >>= valToNumber)) -- | setY :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> Float -> m () setY self val = liftDOM (self ^. jss "y" (toJSVal val)) -- | getY :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> m Float getY self = liftDOM (realToFrac <$> ((self ^. js "y") >>= valToNumber)) -- | setX2 :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> Float -> m () setX2 self val = liftDOM (self ^. jss "x2" (toJSVal val)) -- | getX2 :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> m Float getX2 self = liftDOM (realToFrac <$> ((self ^. js "x2") >>= valToNumber)) -- | setY2 :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> Float -> m () setY2 self val = liftDOM (self ^. jss "y2" (toJSVal val)) -- | getY2 :: (MonadDOM m) => SVGPathSegCurvetoCubicSmoothAbs -> m Float getY2 self = liftDOM (realToFrac <$> ((self ^. js "y2") >>= valToNumber))