module Stratosphere.AutoScaling.ScheduledAction (
ScheduledAction(..), mkScheduledAction
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ScheduledAction
=
ScheduledAction {ScheduledAction -> ()
haddock_workaround_ :: (),
ScheduledAction -> Value Text
autoScalingGroupName :: (Value Prelude.Text),
ScheduledAction -> Maybe (Value Integer)
desiredCapacity :: (Prelude.Maybe (Value Prelude.Integer)),
ScheduledAction -> Maybe (Value Text)
endTime :: (Prelude.Maybe (Value Prelude.Text)),
ScheduledAction -> Maybe (Value Integer)
maxSize :: (Prelude.Maybe (Value Prelude.Integer)),
ScheduledAction -> Maybe (Value Integer)
minSize :: (Prelude.Maybe (Value Prelude.Integer)),
ScheduledAction -> Maybe (Value Text)
recurrence :: (Prelude.Maybe (Value Prelude.Text)),
ScheduledAction -> Maybe (Value Text)
startTime :: (Prelude.Maybe (Value Prelude.Text)),
ScheduledAction -> Maybe (Value Text)
timeZone :: (Prelude.Maybe (Value Prelude.Text))}
deriving stock (ScheduledAction -> ScheduledAction -> Bool
(ScheduledAction -> ScheduledAction -> Bool)
-> (ScheduledAction -> ScheduledAction -> Bool)
-> Eq ScheduledAction
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScheduledAction -> ScheduledAction -> Bool
== :: ScheduledAction -> ScheduledAction -> Bool
$c/= :: ScheduledAction -> ScheduledAction -> Bool
/= :: ScheduledAction -> ScheduledAction -> Bool
Prelude.Eq, Int -> ScheduledAction -> ShowS
[ScheduledAction] -> ShowS
ScheduledAction -> String
(Int -> ScheduledAction -> ShowS)
-> (ScheduledAction -> String)
-> ([ScheduledAction] -> ShowS)
-> Show ScheduledAction
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ScheduledAction -> ShowS
showsPrec :: Int -> ScheduledAction -> ShowS
$cshow :: ScheduledAction -> String
show :: ScheduledAction -> String
$cshowList :: [ScheduledAction] -> ShowS
showList :: [ScheduledAction] -> ShowS
Prelude.Show)
mkScheduledAction :: Value Prelude.Text -> ScheduledAction
mkScheduledAction :: Value Text -> ScheduledAction
mkScheduledAction Value Text
autoScalingGroupName
= ScheduledAction
{haddock_workaround_ :: ()
haddock_workaround_ = (),
autoScalingGroupName :: Value Text
autoScalingGroupName = Value Text
autoScalingGroupName,
desiredCapacity :: Maybe (Value Integer)
desiredCapacity = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, endTime :: Maybe (Value Text)
endTime = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
maxSize :: Maybe (Value Integer)
maxSize = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, minSize :: Maybe (Value Integer)
minSize = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
recurrence :: Maybe (Value Text)
recurrence = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, startTime :: Maybe (Value Text)
startTime = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
timeZone :: Maybe (Value Text)
timeZone = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ScheduledAction where
toResourceProperties :: ScheduledAction -> ResourceProperties
toResourceProperties ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::AutoScaling::ScheduledAction",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"AutoScalingGroupName" 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..= Value Text
autoScalingGroupName]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DesiredCapacity" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
desiredCapacity,
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
"EndTime" (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)
endTime,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MaxSize" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
maxSize,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MinSize" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
minSize,
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
"Recurrence" (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)
recurrence,
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
"StartTime" (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)
startTime,
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
"TimeZone" (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)
timeZone]))}
instance JSON.ToJSON ScheduledAction where
toJSON :: ScheduledAction -> Value
toJSON ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"AutoScalingGroupName" 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..= Value Text
autoScalingGroupName]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DesiredCapacity" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
desiredCapacity,
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
"EndTime" (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)
endTime,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MaxSize" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
maxSize,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MinSize" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
minSize,
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
"Recurrence" (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)
recurrence,
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
"StartTime" (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)
startTime,
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
"TimeZone" (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)
timeZone])))
instance Property "AutoScalingGroupName" ScheduledAction where
type PropertyType "AutoScalingGroupName" ScheduledAction = Value Prelude.Text
set :: PropertyType "AutoScalingGroupName" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "AutoScalingGroupName" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {autoScalingGroupName :: Value Text
autoScalingGroupName = PropertyType "AutoScalingGroupName" ScheduledAction
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
haddock_workaround_ :: ()
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
instance Property "DesiredCapacity" ScheduledAction where
type PropertyType "DesiredCapacity" ScheduledAction = Value Prelude.Integer
set :: PropertyType "DesiredCapacity" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "DesiredCapacity" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {desiredCapacity :: Maybe (Value Integer)
desiredCapacity = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DesiredCapacity" ScheduledAction
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
instance Property "EndTime" ScheduledAction where
type PropertyType "EndTime" ScheduledAction = Value Prelude.Text
set :: PropertyType "EndTime" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "EndTime" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {endTime :: Maybe (Value Text)
endTime = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EndTime" ScheduledAction
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
instance Property "MaxSize" ScheduledAction where
type PropertyType "MaxSize" ScheduledAction = Value Prelude.Integer
set :: PropertyType "MaxSize" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "MaxSize" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {maxSize :: Maybe (Value Integer)
maxSize = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MaxSize" ScheduledAction
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
instance Property "MinSize" ScheduledAction where
type PropertyType "MinSize" ScheduledAction = Value Prelude.Integer
set :: PropertyType "MinSize" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "MinSize" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {minSize :: Maybe (Value Integer)
minSize = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MinSize" ScheduledAction
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
instance Property "Recurrence" ScheduledAction where
type PropertyType "Recurrence" ScheduledAction = Value Prelude.Text
set :: PropertyType "Recurrence" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "Recurrence" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {recurrence :: Maybe (Value Text)
recurrence = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Recurrence" ScheduledAction
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
instance Property "StartTime" ScheduledAction where
type PropertyType "StartTime" ScheduledAction = Value Prelude.Text
set :: PropertyType "StartTime" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "StartTime" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {startTime :: Maybe (Value Text)
startTime = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "StartTime" ScheduledAction
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
instance Property "TimeZone" ScheduledAction where
type PropertyType "TimeZone" ScheduledAction = Value Prelude.Text
set :: PropertyType "TimeZone" ScheduledAction
-> ScheduledAction -> ScheduledAction
set PropertyType "TimeZone" ScheduledAction
newValue ScheduledAction {Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ScheduledAction -> ()
autoScalingGroupName :: ScheduledAction -> Value Text
desiredCapacity :: ScheduledAction -> Maybe (Value Integer)
endTime :: ScheduledAction -> Maybe (Value Text)
maxSize :: ScheduledAction -> Maybe (Value Integer)
minSize :: ScheduledAction -> Maybe (Value Integer)
recurrence :: ScheduledAction -> Maybe (Value Text)
startTime :: ScheduledAction -> Maybe (Value Text)
timeZone :: ScheduledAction -> Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
timeZone :: Maybe (Value Text)
..}
= ScheduledAction {timeZone :: Maybe (Value Text)
timeZone = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TimeZone" ScheduledAction
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
haddock_workaround_ :: ()
autoScalingGroupName :: Value Text
desiredCapacity :: Maybe (Value Integer)
endTime :: Maybe (Value Text)
maxSize :: Maybe (Value Integer)
minSize :: Maybe (Value Integer)
recurrence :: Maybe (Value Text)
startTime :: Maybe (Value Text)
..}