module Stratosphere.OpsWorks.Instance.TimeBasedAutoScalingProperty (
        TimeBasedAutoScalingProperty(..), mkTimeBasedAutoScalingProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data TimeBasedAutoScalingProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html>
    TimeBasedAutoScalingProperty {TimeBasedAutoScalingProperty -> ()
haddock_workaround_ :: (),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html#cfn-opsworks-instance-timebasedautoscaling-friday>
                                  TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
friday :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html#cfn-opsworks-instance-timebasedautoscaling-monday>
                                  TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html#cfn-opsworks-instance-timebasedautoscaling-saturday>
                                  TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html#cfn-opsworks-instance-timebasedautoscaling-sunday>
                                  TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html#cfn-opsworks-instance-timebasedautoscaling-thursday>
                                  TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html#cfn-opsworks-instance-timebasedautoscaling-tuesday>
                                  TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opsworks-instance-timebasedautoscaling.html#cfn-opsworks-instance-timebasedautoscaling-wednesday>
                                  TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text)))}
  deriving stock (TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> Bool
(TimeBasedAutoScalingProperty
 -> TimeBasedAutoScalingProperty -> Bool)
-> (TimeBasedAutoScalingProperty
    -> TimeBasedAutoScalingProperty -> Bool)
-> Eq TimeBasedAutoScalingProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> Bool
== :: TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> Bool
$c/= :: TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> Bool
/= :: TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> Bool
Prelude.Eq, Int -> TimeBasedAutoScalingProperty -> ShowS
[TimeBasedAutoScalingProperty] -> ShowS
TimeBasedAutoScalingProperty -> String
(Int -> TimeBasedAutoScalingProperty -> ShowS)
-> (TimeBasedAutoScalingProperty -> String)
-> ([TimeBasedAutoScalingProperty] -> ShowS)
-> Show TimeBasedAutoScalingProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TimeBasedAutoScalingProperty -> ShowS
showsPrec :: Int -> TimeBasedAutoScalingProperty -> ShowS
$cshow :: TimeBasedAutoScalingProperty -> String
show :: TimeBasedAutoScalingProperty -> String
$cshowList :: [TimeBasedAutoScalingProperty] -> ShowS
showList :: [TimeBasedAutoScalingProperty] -> ShowS
Prelude.Show)
mkTimeBasedAutoScalingProperty :: TimeBasedAutoScalingProperty
mkTimeBasedAutoScalingProperty :: TimeBasedAutoScalingProperty
mkTimeBasedAutoScalingProperty
  = TimeBasedAutoScalingProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), friday :: Maybe (Map Text (Value Text))
friday = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
       monday :: Maybe (Map Text (Value Text))
monday = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing, saturday :: Maybe (Map Text (Value Text))
saturday = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
       sunday :: Maybe (Map Text (Value Text))
sunday = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing, thursday :: Maybe (Map Text (Value Text))
thursday = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
       tuesday :: Maybe (Map Text (Value Text))
tuesday = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing, wednesday :: Maybe (Map Text (Value Text))
wednesday = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties TimeBasedAutoScalingProperty where
  toResourceProperties :: TimeBasedAutoScalingProperty -> ResourceProperties
