module Stratosphere.DLM.LifecyclePolicy.ScheduleProperty (
        module Exports, ScheduleProperty(..), mkScheduleProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.DLM.LifecyclePolicy.ArchiveRuleProperty as Exports
import {-# SOURCE #-} Stratosphere.DLM.LifecyclePolicy.CreateRuleProperty as Exports
import {-# SOURCE #-} Stratosphere.DLM.LifecyclePolicy.CrossRegionCopyRuleProperty as Exports
import {-# SOURCE #-} Stratosphere.DLM.LifecyclePolicy.DeprecateRuleProperty as Exports
import {-# SOURCE #-} Stratosphere.DLM.LifecyclePolicy.FastRestoreRuleProperty as Exports
import {-# SOURCE #-} Stratosphere.DLM.LifecyclePolicy.RetainRuleProperty as Exports
import {-# SOURCE #-} Stratosphere.DLM.LifecyclePolicy.ShareRuleProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data ScheduleProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html>
    ScheduleProperty {ScheduleProperty -> ()
haddock_workaround_ :: (),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-archiverule>
                      ScheduleProperty -> Maybe ArchiveRuleProperty
archiveRule :: (Prelude.Maybe ArchiveRuleProperty),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-copytags>
                      ScheduleProperty -> Maybe (Value Bool)
copyTags :: (Prelude.Maybe (Value Prelude.Bool)),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-createrule>
                      ScheduleProperty -> Maybe CreateRuleProperty
createRule :: (Prelude.Maybe CreateRuleProperty),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-crossregioncopyrules>
                      ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
crossRegionCopyRules :: (Prelude.Maybe [CrossRegionCopyRuleProperty]),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-deprecaterule>
                      ScheduleProperty -> Maybe DeprecateRuleProperty
deprecateRule :: (Prelude.Maybe DeprecateRuleProperty),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-fastrestorerule>
                      ScheduleProperty -> Maybe FastRestoreRuleProperty
fastRestoreRule :: (Prelude.Maybe FastRestoreRuleProperty),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-name>
                      ScheduleProperty -> Maybe (Value Text)
name :: (Prelude.Maybe (Value Prelude.Text)),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-retainrule>
                      ScheduleProperty -> Maybe RetainRuleProperty
retainRule :: (Prelude.Maybe RetainRuleProperty),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-sharerules>
                      ScheduleProperty -> Maybe [ShareRuleProperty]
shareRules :: (Prelude.Maybe [ShareRuleProperty]),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-tagstoadd>
                      ScheduleProperty -> Maybe [Tag]
tagsToAdd :: (Prelude.Maybe [Tag]),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dlm-lifecyclepolicy-schedule.html#cfn-dlm-lifecyclepolicy-schedule-variabletags>
                      ScheduleProperty -> Maybe [Tag]
variableTags :: (Prelude.Maybe [Tag])}
  deriving stock (ScheduleProperty -> ScheduleProperty -> Bool
(ScheduleProperty -> ScheduleProperty -> Bool)
-> (ScheduleProperty -> ScheduleProperty -> Bool)
-> Eq ScheduleProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScheduleProperty -> ScheduleProperty -> Bool
== :: ScheduleProperty -> ScheduleProperty -> Bool
$c/= :: ScheduleProperty -> ScheduleProperty -> Bool
/= :: ScheduleProperty -> ScheduleProperty -> Bool
Prelude.Eq, Int -> ScheduleProperty -> ShowS
[ScheduleProperty] -> ShowS
ScheduleProperty -> String
(Int -> ScheduleProperty -> ShowS)
-> (ScheduleProperty -> String)
-> ([ScheduleProperty] -> ShowS)
-> Show ScheduleProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ScheduleProperty -> ShowS
showsPrec :: Int -> ScheduleProperty -> ShowS
$cshow :: ScheduleProperty -> String
show :: ScheduleProperty -> String
$cshowList :: [ScheduleProperty] -> ShowS
showList :: [ScheduleProperty] -> ShowS
Prelude.Show)
mkScheduleProperty :: ScheduleProperty
mkScheduleProperty :: ScheduleProperty
mkScheduleProperty
  = ScheduleProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), archiveRule :: Maybe ArchiveRuleProperty
archiveRule = Maybe ArchiveRuleProperty
forall a. Maybe a
Prelude.Nothing,
       copyTags :: Maybe (Value Bool)
copyTags = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, createRule :: Maybe CreateRuleProperty
createRule = Maybe CreateRuleProperty
forall a. Maybe a
Prelude.Nothing,
       crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
crossRegionCopyRules = Maybe [CrossRegionCopyRuleProperty]
forall a. Maybe a
Prelude.Nothing,
       deprecateRule :: Maybe DeprecateRuleProperty
deprecateRule = Maybe DeprecateRuleProperty
forall a. Maybe a
Prelude.Nothing, fastRestoreRule :: Maybe FastRestoreRuleProperty
fastRestoreRule = Maybe FastRestoreRuleProperty
forall a. Maybe a
Prelude.Nothing,
       name :: Maybe (Value Text)
name = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, retainRule :: Maybe RetainRuleProperty
retainRule = Maybe RetainRuleProperty
forall a. Maybe a
Prelude.Nothing,
       shareRules :: Maybe [ShareRuleProperty]
shareRules = Maybe [ShareRuleProperty]
forall a. Maybe a
Prelude.Nothing, tagsToAdd :: Maybe [Tag]
tagsToAdd = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
       variableTags :: Maybe [Tag]
variableTags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ScheduleProperty where
  toResourceProperties :: ScheduleProperty -> ResourceProperties
toResourceProperties ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::DLM::LifecyclePolicy.Schedule",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> ArchiveRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ArchiveRule" (ArchiveRuleProperty -> (Key, Value))
-> Maybe ArchiveRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ArchiveRuleProperty
archiveRule,
                            Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CopyTags" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
copyTags,
                            Key -> CreateRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CreateRule" (CreateRuleProperty -> (Key, Value))
-> Maybe CreateRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CreateRuleProperty
createRule,
                            Key -> [CrossRegionCopyRuleProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CrossRegionCopyRules" ([CrossRegionCopyRuleProperty] -> (Key, Value))
-> Maybe [CrossRegionCopyRuleProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [CrossRegionCopyRuleProperty]
crossRegionCopyRules,
                            Key -> DeprecateRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DeprecateRule" (DeprecateRuleProperty -> (Key, Value))
-> Maybe DeprecateRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DeprecateRuleProperty
deprecateRule,
                            Key -> FastRestoreRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FastRestoreRule" (FastRestoreRuleProperty -> (Key, Value))
-> Maybe FastRestoreRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FastRestoreRuleProperty
fastRestoreRule,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Name" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
name,
                            Key -> RetainRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RetainRule" (RetainRuleProperty -> (Key, Value))
-> Maybe RetainRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe RetainRuleProperty
retainRule,
                            Key -> [ShareRuleProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ShareRules" ([ShareRuleProperty] -> (Key, Value))
-> Maybe [ShareRuleProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ShareRuleProperty]
shareRules,
                            Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TagsToAdd" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tagsToAdd,
                            Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VariableTags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
variableTags])}
instance JSON.ToJSON ScheduleProperty where
  toJSON :: ScheduleProperty -> Value
toJSON ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> ArchiveRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ArchiveRule" (ArchiveRuleProperty -> (Key, Value))
-> Maybe ArchiveRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ArchiveRuleProperty
archiveRule,
               Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CopyTags" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
copyTags,
               Key -> CreateRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CreateRule" (CreateRuleProperty -> (Key, Value))
-> Maybe CreateRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CreateRuleProperty
createRule,
               Key -> [CrossRegionCopyRuleProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CrossRegionCopyRules" ([CrossRegionCopyRuleProperty] -> (Key, Value))
-> Maybe [CrossRegionCopyRuleProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [CrossRegionCopyRuleProperty]
crossRegionCopyRules,
               Key -> DeprecateRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DeprecateRule" (DeprecateRuleProperty -> (Key, Value))
-> Maybe DeprecateRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DeprecateRuleProperty
deprecateRule,
               Key -> FastRestoreRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FastRestoreRule" (FastRestoreRuleProperty -> (Key, Value))
-> Maybe FastRestoreRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FastRestoreRuleProperty
fastRestoreRule,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Name" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
name,
               Key -> RetainRuleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RetainRule" (RetainRuleProperty -> (Key, Value))
-> Maybe RetainRuleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe RetainRuleProperty
retainRule,
               Key -> [ShareRuleProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ShareRules" ([ShareRuleProperty] -> (Key, Value))
-> Maybe [ShareRuleProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ShareRuleProperty]
shareRules,
               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TagsToAdd" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tagsToAdd,
               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VariableTags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
variableTags]))
instance Property "ArchiveRule" ScheduleProperty where
  type PropertyType "ArchiveRule" ScheduleProperty = ArchiveRuleProperty
  set :: PropertyType "ArchiveRule" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "ArchiveRule" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {archiveRule :: Maybe ArchiveRuleProperty
archiveRule = ArchiveRuleProperty -> Maybe ArchiveRuleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ArchiveRule" ScheduleProperty
ArchiveRuleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "CopyTags" ScheduleProperty where
  type PropertyType "CopyTags" ScheduleProperty = Value Prelude.Bool
  set :: PropertyType "CopyTags" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "CopyTags" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {copyTags :: Maybe (Value Bool)
copyTags = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CopyTags" ScheduleProperty
Value Bool
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "CreateRule" ScheduleProperty where
  type PropertyType "CreateRule" ScheduleProperty = CreateRuleProperty
  set :: PropertyType "CreateRule" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "CreateRule" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {createRule :: Maybe CreateRuleProperty
createRule = CreateRuleProperty -> Maybe CreateRuleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CreateRule" ScheduleProperty
CreateRuleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "CrossRegionCopyRules" ScheduleProperty where
  type PropertyType "CrossRegionCopyRules" ScheduleProperty = [CrossRegionCopyRuleProperty]
  set :: PropertyType "CrossRegionCopyRules" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "CrossRegionCopyRules" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty
        {crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
crossRegionCopyRules = [CrossRegionCopyRuleProperty]
-> Maybe [CrossRegionCopyRuleProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [CrossRegionCopyRuleProperty]
PropertyType "CrossRegionCopyRules" ScheduleProperty
newValue, Maybe [Tag]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "DeprecateRule" ScheduleProperty where
  type PropertyType "DeprecateRule" ScheduleProperty = DeprecateRuleProperty
  set :: PropertyType "DeprecateRule" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "DeprecateRule" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {deprecateRule :: Maybe DeprecateRuleProperty
deprecateRule = DeprecateRuleProperty -> Maybe DeprecateRuleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DeprecateRule" ScheduleProperty
DeprecateRuleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "FastRestoreRule" ScheduleProperty where
  type PropertyType "FastRestoreRule" ScheduleProperty = FastRestoreRuleProperty
  set :: PropertyType "FastRestoreRule" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "FastRestoreRule" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {fastRestoreRule :: Maybe FastRestoreRuleProperty
fastRestoreRule = FastRestoreRuleProperty -> Maybe FastRestoreRuleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FastRestoreRule" ScheduleProperty
FastRestoreRuleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "Name" ScheduleProperty where
  type PropertyType "Name" ScheduleProperty = Value Prelude.Text
  set :: PropertyType "Name" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "Name" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {name :: Maybe (Value Text)
name = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Name" ScheduleProperty
Value Text
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "RetainRule" ScheduleProperty where
  type PropertyType "RetainRule" ScheduleProperty = RetainRuleProperty
  set :: PropertyType "RetainRule" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "RetainRule" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {retainRule :: Maybe RetainRuleProperty
retainRule = RetainRuleProperty -> Maybe RetainRuleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RetainRule" ScheduleProperty
RetainRuleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "ShareRules" ScheduleProperty where
  type PropertyType "ShareRules" ScheduleProperty = [ShareRuleProperty]
  set :: PropertyType "ShareRules" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "ShareRules" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {shareRules :: Maybe [ShareRuleProperty]
shareRules = [ShareRuleProperty] -> Maybe [ShareRuleProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ShareRuleProperty]
PropertyType "ShareRules" ScheduleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
instance Property "TagsToAdd" ScheduleProperty where
  type PropertyType "TagsToAdd" ScheduleProperty = [Tag]
  set :: PropertyType "TagsToAdd" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "TagsToAdd" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {tagsToAdd :: Maybe [Tag]
tagsToAdd = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "TagsToAdd" ScheduleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
variableTags :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
variableTags :: Maybe [Tag]
..}
instance Property "VariableTags" ScheduleProperty where
  type PropertyType "VariableTags" ScheduleProperty = [Tag]
  set :: PropertyType "VariableTags" ScheduleProperty
-> ScheduleProperty -> ScheduleProperty
set PropertyType "VariableTags" ScheduleProperty
newValue ScheduleProperty {Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ScheduleProperty -> ()
archiveRule :: ScheduleProperty -> Maybe ArchiveRuleProperty
copyTags :: ScheduleProperty -> Maybe (Value Bool)
createRule :: ScheduleProperty -> Maybe CreateRuleProperty
crossRegionCopyRules :: ScheduleProperty -> Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: ScheduleProperty -> Maybe DeprecateRuleProperty
fastRestoreRule :: ScheduleProperty -> Maybe FastRestoreRuleProperty
name :: ScheduleProperty -> Maybe (Value Text)
retainRule :: ScheduleProperty -> Maybe RetainRuleProperty
shareRules :: ScheduleProperty -> Maybe [ShareRuleProperty]
tagsToAdd :: ScheduleProperty -> Maybe [Tag]
variableTags :: ScheduleProperty -> Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
variableTags :: Maybe [Tag]
..}
    = ScheduleProperty {variableTags :: Maybe [Tag]
variableTags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "VariableTags" ScheduleProperty
newValue, Maybe [Tag]
Maybe [CrossRegionCopyRuleProperty]
Maybe [ShareRuleProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe DeprecateRuleProperty
Maybe FastRestoreRuleProperty
Maybe RetainRuleProperty
Maybe ArchiveRuleProperty
Maybe CreateRuleProperty
()
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
haddock_workaround_ :: ()
archiveRule :: Maybe ArchiveRuleProperty
copyTags :: Maybe (Value Bool)
createRule :: Maybe CreateRuleProperty
crossRegionCopyRules :: Maybe [CrossRegionCopyRuleProperty]
deprecateRule :: Maybe DeprecateRuleProperty
fastRestoreRule :: Maybe FastRestoreRuleProperty
name :: Maybe (Value Text)
retainRule :: Maybe RetainRuleProperty
shareRules :: Maybe [ShareRuleProperty]
tagsToAdd :: Maybe [Tag]
..}