module JSDOM.Generated.SVGTransformList
(clear, initialize, getItem, insertItemBefore, replaceItem,
removeItem, appendItem, createSVGTransformFromMatrix, consolidate,
getNumberOfItems, SVGTransformList, castToSVGTransformList,
gTypeSVGTransformList)
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 JSDOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import JSDOM.EventTargetClosures (EventName, unsafeEventName)
import JSDOM.Enums
clear :: (MonadDOM m) => SVGTransformList -> m ()
clear self = liftDOM (void (self ^. js "clear"))
initialize ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> m (Maybe SVGTransform)
initialize self item
= liftDOM ((self ^. jsf "initialize" [toJSVal item]) >>= fromJSVal)
getItem ::
(MonadDOM m) => SVGTransformList -> Word -> m (Maybe SVGTransform)
getItem self index
= liftDOM ((self ^. jsf "getItem" [toJSVal index]) >>= fromJSVal)
insertItemBefore ::
(MonadDOM m) =>
SVGTransformList ->
Maybe SVGTransform -> Word -> m (Maybe SVGTransform)
insertItemBefore self item index
= liftDOM
((self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index]) >>=
fromJSVal)
replaceItem ::
(MonadDOM m) =>
SVGTransformList ->
Maybe SVGTransform -> Word -> m (Maybe SVGTransform)
replaceItem self item index
= liftDOM
((self ^. jsf "replaceItem" [toJSVal item, toJSVal index]) >>=
fromJSVal)
removeItem ::
(MonadDOM m) => SVGTransformList -> Word -> m (Maybe SVGTransform)
removeItem self index
= liftDOM
((self ^. jsf "removeItem" [toJSVal index]) >>= fromJSVal)
appendItem ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> m (Maybe SVGTransform)
appendItem self item
= liftDOM ((self ^. jsf "appendItem" [toJSVal item]) >>= fromJSVal)
createSVGTransformFromMatrix ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGMatrix -> m (Maybe SVGTransform)
createSVGTransformFromMatrix self matrix
= liftDOM
((self ^. jsf "createSVGTransformFromMatrix" [toJSVal matrix]) >>=
fromJSVal)
consolidate ::
(MonadDOM m) => SVGTransformList -> m (Maybe SVGTransform)
consolidate self
= liftDOM ((self ^. js "consolidate") >>= fromJSVal)
getNumberOfItems :: (MonadDOM m) => SVGTransformList -> m Word
getNumberOfItems self
= liftDOM
(round <$> ((self ^. js "numberOfItems") >>= valToNumber))