module JSDOM.Generated.SVGTransformList
(clear, initialize, initialize_, initializeUnchecked, getItem,
getItem_, getItemUnchecked, insertItemBefore, insertItemBefore_,
insertItemBeforeUnchecked, replaceItem, replaceItem_,
replaceItemUnchecked, removeItem, removeItem_, removeItemUnchecked,
appendItem, appendItem_, appendItemUnchecked,
createSVGTransformFromMatrix, createSVGTransformFromMatrix_,
createSVGTransformFromMatrixUnchecked, consolidate, consolidate_,
consolidateUnchecked, 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 ^. jsf "clear" ()))
initialize ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> m (Maybe SVGTransform)
initialize self item
= liftDOM ((self ^. jsf "initialize" [toJSVal item]) >>= fromJSVal)
initialize_ ::
(MonadDOM m) => SVGTransformList -> Maybe SVGTransform -> m ()
initialize_ self item
= liftDOM (void (self ^. jsf "initialize" [toJSVal item]))
initializeUnchecked ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> m SVGTransform
initializeUnchecked self item
= liftDOM
((self ^. jsf "initialize" [toJSVal item]) >>= fromJSValUnchecked)
getItem ::
(MonadDOM m) => SVGTransformList -> Word -> m (Maybe SVGTransform)
getItem self index
= liftDOM ((self ^. jsf "getItem" [toJSVal index]) >>= fromJSVal)
getItem_ :: (MonadDOM m) => SVGTransformList -> Word -> m ()
getItem_ self index
= liftDOM (void (self ^. jsf "getItem" [toJSVal index]))
getItemUnchecked ::
(MonadDOM m) => SVGTransformList -> Word -> m SVGTransform
getItemUnchecked self index
= liftDOM
((self ^. jsf "getItem" [toJSVal index]) >>= fromJSValUnchecked)
insertItemBefore ::
(MonadDOM m) =>
SVGTransformList ->
Maybe SVGTransform -> Word -> m (Maybe SVGTransform)
insertItemBefore self item index
= liftDOM
((self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index]) >>=
fromJSVal)
insertItemBefore_ ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> Word -> m ()
insertItemBefore_ self item index
= liftDOM
(void
(self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index]))
insertItemBeforeUnchecked ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> Word -> m SVGTransform
insertItemBeforeUnchecked self item index
= liftDOM
((self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index]) >>=
fromJSValUnchecked)
replaceItem ::
(MonadDOM m) =>
SVGTransformList ->
Maybe SVGTransform -> Word -> m (Maybe SVGTransform)
replaceItem self item index
= liftDOM
((self ^. jsf "replaceItem" [toJSVal item, toJSVal index]) >>=
fromJSVal)
replaceItem_ ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> Word -> m ()
replaceItem_ self item index
= liftDOM
(void (self ^. jsf "replaceItem" [toJSVal item, toJSVal index]))
replaceItemUnchecked ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> Word -> m SVGTransform
replaceItemUnchecked self item index
= liftDOM
((self ^. jsf "replaceItem" [toJSVal item, toJSVal index]) >>=
fromJSValUnchecked)
removeItem ::
(MonadDOM m) => SVGTransformList -> Word -> m (Maybe SVGTransform)
removeItem self index
= liftDOM
((self ^. jsf "removeItem" [toJSVal index]) >>= fromJSVal)
removeItem_ :: (MonadDOM m) => SVGTransformList -> Word -> m ()
removeItem_ self index
= liftDOM (void (self ^. jsf "removeItem" [toJSVal index]))
removeItemUnchecked ::
(MonadDOM m) => SVGTransformList -> Word -> m SVGTransform
removeItemUnchecked self index
= liftDOM
((self ^. jsf "removeItem" [toJSVal index]) >>= fromJSValUnchecked)
appendItem ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> m (Maybe SVGTransform)
appendItem self item
= liftDOM ((self ^. jsf "appendItem" [toJSVal item]) >>= fromJSVal)
appendItem_ ::
(MonadDOM m) => SVGTransformList -> Maybe SVGTransform -> m ()
appendItem_ self item
= liftDOM (void (self ^. jsf "appendItem" [toJSVal item]))
appendItemUnchecked ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGTransform -> m SVGTransform
appendItemUnchecked self item
= liftDOM
((self ^. jsf "appendItem" [toJSVal item]) >>= fromJSValUnchecked)
createSVGTransformFromMatrix ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGMatrix -> m (Maybe SVGTransform)
createSVGTransformFromMatrix self matrix
= liftDOM
((self ^. jsf "createSVGTransformFromMatrix" [toJSVal matrix]) >>=
fromJSVal)
createSVGTransformFromMatrix_ ::
(MonadDOM m) => SVGTransformList -> Maybe SVGMatrix -> m ()
createSVGTransformFromMatrix_ self matrix
= liftDOM
(void
(self ^. jsf "createSVGTransformFromMatrix" [toJSVal matrix]))
createSVGTransformFromMatrixUnchecked ::
(MonadDOM m) =>
SVGTransformList -> Maybe SVGMatrix -> m SVGTransform
createSVGTransformFromMatrixUnchecked self matrix
= liftDOM
((self ^. jsf "createSVGTransformFromMatrix" [toJSVal matrix]) >>=
fromJSValUnchecked)
consolidate ::
(MonadDOM m) => SVGTransformList -> m (Maybe SVGTransform)
consolidate self
= liftDOM ((self ^. jsf "consolidate" ()) >>= fromJSVal)
consolidate_ :: (MonadDOM m) => SVGTransformList -> m ()
consolidate_ self = liftDOM (void (self ^. jsf "consolidate" ()))
consolidateUnchecked ::
(MonadDOM m) => SVGTransformList -> m SVGTransform
consolidateUnchecked self
= liftDOM ((self ^. jsf "consolidate" ()) >>= fromJSValUnchecked)
getNumberOfItems :: (MonadDOM m) => SVGTransformList -> m Word
getNumberOfItems self
= liftDOM
(round <$> ((self ^. js "numberOfItems") >>= valToNumber))