module Stratosphere.GameLift.GameServerGroup (
        module Exports, GameServerGroup(..), mkGameServerGroup
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.GameLift.GameServerGroup.AutoScalingPolicyProperty as Exports
import {-# SOURCE #-} Stratosphere.GameLift.GameServerGroup.InstanceDefinitionProperty as Exports
import {-# SOURCE #-} Stratosphere.GameLift.GameServerGroup.LaunchTemplateProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data GameServerGroup
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html>
    GameServerGroup {GameServerGroup -> ()
haddock_workaround_ :: (),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-autoscalingpolicy>
                     GameServerGroup -> Maybe AutoScalingPolicyProperty
autoScalingPolicy :: (Prelude.Maybe AutoScalingPolicyProperty),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-balancingstrategy>
                     GameServerGroup -> Maybe (Value Text)
balancingStrategy :: (Prelude.Maybe (Value Prelude.Text)),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-deleteoption>
                     GameServerGroup -> Maybe (Value Text)
deleteOption :: (Prelude.Maybe (Value Prelude.Text)),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-gameservergroupname>
                     GameServerGroup -> Value Text
gameServerGroupName :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-gameserverprotectionpolicy>
                     GameServerGroup -> Maybe (Value Text)
gameServerProtectionPolicy :: (Prelude.Maybe (Value Prelude.Text)),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-instancedefinitions>
                     GameServerGroup -> [InstanceDefinitionProperty]
instanceDefinitions :: [InstanceDefinitionProperty],
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-launchtemplate>
                     GameServerGroup -> Maybe LaunchTemplateProperty
launchTemplate :: (Prelude.Maybe LaunchTemplateProperty),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-maxsize>
                     GameServerGroup -> Maybe (Value Double)
maxSize :: (Prelude.Maybe (Value Prelude.Double)),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-minsize>
                     GameServerGroup -> Maybe (Value Double)
minSize :: (Prelude.Maybe (Value Prelude.Double)),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-rolearn>
                     GameServerGroup -> Value Text
roleArn :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-tags>
                     GameServerGroup -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-gamelift-gameservergroup.html#cfn-gamelift-gameservergroup-vpcsubnets>
                     GameServerGroup -> Maybe (ValueList Text)
vpcSubnets :: (Prelude.Maybe (ValueList Prelude.Text))}
  deriving stock (GameServerGroup -> GameServerGroup -> Bool
(GameServerGroup -> GameServerGroup -> Bool)
-> (GameServerGroup -> GameServerGroup -> Bool)
-> Eq GameServerGroup
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GameServerGroup -> GameServerGroup -> Bool
== :: GameServerGroup -> GameServerGroup -> Bool
$c/= :: GameServerGroup -> GameServerGroup -> Bool
/= :: GameServerGroup -> GameServerGroup -> Bool
Prelude.Eq, Int -> GameServerGroup -> ShowS
[GameServerGroup] -> ShowS
GameServerGroup -> String
(Int -> GameServerGroup -> ShowS)
-> (GameServerGroup -> String)
-> ([GameServerGroup] -> ShowS)
-> Show GameServerGroup
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> GameServerGroup -> ShowS
showsPrec :: Int -> GameServerGroup -> ShowS
$cshow :: GameServerGroup -> String
show :: GameServerGroup -> String
$cshowList :: [GameServerGroup] -> ShowS
showList :: [GameServerGroup] -> ShowS
Prelude.Show)
mkGameServerGroup ::
  Value Prelude.Text
  -> [InstanceDefinitionProperty]
     -> Value Prelude.Text -> GameServerGroup
mkGameServerGroup :: Value Text
-> [InstanceDefinitionProperty] -> Value Text -> GameServerGroup
mkGameServerGroup Value Text
gameServerGroupName [InstanceDefinitionProperty]
instanceDefinitions Value Text
roleArn
  = GameServerGroup
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       gameServerGroupName :: Value Text
gameServerGroupName = Value Text
gameServerGroupName,
       instanceDefinitions :: [InstanceDefinitionProperty]
instanceDefinitions = [InstanceDefinitionProperty]
instanceDefinitions, roleArn :: Value Text
roleArn = Value Text
roleArn,
       autoScalingPolicy :: Maybe AutoScalingPolicyProperty
autoScalingPolicy = Maybe AutoScalingPolicyProperty
forall a. Maybe a
Prelude.Nothing,
       balancingStrategy :: Maybe (Value Text)
balancingStrategy = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       deleteOption :: Maybe (Value Text)
deleteOption = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       gameServerProtectionPolicy :: Maybe (Value Text)
gameServerProtectionPolicy = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       launchTemplate :: Maybe LaunchTemplateProperty
launchTemplate = Maybe LaunchTemplateProperty
forall a. Maybe a
Prelude.Nothing, maxSize :: Maybe (Value Double)
maxSize = Maybe (Value Double)
forall a. Maybe a
Prelude.Nothing,
       minSize :: Maybe (Value Double)
minSize = Maybe (Value Double)
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
       vpcSubnets :: Maybe (ValueList Text)
vpcSubnets = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties GameServerGroup where
  toResourceProperties :: GameServerGroup -> ResourceProperties
toResourceProperties GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::GameLift::GameServerGroup",
         supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         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
"GameServerGroupName" 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
gameServerGroupName,
                            Key
"InstanceDefinitions" Key -> [InstanceDefinitionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [InstanceDefinitionProperty]
instanceDefinitions,
                            Key
"RoleArn" 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
roleArn]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> AutoScalingPolicyProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoScalingPolicy" (AutoScalingPolicyProperty -> (Key, Value))
-> Maybe AutoScalingPolicyProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AutoScalingPolicyProperty
autoScalingPolicy,
                               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
"BalancingStrategy" (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)
balancingStrategy,
                               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
"DeleteOption" (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)
deleteOption,
                               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
"GameServerProtectionPolicy"
                                 (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)
gameServerProtectionPolicy,
                               Key -> LaunchTemplateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LaunchTemplate" (LaunchTemplateProperty -> (Key, Value))
-> Maybe LaunchTemplateProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LaunchTemplateProperty
launchTemplate,
                               Key -> Value Double -> (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 Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
maxSize,
                               Key -> Value Double -> (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 Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
minSize,
                               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,
                               Key -> ValueList 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
"VpcSubnets" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
vpcSubnets]))}
instance JSON.ToJSON GameServerGroup where
  toJSON :: GameServerGroup -> Value
toJSON GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList 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
"GameServerGroupName" 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
gameServerGroupName,
               Key
"InstanceDefinitions" Key -> [InstanceDefinitionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [InstanceDefinitionProperty]
instanceDefinitions,
               Key
"RoleArn" 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
roleArn]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> AutoScalingPolicyProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoScalingPolicy" (AutoScalingPolicyProperty -> (Key, Value))
-> Maybe AutoScalingPolicyProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AutoScalingPolicyProperty
autoScalingPolicy,
                  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
"BalancingStrategy" (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)
balancingStrategy,
                  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
"DeleteOption" (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)
deleteOption,
                  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
"GameServerProtectionPolicy"
                    (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)
gameServerProtectionPolicy,
                  Key -> LaunchTemplateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LaunchTemplate" (LaunchTemplateProperty -> (Key, Value))
-> Maybe LaunchTemplateProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LaunchTemplateProperty
launchTemplate,
                  Key -> Value Double -> (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 Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
maxSize,
                  Key -> Value Double -> (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 Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
minSize,
                  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,
                  Key -> ValueList 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
"VpcSubnets" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
vpcSubnets])))
instance Property "AutoScalingPolicy" GameServerGroup where
  type PropertyType "AutoScalingPolicy" GameServerGroup = AutoScalingPolicyProperty
  set :: PropertyType "AutoScalingPolicy" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "AutoScalingPolicy" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {autoScalingPolicy :: Maybe AutoScalingPolicyProperty
autoScalingPolicy = AutoScalingPolicyProperty -> Maybe AutoScalingPolicyProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AutoScalingPolicy" GameServerGroup
AutoScalingPolicyProperty
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
()
Value Text
haddock_workaround_ :: ()
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "BalancingStrategy" GameServerGroup where
  type PropertyType "BalancingStrategy" GameServerGroup = Value Prelude.Text
  set :: PropertyType "BalancingStrategy" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "BalancingStrategy" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {balancingStrategy :: Maybe (Value Text)
balancingStrategy = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "BalancingStrategy" GameServerGroup
Value Text
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "DeleteOption" GameServerGroup where
  type PropertyType "DeleteOption" GameServerGroup = Value Prelude.Text
  set :: PropertyType "DeleteOption" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "DeleteOption" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {deleteOption :: Maybe (Value Text)
deleteOption = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DeleteOption" GameServerGroup
Value Text
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "GameServerGroupName" GameServerGroup where
  type PropertyType "GameServerGroupName" GameServerGroup = Value Prelude.Text
  set :: PropertyType "GameServerGroupName" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "GameServerGroupName" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {gameServerGroupName :: Value Text
gameServerGroupName = PropertyType "GameServerGroupName" GameServerGroup
Value Text
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "GameServerProtectionPolicy" GameServerGroup where
  type PropertyType "GameServerProtectionPolicy" GameServerGroup = Value Prelude.Text
  set :: PropertyType "GameServerProtectionPolicy" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "GameServerProtectionPolicy" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup
        {gameServerProtectionPolicy :: Maybe (Value Text)
gameServerProtectionPolicy = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GameServerProtectionPolicy" GameServerGroup
Value Text
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "InstanceDefinitions" GameServerGroup where
  type PropertyType "InstanceDefinitions" GameServerGroup = [InstanceDefinitionProperty]
  set :: PropertyType "InstanceDefinitions" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "InstanceDefinitions" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {instanceDefinitions :: [InstanceDefinitionProperty]
instanceDefinitions = [InstanceDefinitionProperty]
PropertyType "InstanceDefinitions" GameServerGroup
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "LaunchTemplate" GameServerGroup where
  type PropertyType "LaunchTemplate" GameServerGroup = LaunchTemplateProperty
  set :: PropertyType "LaunchTemplate" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "LaunchTemplate" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {launchTemplate :: Maybe LaunchTemplateProperty
launchTemplate = LaunchTemplateProperty -> Maybe LaunchTemplateProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LaunchTemplate" GameServerGroup
LaunchTemplateProperty
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "MaxSize" GameServerGroup where
  type PropertyType "MaxSize" GameServerGroup = Value Prelude.Double
  set :: PropertyType "MaxSize" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "MaxSize" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {maxSize :: Maybe (Value Double)
maxSize = Value Double -> Maybe (Value Double)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MaxSize" GameServerGroup
Value Double
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "MinSize" GameServerGroup where
  type PropertyType "MinSize" GameServerGroup = Value Prelude.Double
  set :: PropertyType "MinSize" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "MinSize" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {minSize :: Maybe (Value Double)
minSize = Value Double -> Maybe (Value Double)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MinSize" GameServerGroup
Value Double
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "RoleArn" GameServerGroup where
  type PropertyType "RoleArn" GameServerGroup = Value Prelude.Text
  set :: PropertyType "RoleArn" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "RoleArn" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {roleArn :: Value Text
roleArn = PropertyType "RoleArn" GameServerGroup
Value Text
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "Tags" GameServerGroup where
  type PropertyType "Tags" GameServerGroup = [Tag]
  set :: PropertyType "Tags" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "Tags" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {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" GameServerGroup
newValue, [InstanceDefinitionProperty]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
vpcSubnets :: Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
vpcSubnets :: Maybe (ValueList Text)
..}
instance Property "VpcSubnets" GameServerGroup where
  type PropertyType "VpcSubnets" GameServerGroup = ValueList Prelude.Text
  set :: PropertyType "VpcSubnets" GameServerGroup
-> GameServerGroup -> GameServerGroup
set PropertyType "VpcSubnets" GameServerGroup
newValue GameServerGroup {[InstanceDefinitionProperty]
Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: GameServerGroup -> ()
autoScalingPolicy :: GameServerGroup -> Maybe AutoScalingPolicyProperty
balancingStrategy :: GameServerGroup -> Maybe (Value Text)
deleteOption :: GameServerGroup -> Maybe (Value Text)
gameServerGroupName :: GameServerGroup -> Value Text
gameServerProtectionPolicy :: GameServerGroup -> Maybe (Value Text)
instanceDefinitions :: GameServerGroup -> [InstanceDefinitionProperty]
launchTemplate :: GameServerGroup -> Maybe LaunchTemplateProperty
maxSize :: GameServerGroup -> Maybe (Value Double)
minSize :: GameServerGroup -> Maybe (Value Double)
roleArn :: GameServerGroup -> Value Text
tags :: GameServerGroup -> Maybe [Tag]
vpcSubnets :: GameServerGroup -> Maybe (ValueList Text)
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
vpcSubnets :: Maybe (ValueList Text)
..}
    = GameServerGroup {vpcSubnets :: Maybe (ValueList Text)
vpcSubnets = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VpcSubnets" GameServerGroup
ValueList Text
newValue, [InstanceDefinitionProperty]
Maybe [Tag]
Maybe (Value Double)
Maybe (Value Text)
Maybe LaunchTemplateProperty
Maybe AutoScalingPolicyProperty
()
Value Text
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
autoScalingPolicy :: Maybe AutoScalingPolicyProperty
balancingStrategy :: Maybe (Value Text)
deleteOption :: Maybe (Value Text)
gameServerGroupName :: Value Text
gameServerProtectionPolicy :: Maybe (Value Text)
instanceDefinitions :: [InstanceDefinitionProperty]
launchTemplate :: Maybe LaunchTemplateProperty
maxSize :: Maybe (Value Double)
minSize :: Maybe (Value Double)
roleArn :: Value Text
tags :: Maybe [Tag]
..}