module Stratosphere.CodeBuild.Fleet (
module Exports, Fleet(..), mkFleet
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.CodeBuild.Fleet.ComputeConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.CodeBuild.Fleet.ProxyConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.CodeBuild.Fleet.ScalingConfigurationInputProperty as Exports
import {-# SOURCE #-} Stratosphere.CodeBuild.Fleet.VpcConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data Fleet
=
Fleet {Fleet -> ()
haddock_workaround_ :: (),
Fleet -> Maybe (Value Integer)
baseCapacity :: (Prelude.Maybe (Value Prelude.Integer)),
Fleet -> Maybe ComputeConfigurationProperty
computeConfiguration :: (Prelude.Maybe ComputeConfigurationProperty),
Fleet -> Maybe (Value Text)
computeType :: (Prelude.Maybe (Value Prelude.Text)),
Fleet -> Maybe (Value Text)
environmentType :: (Prelude.Maybe (Value Prelude.Text)),
Fleet -> Maybe ProxyConfigurationProperty
fleetProxyConfiguration :: (Prelude.Maybe ProxyConfigurationProperty),
Fleet -> Maybe (Value Text)
fleetServiceRole :: (Prelude.Maybe (Value Prelude.Text)),
Fleet -> Maybe VpcConfigProperty
fleetVpcConfig :: (Prelude.Maybe VpcConfigProperty),
Fleet -> Maybe (Value Text)
imageId :: (Prelude.Maybe (Value Prelude.Text)),
Fleet -> Maybe (Value Text)
name :: (Prelude.Maybe (Value Prelude.Text)),
Fleet -> Maybe (Value Text)
overflowBehavior :: (Prelude.Maybe (Value Prelude.Text)),
Fleet -> Maybe ScalingConfigurationInputProperty
scalingConfiguration :: (Prelude.Maybe ScalingConfigurationInputProperty),
Fleet -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag])}
deriving stock (Fleet -> Fleet -> Bool
(Fleet -> Fleet -> Bool) -> (Fleet -> Fleet -> Bool) -> Eq Fleet
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Fleet -> Fleet -> Bool
== :: Fleet -> Fleet -> Bool
$c/= :: Fleet -> Fleet -> Bool
/= :: Fleet -> Fleet -> Bool
Prelude.Eq, Int -> Fleet -> ShowS
[Fleet] -> ShowS
Fleet -> String
(Int -> Fleet -> ShowS)
-> (Fleet -> String) -> ([Fleet] -> ShowS) -> Show Fleet
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Fleet -> ShowS
showsPrec :: Int -> Fleet -> ShowS
$cshow :: Fleet -> String
show :: Fleet -> String
$cshowList :: [Fleet] -> ShowS
showList :: [Fleet] -> ShowS
Prelude.Show)
mkFleet :: Fleet
mkFleet :: Fleet
mkFleet
= Fleet
{haddock_workaround_ :: ()
haddock_workaround_ = (), baseCapacity :: Maybe (Value Integer)
baseCapacity = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
computeConfiguration :: Maybe ComputeConfigurationProperty
computeConfiguration = Maybe ComputeConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
computeType :: Maybe (Value Text)
computeType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, environmentType :: Maybe (Value Text)
environmentType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetProxyConfiguration = Maybe ProxyConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
fleetServiceRole :: Maybe (Value Text)
fleetServiceRole = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
fleetVpcConfig :: Maybe VpcConfigProperty
fleetVpcConfig = Maybe VpcConfigProperty
forall a. Maybe a
Prelude.Nothing, imageId :: Maybe (Value Text)
imageId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
name :: Maybe (Value Text)
name = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, overflowBehavior :: Maybe (Value Text)
overflowBehavior = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
scalingConfiguration = Maybe ScalingConfigurationInputProperty
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Fleet where
toResourceProperties :: Fleet -> ResourceProperties
toResourceProperties Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::CodeBuild::Fleet", supportsTags :: Bool
supportsTags = Bool
Prelude.True,
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 -> 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
"BaseCapacity" (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)
baseCapacity,
Key -> ComputeConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ComputeConfiguration" (ComputeConfigurationProperty -> (Key, Value))
-> Maybe ComputeConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ComputeConfigurationProperty
computeConfiguration,
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
"ComputeType" (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)
computeType,
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
"EnvironmentType" (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)
environmentType,
Key -> ProxyConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FleetProxyConfiguration"
(ProxyConfigurationProperty -> (Key, Value))
-> Maybe ProxyConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ProxyConfigurationProperty
fleetProxyConfiguration,
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
"FleetServiceRole" (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)
fleetServiceRole,
Key -> VpcConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FleetVpcConfig" (VpcConfigProperty -> (Key, Value))
-> Maybe VpcConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VpcConfigProperty
fleetVpcConfig,
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
"ImageId" (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)
imageId,
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 -> 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
"OverflowBehavior" (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)
overflowBehavior,
Key -> ScalingConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ScalingConfiguration" (ScalingConfigurationInputProperty -> (Key, Value))
-> Maybe ScalingConfigurationInputProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScalingConfigurationInputProperty
scalingConfiguration,
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
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags])}
instance JSON.ToJSON Fleet where
toJSON :: Fleet -> Value
toJSON Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: 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 -> 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
"BaseCapacity" (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)
baseCapacity,
Key -> ComputeConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ComputeConfiguration" (ComputeConfigurationProperty -> (Key, Value))
-> Maybe ComputeConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ComputeConfigurationProperty
computeConfiguration,
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
"ComputeType" (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)
computeType,
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
"EnvironmentType" (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)
environmentType,
Key -> ProxyConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FleetProxyConfiguration"
(ProxyConfigurationProperty -> (Key, Value))
-> Maybe ProxyConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ProxyConfigurationProperty
fleetProxyConfiguration,
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
"FleetServiceRole" (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)
fleetServiceRole,
Key -> VpcConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FleetVpcConfig" (VpcConfigProperty -> (Key, Value))
-> Maybe VpcConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VpcConfigProperty
fleetVpcConfig,
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
"ImageId" (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)
imageId,
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 -> 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
"OverflowBehavior" (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)
overflowBehavior,
Key -> ScalingConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ScalingConfiguration" (ScalingConfigurationInputProperty -> (Key, Value))
-> Maybe ScalingConfigurationInputProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScalingConfigurationInputProperty
scalingConfiguration,
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
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags]))
instance Property "BaseCapacity" Fleet where
type PropertyType "BaseCapacity" Fleet = Value Prelude.Integer
set :: PropertyType "BaseCapacity" Fleet -> Fleet -> Fleet
set PropertyType "BaseCapacity" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {baseCapacity :: Maybe (Value Integer)
baseCapacity = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "BaseCapacity" Fleet
Value Integer
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "ComputeConfiguration" Fleet where
type PropertyType "ComputeConfiguration" Fleet = ComputeConfigurationProperty
set :: PropertyType "ComputeConfiguration" Fleet -> Fleet -> Fleet
set PropertyType "ComputeConfiguration" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {computeConfiguration :: Maybe ComputeConfigurationProperty
computeConfiguration = ComputeConfigurationProperty -> Maybe ComputeConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ComputeConfiguration" Fleet
ComputeConfigurationProperty
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "ComputeType" Fleet where
type PropertyType "ComputeType" Fleet = Value Prelude.Text
set :: PropertyType "ComputeType" Fleet -> Fleet -> Fleet
set PropertyType "ComputeType" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {computeType :: Maybe (Value Text)
computeType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ComputeType" Fleet
Value Text
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "EnvironmentType" Fleet where
type PropertyType "EnvironmentType" Fleet = Value Prelude.Text
set :: PropertyType "EnvironmentType" Fleet -> Fleet -> Fleet
set PropertyType "EnvironmentType" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {environmentType :: Maybe (Value Text)
environmentType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnvironmentType" Fleet
Value Text
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "FleetProxyConfiguration" Fleet where
type PropertyType "FleetProxyConfiguration" Fleet = ProxyConfigurationProperty
set :: PropertyType "FleetProxyConfiguration" Fleet -> Fleet -> Fleet
set PropertyType "FleetProxyConfiguration" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetProxyConfiguration = ProxyConfigurationProperty -> Maybe ProxyConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FleetProxyConfiguration" Fleet
ProxyConfigurationProperty
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "FleetServiceRole" Fleet where
type PropertyType "FleetServiceRole" Fleet = Value Prelude.Text
set :: PropertyType "FleetServiceRole" Fleet -> Fleet -> Fleet
set PropertyType "FleetServiceRole" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {fleetServiceRole :: Maybe (Value Text)
fleetServiceRole = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FleetServiceRole" Fleet
Value Text
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "FleetVpcConfig" Fleet where
type PropertyType "FleetVpcConfig" Fleet = VpcConfigProperty
set :: PropertyType "FleetVpcConfig" Fleet -> Fleet -> Fleet
set PropertyType "FleetVpcConfig" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {fleetVpcConfig :: Maybe VpcConfigProperty
fleetVpcConfig = VpcConfigProperty -> Maybe VpcConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FleetVpcConfig" Fleet
VpcConfigProperty
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "ImageId" Fleet where
type PropertyType "ImageId" Fleet = Value Prelude.Text
set :: PropertyType "ImageId" Fleet -> Fleet -> Fleet
set PropertyType "ImageId" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {imageId :: Maybe (Value Text)
imageId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ImageId" Fleet
Value Text
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "Name" Fleet where
type PropertyType "Name" Fleet = Value Prelude.Text
set :: PropertyType "Name" Fleet -> Fleet -> Fleet
set PropertyType "Name" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..} = Fleet {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" Fleet
Value Text
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "OverflowBehavior" Fleet where
type PropertyType "OverflowBehavior" Fleet = Value Prelude.Text
set :: PropertyType "OverflowBehavior" Fleet -> Fleet -> Fleet
set PropertyType "OverflowBehavior" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {overflowBehavior :: Maybe (Value Text)
overflowBehavior = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "OverflowBehavior" Fleet
Value Text
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
instance Property "ScalingConfiguration" Fleet where
type PropertyType "ScalingConfiguration" Fleet = ScalingConfigurationInputProperty
set :: PropertyType "ScalingConfiguration" Fleet -> Fleet -> Fleet
set PropertyType "ScalingConfiguration" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..}
= Fleet {scalingConfiguration :: Maybe ScalingConfigurationInputProperty
scalingConfiguration = ScalingConfigurationInputProperty
-> Maybe ScalingConfigurationInputProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ScalingConfiguration" Fleet
ScalingConfigurationInputProperty
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "Tags" Fleet where
type PropertyType "Tags" Fleet = [Tag]
set :: PropertyType "Tags" Fleet -> Fleet -> Fleet
set PropertyType "Tags" Fleet
newValue Fleet {Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: Fleet -> ()
baseCapacity :: Fleet -> Maybe (Value Integer)
computeConfiguration :: Fleet -> Maybe ComputeConfigurationProperty
computeType :: Fleet -> Maybe (Value Text)
environmentType :: Fleet -> Maybe (Value Text)
fleetProxyConfiguration :: Fleet -> Maybe ProxyConfigurationProperty
fleetServiceRole :: Fleet -> Maybe (Value Text)
fleetVpcConfig :: Fleet -> Maybe VpcConfigProperty
imageId :: Fleet -> Maybe (Value Text)
name :: Fleet -> Maybe (Value Text)
overflowBehavior :: Fleet -> Maybe (Value Text)
scalingConfiguration :: Fleet -> Maybe ScalingConfigurationInputProperty
tags :: Fleet -> Maybe [Tag]
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
tags :: Maybe [Tag]
..} = Fleet {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" Fleet
newValue, Maybe (Value Integer)
Maybe (Value Text)
Maybe ComputeConfigurationProperty
Maybe ProxyConfigurationProperty
Maybe ScalingConfigurationInputProperty
Maybe VpcConfigProperty
()
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
haddock_workaround_ :: ()
baseCapacity :: Maybe (Value Integer)
computeConfiguration :: Maybe ComputeConfigurationProperty
computeType :: Maybe (Value Text)
environmentType :: Maybe (Value Text)
fleetProxyConfiguration :: Maybe ProxyConfigurationProperty
fleetServiceRole :: Maybe (Value Text)
fleetVpcConfig :: Maybe VpcConfigProperty
imageId :: Maybe (Value Text)
name :: Maybe (Value Text)
overflowBehavior :: Maybe (Value Text)
scalingConfiguration :: Maybe ScalingConfigurationInputProperty
..}