toResourceProperties TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::OpsWorks::Instance.TimeBasedAutoScaling",
         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 -> Map Text (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
"Friday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
friday,
                            Key -> Map Text (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
"Monday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
monday,
                            Key -> Map Text (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
"Saturday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
saturday,
                            Key -> Map Text (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
"Sunday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
sunday,
                            Key -> Map Text (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
"Thursday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
thursday,
                            Key -> Map Text (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
"Tuesday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
tuesday,
                            Key -> Map Text (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
"Wednesday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
wednesday])}
instance JSON.ToJSON TimeBasedAutoScalingProperty where
  toJSON :: TimeBasedAutoScalingProperty -> Value
toJSON TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = [(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 -> Map Text (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
"Friday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
friday,
               Key -> Map Text (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
"Monday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
monday,
               Key -> Map Text (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
"Saturday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
saturday,
               Key -> Map Text (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
"Sunday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
sunday,
               Key -> Map Text (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
"Thursday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
thursday,
               Key -> Map Text (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
"Tuesday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
tuesday,
               Key -> Map Text (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
"Wednesday" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
wednesday]))
instance Property "Friday" TimeBasedAutoScalingProperty where
  type PropertyType "Friday" TimeBasedAutoScalingProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Friday" TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> TimeBasedAutoScalingProperty
set PropertyType "Friday" TimeBasedAutoScalingProperty
newValue TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = TimeBasedAutoScalingProperty {friday :: Maybe (Map Text (Value Text))
friday = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Friday" TimeBasedAutoScalingProperty
newValue, Maybe (Map Text (Value Text))
()
haddock_workaround_ :: ()
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
instance Property "Monday" TimeBasedAutoScalingProperty where
  type PropertyType "Monday" TimeBasedAutoScalingProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Monday" TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> TimeBasedAutoScalingProperty
set PropertyType "Monday" TimeBasedAutoScalingProperty
newValue TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = TimeBasedAutoScalingProperty {monday :: Maybe (Map Text (Value Text))
monday = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Monday" TimeBasedAutoScalingProperty
newValue, Maybe (Map Text (Value Text))
()
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
instance Property "Saturday" TimeBasedAutoScalingProperty where
  type PropertyType "Saturday" TimeBasedAutoScalingProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Saturday" TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> TimeBasedAutoScalingProperty
set PropertyType "Saturday" TimeBasedAutoScalingProperty
newValue TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = TimeBasedAutoScalingProperty
        {saturday :: Maybe (Map Text (Value Text))
saturday = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Saturday" TimeBasedAutoScalingProperty
newValue, Maybe (Map Text (Value Text))
()
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
instance Property "Sunday" TimeBasedAutoScalingProperty where
  type PropertyType "Sunday" TimeBasedAutoScalingProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Sunday" TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> TimeBasedAutoScalingProperty
set PropertyType "Sunday" TimeBasedAutoScalingProperty
newValue TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = TimeBasedAutoScalingProperty {sunday :: Maybe (Map Text (Value Text))
sunday = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Sunday" TimeBasedAutoScalingProperty
newValue, Maybe (Map Text (Value Text))
()
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
instance Property "Thursday" TimeBasedAutoScalingProperty where
  type PropertyType "Thursday" TimeBasedAutoScalingProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Thursday" TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> TimeBasedAutoScalingProperty
set PropertyType "Thursday" TimeBasedAutoScalingProperty
newValue TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = TimeBasedAutoScalingProperty
        {thursday :: Maybe (Map Text (Value Text))
thursday = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Thursday" TimeBasedAutoScalingProperty
newValue, Maybe (Map Text (Value Text))
()
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
instance Property "Tuesday" TimeBasedAutoScalingProperty where
  type PropertyType "Tuesday" TimeBasedAutoScalingProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Tuesday" TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> TimeBasedAutoScalingProperty
set PropertyType "Tuesday" TimeBasedAutoScalingProperty
newValue TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = TimeBasedAutoScalingProperty
        {tuesday :: Maybe (Map Text (Value Text))
tuesday = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Tuesday" TimeBasedAutoScalingProperty
newValue, Maybe (Map Text (Value Text))
()
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
instance Property "Wednesday" TimeBasedAutoScalingProperty where
  type PropertyType "Wednesday" TimeBasedAutoScalingProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Wednesday" TimeBasedAutoScalingProperty
-> TimeBasedAutoScalingProperty -> TimeBasedAutoScalingProperty
set PropertyType "Wednesday" TimeBasedAutoScalingProperty
newValue TimeBasedAutoScalingProperty {Maybe (Map Text (Value Text))
()
haddock_workaround_ :: TimeBasedAutoScalingProperty -> ()
friday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
monday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
saturday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
sunday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
thursday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
tuesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
wednesday :: TimeBasedAutoScalingProperty -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
wednesday :: Maybe (Map Text (Value Text))
..}
    = TimeBasedAutoScalingProperty
        {wednesday :: Maybe (Map Text (Value Text))
wednesday = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Wednesday" TimeBasedAutoScalingProperty
newValue, Maybe (Map Text (Value Text))
()
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
friday :: Maybe (Map Text (Value Text))
monday :: Maybe (Map Text (Value Text))
saturday :: Maybe (Map Text (Value Text))
sunday :: Maybe (Map Text (Value Text))
thursday :: Maybe (Map Text (Value Text))
tuesday :: Maybe (Map Text (Value Text))
..}