CSSCounterStyleRule.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from css-counter-styles-3 (webref). Do not edit.
module JSDOM.Generated.CSSCounterStyleRule
       (setName, getName, setSystem, getSystem, setSymbols, getSymbols, setAdditiveSymbols, getAdditiveSymbols, setNegative, getNegative, setPrefix, getPrefix, setSuffix, getSuffix, setRange, getRange, setPad, getPad, setSpeakAs, getSpeakAs, setFallback, getFallback, CSSCounterStyleRule(..), gTypeCSSCounterStyleRule)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/name MDN CSSCounterStyleRule.name documentation>
setName :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setName self val = liftDOM (void (self ^. jss "name" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/name MDN CSSCounterStyleRule.name documentation>
getName :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getName self = liftDOM (((self ^. js "name") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/system MDN CSSCounterStyleRule.system documentation>
setSystem :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setSystem self val = liftDOM (void (self ^. jss "system" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/system MDN CSSCounterStyleRule.system documentation>
getSystem :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getSystem self = liftDOM (((self ^. js "system") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/symbols MDN CSSCounterStyleRule.symbols documentation>
setSymbols :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setSymbols self val = liftDOM (void (self ^. jss "symbols" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/symbols MDN CSSCounterStyleRule.symbols documentation>
getSymbols :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getSymbols self = liftDOM (((self ^. js "symbols") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/additiveSymbols MDN CSSCounterStyleRule.additiveSymbols documentation>
setAdditiveSymbols :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setAdditiveSymbols self val = liftDOM (void (self ^. jss "additiveSymbols" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/additiveSymbols MDN CSSCounterStyleRule.additiveSymbols documentation>
getAdditiveSymbols :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getAdditiveSymbols self = liftDOM (((self ^. js "additiveSymbols") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/negative MDN CSSCounterStyleRule.negative documentation>
setNegative :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setNegative self val = liftDOM (void (self ^. jss "negative" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/negative MDN CSSCounterStyleRule.negative documentation>
getNegative :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getNegative self = liftDOM (((self ^. js "negative") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/prefix MDN CSSCounterStyleRule.prefix documentation>
setPrefix :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setPrefix self val = liftDOM (void (self ^. jss "prefix" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/prefix MDN CSSCounterStyleRule.prefix documentation>
getPrefix :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getPrefix self = liftDOM (((self ^. js "prefix") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/suffix MDN CSSCounterStyleRule.suffix documentation>
setSuffix :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setSuffix self val = liftDOM (void (self ^. jss "suffix" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/suffix MDN CSSCounterStyleRule.suffix documentation>
getSuffix :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getSuffix self = liftDOM (((self ^. js "suffix") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/range MDN CSSCounterStyleRule.range documentation>
setRange :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setRange self val = liftDOM (void (self ^. jss "range" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/range MDN CSSCounterStyleRule.range documentation>
getRange :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getRange self = liftDOM (((self ^. js "range") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/pad MDN CSSCounterStyleRule.pad documentation>
setPad :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setPad self val = liftDOM (void (self ^. jss "pad" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/pad MDN CSSCounterStyleRule.pad documentation>
getPad :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getPad self = liftDOM (((self ^. js "pad") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/speakAs MDN CSSCounterStyleRule.speakAs documentation>
setSpeakAs :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setSpeakAs self val = liftDOM (void (self ^. jss "speakAs" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/speakAs MDN CSSCounterStyleRule.speakAs documentation>
getSpeakAs :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getSpeakAs self = liftDOM (((self ^. js "speakAs") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/fallback MDN CSSCounterStyleRule.fallback documentation>
setFallback :: (MonadDOM m, ToJSString val) => CSSCounterStyleRule -> val -> m ()
setFallback self val = liftDOM (void (self ^. jss "fallback" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSCounterStyleRule/fallback MDN CSSCounterStyleRule.fallback documentation>
getFallback :: (MonadDOM m, FromJSString result) => CSSCounterStyleRule -> m result
getFallback self = liftDOM (((self ^. js "fallback") >>= fromJSValUnchecked))