module JSDOM.Generated.SVGTransformList
(clear, initialize, initialize_, initializeUnsafe,
initializeUnchecked, getItem, getItem_, getItemUnsafe,
getItemUnchecked, insertItemBefore, insertItemBefore_,
insertItemBeforeUnsafe, insertItemBeforeUnchecked, replaceItem,
replaceItem_, replaceItemUnsafe, replaceItemUnchecked, removeItem,
removeItem_, removeItemUnsafe, removeItemUnchecked, appendItem,
appendItem_, appendItemUnsafe, appendItemUnchecked,
createSVGTransformFromMatrix, createSVGTransformFromMatrix_,
createSVGTransformFromMatrixUnsafe,
createSVGTransformFromMatrixUnchecked, consolidate, consolidate_,
consolidateUnsafe, consolidateUnchecked, getNumberOfItems,
SVGTransformList(..), gTypeSVGTransformList)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import qualified Prelude (error)
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]))
initializeUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGTransformList -> Maybe SVGTransform -> m SVGTransform
initializeUnsafe self item
= liftDOM
(((self ^. jsf "initialize" [toJSVal item]) >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
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]))
getItemUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGTransformList -> Word -> m SVGTransform
getItemUnsafe self index
= liftDOM
(((self ^. jsf "getItem" [toJSVal index]) >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
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]))
insertItemBeforeUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGTransformList -> Maybe SVGTransform -> Word -> m SVGTransform
insertItemBeforeUnsafe self item index
= liftDOM
(((self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index])
>>= fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
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]))
replaceItemUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGTransformList -> Maybe SVGTransform -> Word -> m SVGTransform
replaceItemUnsafe self item index
= liftDOM
(((self ^. jsf "replaceItem" [toJSVal item, toJSVal index]) >>=
fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
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]))
removeItemUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGTransformList -> Word -> m SVGTransform
removeItemUnsafe self index
= liftDOM
(((self ^. jsf "removeItem" [toJSVal index]) >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
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]))
appendItemUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGTransformList -> Maybe SVGTransform -> m SVGTransform
appendItemUnsafe self item
= liftDOM
(((self ^. jsf "appendItem" [toJSVal item]) >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
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]))
createSVGTransformFromMatrixUnsafe ::
(MonadDOM m, HasCallStack) =>
SVGTransformList -> Maybe SVGMatrix -> m SVGTransform
createSVGTransformFromMatrixUnsafe self matrix
= liftDOM
(((self ^. jsf "createSVGTransformFromMatrix" [toJSVal matrix]) >>=
fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
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" ()))
consolidateUnsafe ::
(MonadDOM m, HasCallStack) => SVGTransformList -> m SVGTransform
consolidateUnsafe self
= liftDOM
(((self ^. jsf "consolidate" ()) >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
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))