{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.Batch.Types.ComputeResource -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.Batch.Types.ComputeResource where import Amazonka.Batch.Types.CRAllocationStrategy import Amazonka.Batch.Types.CRType import Amazonka.Batch.Types.Ec2Configuration import Amazonka.Batch.Types.LaunchTemplateSpecification import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude -- | An object that represents an Batch compute resource. For more -- information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/compute_environments.html Compute environments> -- in the /Batch User Guide/. -- -- /See:/ 'newComputeResource' smart constructor. data ComputeResource = ComputeResource' { -- | The allocation strategy to use for the compute resource if not enough -- instances of the best fitting instance type can be allocated. This might -- be because of availability of the instance type in the Region or -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/ec2-resource-limits.html Amazon EC2 service limits>. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/allocation-strategies.html Allocation strategies> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- [BEST_FIT (default)] -- Batch selects an instance type that best fits the needs of the jobs -- with a preference for the lowest-cost instance type. If additional -- instances of the selected instance type aren\'t available, Batch -- waits for the additional instances to be available. If there aren\'t -- enough instances available or the user is reaching -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/ec2-resource-limits.html Amazon EC2 service limits>, -- additional jobs aren\'t run until the currently running jobs are -- completed. This allocation strategy keeps costs lower but can limit -- scaling. If you\'re using Spot Fleets with @BEST_FIT@, the Spot -- Fleet IAM Role must be specified. Compute resources that use a -- @BEST_FIT@ allocation strategy don\'t support infrastructure updates -- and can\'t update some parameters. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/updating-compute-environments.html Updating compute environments> -- in the /Batch User Guide/. -- -- [BEST_FIT_PROGRESSIVE] -- Batch selects additional instance types that are large enough to -- meet the requirements of the jobs in the queue. Its preference is -- for instance types with lower cost vCPUs. If additional instances of -- the previously selected instance types aren\'t available, Batch -- selects new instance types. -- -- [SPOT_CAPACITY_OPTIMIZED] -- Batch selects one or more instance types that are large enough to -- meet the requirements of the jobs in the queue. Its preference is -- for instance types that are less likely to be interrupted. This -- allocation strategy is only available for Spot Instance compute -- resources. -- -- With both @BEST_FIT_PROGRESSIVE@ and @SPOT_CAPACITY_OPTIMIZED@ -- strategies using On-Demand or Spot Instances, and the @BEST_FIT@ -- strategy using Spot Instances, Batch might need to exceed @maxvCpus@ to -- meet your capacity requirements. In this event, Batch never exceeds -- @maxvCpus@ by more than a single instance. ComputeResource -> Maybe CRAllocationStrategy allocationStrategy :: Prelude.Maybe CRAllocationStrategy, -- | The maximum percentage that a Spot Instance price can be when compared -- with the On-Demand price for that instance type before instances are -- launched. For example, if your maximum percentage is 20%, then the Spot -- price must be less than 20% of the current On-Demand price for that -- Amazon EC2 instance. You always pay the lowest (market) price and never -- more than your maximum percentage. If you leave this field empty, the -- default value is 100% of the On-Demand price. For most use cases, we -- recommend leaving this field empty. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe Int bidPercentage :: Prelude.Maybe Prelude.Int, -- | The desired number of Amazon EC2 vCPUS in the compute environment. Batch -- modifies this value between the minimum and maximum values based on job -- queue demand. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe Int desiredvCpus :: Prelude.Maybe Prelude.Int, -- | Provides information that\'s used to select Amazon Machine Images (AMIs) -- for EC2 instances in the compute environment. If @Ec2Configuration@ -- isn\'t specified, the default is @ECS_AL2@. -- -- One or two values can be provided. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe [Ec2Configuration] ec2Configuration :: Prelude.Maybe [Ec2Configuration], -- | The Amazon EC2 key pair that\'s used for instances launched in the -- compute environment. You can use this key pair to log in to your -- instances with SSH. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe Text ec2KeyPair :: Prelude.Maybe Prelude.Text, -- | The Amazon Machine Image (AMI) ID used for instances launched in the -- compute environment. This parameter is overridden by the -- @imageIdOverride@ member of the @Ec2Configuration@ structure. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- The AMI that you choose for a compute environment must match the -- architecture of the instance types that you intend to use for that -- compute environment. For example, if your compute environment uses A1 -- instance types, the compute resource AMI that you choose must support -- ARM instances. Amazon ECS vends both x86 and ARM versions of the Amazon -- ECS-optimized Amazon Linux 2 AMI. For more information, see -- <https://docs.aws.amazon.com/AmazonECS/latest/developerguide/ecs-optimized_AMI.html#ecs-optimized-ami-linux-variants.html Amazon ECS-optimized Amazon Linux 2 AMI> -- in the /Amazon Elastic Container Service Developer Guide/. ComputeResource -> Maybe Text imageId :: Prelude.Maybe Prelude.Text, -- | The Amazon ECS instance profile applied to Amazon EC2 instances in a -- compute environment. You can specify the short name or full Amazon -- Resource Name (ARN) of an instance profile. For example, -- @ @/@ecsInstanceRole@/@ @ or -- @arn:aws:iam::@/@\<aws_account_id>@/@:instance-profile\/@/@ecsInstanceRole@/@ @. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/instance_IAM_role.html Amazon ECS instance role> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe Text instanceRole :: Prelude.Maybe Prelude.Text, -- | The instances types that can be launched. You can specify instance -- families to launch any instance type within those families (for example, -- @c5@ or @p3@), or you can specify specific sizes within a family (such -- as @c5.8xlarge@). You can also choose @optimal@ to select instance types -- (from the C4, M4, and R4 instance families) that match the demand of -- your job queues. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- When you create a compute environment, the instance types that you -- select for the compute environment must share the same architecture. For -- example, you can\'t mix x86 and ARM instances in the same compute -- environment. -- -- Currently, @optimal@ uses instance types from the C4, M4, and R4 -- instance families. In Regions that don\'t have instance types from those -- instance families, instance types from the C5, M5, and R5 instance -- families are used. ComputeResource -> Maybe [Text] instanceTypes :: Prelude.Maybe [Prelude.Text], -- | The launch template to use for your compute resources. Any other compute -- resource parameters that you specify in a CreateComputeEnvironment API -- operation override the same parameters in the launch template. You must -- specify either the launch template ID or launch template name in the -- request, but not both. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/launch-templates.html Launch template support> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe LaunchTemplateSpecification launchTemplate :: Prelude.Maybe LaunchTemplateSpecification, -- | The minimum number of Amazon EC2 vCPUs that an environment should -- maintain (even if the compute environment is @DISABLED@). -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe Int minvCpus :: Prelude.Maybe Prelude.Int, -- | The Amazon EC2 placement group to associate with your compute resources. -- If you intend to submit multi-node parallel jobs to your compute -- environment, you should consider creating a cluster placement group and -- associate it with your compute resources. This keeps your multi-node -- parallel job on a logical grouping of instances within a single -- Availability Zone with high network flow potential. For more -- information, see -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/placement-groups.html Placement groups> -- in the /Amazon EC2 User Guide for Linux Instances/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. ComputeResource -> Maybe Text placementGroup :: Prelude.Maybe Prelude.Text, -- | The Amazon EC2 security groups that are associated with instances -- launched in the compute environment. One or more security groups must be -- specified, either in @securityGroupIds@ or using a launch template -- referenced in @launchTemplate@. This parameter is required for jobs that -- are running on Fargate resources and must contain at least one security -- group. Fargate doesn\'t support launch templates. If security groups are -- specified using both @securityGroupIds@ and @launchTemplate@, the values -- in @securityGroupIds@ are used. ComputeResource -> Maybe [Text] securityGroupIds :: Prelude.Maybe [Prelude.Text], -- | The Amazon Resource Name (ARN) of the Amazon EC2 Spot Fleet IAM role -- applied to a @SPOT@ compute environment. This role is required if the -- allocation strategy set to @BEST_FIT@ or if the allocation strategy -- isn\'t specified. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/spot_fleet_IAM_role.html Amazon EC2 spot fleet role> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- To tag your Spot Instances on creation, the Spot Fleet IAM role -- specified here must use the newer __AmazonEC2SpotFleetTaggingRole__ -- managed policy. The previously recommended __AmazonEC2SpotFleetRole__ -- managed policy doesn\'t have the required permissions to tag Spot -- Instances. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/troubleshooting.html#spot-instance-no-tag Spot instances not tagged on creation> -- in the /Batch User Guide/. ComputeResource -> Maybe Text spotIamFleetRole :: Prelude.Maybe Prelude.Text, -- | Key-value pair tags to be applied to EC2 resources that are launched in -- the compute environment. For Batch, these take the form of -- @\"String1\": \"String2\"@, where @String1@ is the tag key and @String2@ -- is the tag value-for example, -- @{ \"Name\": \"Batch Instance - C4OnDemand\" }@. This is helpful for -- recognizing your Batch instances in the Amazon EC2 console. Updating -- these tags requires an infrastructure update to the compute environment. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/updating-compute-environments.html Updating compute environments> -- in the /Batch User Guide/. These tags aren\'t seen when using the Batch -- @ListTagsForResource@ API operation. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text), -- | The type of compute environment: @EC2@, @SPOT@, @FARGATE@, or -- @FARGATE_SPOT@. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/compute_environments.html Compute environments> -- in the /Batch User Guide/. -- -- If you choose @SPOT@, you must also specify an Amazon EC2 Spot Fleet -- role with the @spotIamFleetRole@ parameter. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/spot_fleet_IAM_role.html Amazon EC2 spot fleet role> -- in the /Batch User Guide/. ComputeResource -> CRType type' :: CRType, -- | The maximum number of Amazon EC2 vCPUs that a compute environment can -- reach. -- -- With both @BEST_FIT_PROGRESSIVE@ and @SPOT_CAPACITY_OPTIMIZED@ -- allocation strategies using On-Demand or Spot Instances, and the -- @BEST_FIT@ strategy using Spot Instances, Batch might need to exceed -- @maxvCpus@ to meet your capacity requirements. In this event, Batch -- never exceeds @maxvCpus@ by more than a single instance. For example, no -- more than a single instance from among those specified in your compute -- environment is allocated. ComputeResource -> Int maxvCpus :: Prelude.Int, -- | The VPC subnets where the compute resources are launched. These subnets -- must be within the same VPC. Fargate compute resources can contain up to -- 16 subnets. For more information, see -- <https://docs.aws.amazon.com/vpc/latest/userguide/VPC_Subnets.html VPCs and subnets> -- in the /Amazon VPC User Guide/. -- -- Batch on Amazon EC2 and Batch on Amazon EKS support Local Zones. For -- more information, see -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/using-regions-availability-zones.html#concepts-local-zones Local Zones> -- in the /Amazon EC2 User Guide for Linux Instances/, -- <https://docs.aws.amazon.com/eks/latest/userguide/local-zones.html Amazon EKS and Amazon Web Services Local Zones> -- in the /Amazon EKS User Guide/ and -- <https://docs.aws.amazon.com/AmazonECS/latest/developerguide/cluster-regions-zones.html#clusters-local-zones Amazon ECS clusters in Local Zones, Wavelength Zones, and Amazon Web Services Outposts> -- in the /Amazon ECS Developer Guide/. -- -- Batch on Fargate doesn\'t currently support Local Zones. ComputeResource -> [Text] subnets :: [Prelude.Text] } deriving (ComputeResource -> ComputeResource -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: ComputeResource -> ComputeResource -> Bool $c/= :: ComputeResource -> ComputeResource -> Bool == :: ComputeResource -> ComputeResource -> Bool $c== :: ComputeResource -> ComputeResource -> Bool Prelude.Eq, ReadPrec [ComputeResource] ReadPrec ComputeResource Int -> ReadS ComputeResource ReadS [ComputeResource] forall a. (Int -> ReadS a) -> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a readListPrec :: ReadPrec [ComputeResource] $creadListPrec :: ReadPrec [ComputeResource] readPrec :: ReadPrec ComputeResource $creadPrec :: ReadPrec ComputeResource readList :: ReadS [ComputeResource] $creadList :: ReadS [ComputeResource] readsPrec :: Int -> ReadS ComputeResource $creadsPrec :: Int -> ReadS ComputeResource Prelude.Read, Int -> ComputeResource -> ShowS [ComputeResource] -> ShowS ComputeResource -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [ComputeResource] -> ShowS $cshowList :: [ComputeResource] -> ShowS show :: ComputeResource -> String $cshow :: ComputeResource -> String showsPrec :: Int -> ComputeResource -> ShowS $cshowsPrec :: Int -> ComputeResource -> ShowS Prelude.Show, forall x. Rep ComputeResource x -> ComputeResource forall x. ComputeResource -> Rep ComputeResource x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep ComputeResource x -> ComputeResource $cfrom :: forall x. ComputeResource -> Rep ComputeResource x Prelude.Generic) -- | -- Create a value of 'ComputeResource' with all optional fields omitted. -- -- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'allocationStrategy', 'computeResource_allocationStrategy' - The allocation strategy to use for the compute resource if not enough -- instances of the best fitting instance type can be allocated. This might -- be because of availability of the instance type in the Region or -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/ec2-resource-limits.html Amazon EC2 service limits>. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/allocation-strategies.html Allocation strategies> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- [BEST_FIT (default)] -- Batch selects an instance type that best fits the needs of the jobs -- with a preference for the lowest-cost instance type. If additional -- instances of the selected instance type aren\'t available, Batch -- waits for the additional instances to be available. If there aren\'t -- enough instances available or the user is reaching -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/ec2-resource-limits.html Amazon EC2 service limits>, -- additional jobs aren\'t run until the currently running jobs are -- completed. This allocation strategy keeps costs lower but can limit -- scaling. If you\'re using Spot Fleets with @BEST_FIT@, the Spot -- Fleet IAM Role must be specified. Compute resources that use a -- @BEST_FIT@ allocation strategy don\'t support infrastructure updates -- and can\'t update some parameters. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/updating-compute-environments.html Updating compute environments> -- in the /Batch User Guide/. -- -- [BEST_FIT_PROGRESSIVE] -- Batch selects additional instance types that are large enough to -- meet the requirements of the jobs in the queue. Its preference is -- for instance types with lower cost vCPUs. If additional instances of -- the previously selected instance types aren\'t available, Batch -- selects new instance types. -- -- [SPOT_CAPACITY_OPTIMIZED] -- Batch selects one or more instance types that are large enough to -- meet the requirements of the jobs in the queue. Its preference is -- for instance types that are less likely to be interrupted. This -- allocation strategy is only available for Spot Instance compute -- resources. -- -- With both @BEST_FIT_PROGRESSIVE@ and @SPOT_CAPACITY_OPTIMIZED@ -- strategies using On-Demand or Spot Instances, and the @BEST_FIT@ -- strategy using Spot Instances, Batch might need to exceed @maxvCpus@ to -- meet your capacity requirements. In this event, Batch never exceeds -- @maxvCpus@ by more than a single instance. -- -- 'bidPercentage', 'computeResource_bidPercentage' - The maximum percentage that a Spot Instance price can be when compared -- with the On-Demand price for that instance type before instances are -- launched. For example, if your maximum percentage is 20%, then the Spot -- price must be less than 20% of the current On-Demand price for that -- Amazon EC2 instance. You always pay the lowest (market) price and never -- more than your maximum percentage. If you leave this field empty, the -- default value is 100% of the On-Demand price. For most use cases, we -- recommend leaving this field empty. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'desiredvCpus', 'computeResource_desiredvCpus' - The desired number of Amazon EC2 vCPUS in the compute environment. Batch -- modifies this value between the minimum and maximum values based on job -- queue demand. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'ec2Configuration', 'computeResource_ec2Configuration' - Provides information that\'s used to select Amazon Machine Images (AMIs) -- for EC2 instances in the compute environment. If @Ec2Configuration@ -- isn\'t specified, the default is @ECS_AL2@. -- -- One or two values can be provided. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'ec2KeyPair', 'computeResource_ec2KeyPair' - The Amazon EC2 key pair that\'s used for instances launched in the -- compute environment. You can use this key pair to log in to your -- instances with SSH. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'imageId', 'computeResource_imageId' - The Amazon Machine Image (AMI) ID used for instances launched in the -- compute environment. This parameter is overridden by the -- @imageIdOverride@ member of the @Ec2Configuration@ structure. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- The AMI that you choose for a compute environment must match the -- architecture of the instance types that you intend to use for that -- compute environment. For example, if your compute environment uses A1 -- instance types, the compute resource AMI that you choose must support -- ARM instances. Amazon ECS vends both x86 and ARM versions of the Amazon -- ECS-optimized Amazon Linux 2 AMI. For more information, see -- <https://docs.aws.amazon.com/AmazonECS/latest/developerguide/ecs-optimized_AMI.html#ecs-optimized-ami-linux-variants.html Amazon ECS-optimized Amazon Linux 2 AMI> -- in the /Amazon Elastic Container Service Developer Guide/. -- -- 'instanceRole', 'computeResource_instanceRole' - The Amazon ECS instance profile applied to Amazon EC2 instances in a -- compute environment. You can specify the short name or full Amazon -- Resource Name (ARN) of an instance profile. For example, -- @ @/@ecsInstanceRole@/@ @ or -- @arn:aws:iam::@/@\<aws_account_id>@/@:instance-profile\/@/@ecsInstanceRole@/@ @. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/instance_IAM_role.html Amazon ECS instance role> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'instanceTypes', 'computeResource_instanceTypes' - The instances types that can be launched. You can specify instance -- families to launch any instance type within those families (for example, -- @c5@ or @p3@), or you can specify specific sizes within a family (such -- as @c5.8xlarge@). You can also choose @optimal@ to select instance types -- (from the C4, M4, and R4 instance families) that match the demand of -- your job queues. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- When you create a compute environment, the instance types that you -- select for the compute environment must share the same architecture. For -- example, you can\'t mix x86 and ARM instances in the same compute -- environment. -- -- Currently, @optimal@ uses instance types from the C4, M4, and R4 -- instance families. In Regions that don\'t have instance types from those -- instance families, instance types from the C5, M5, and R5 instance -- families are used. -- -- 'launchTemplate', 'computeResource_launchTemplate' - The launch template to use for your compute resources. Any other compute -- resource parameters that you specify in a CreateComputeEnvironment API -- operation override the same parameters in the launch template. You must -- specify either the launch template ID or launch template name in the -- request, but not both. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/launch-templates.html Launch template support> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'minvCpus', 'computeResource_minvCpus' - The minimum number of Amazon EC2 vCPUs that an environment should -- maintain (even if the compute environment is @DISABLED@). -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'placementGroup', 'computeResource_placementGroup' - The Amazon EC2 placement group to associate with your compute resources. -- If you intend to submit multi-node parallel jobs to your compute -- environment, you should consider creating a cluster placement group and -- associate it with your compute resources. This keeps your multi-node -- parallel job on a logical grouping of instances within a single -- Availability Zone with high network flow potential. For more -- information, see -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/placement-groups.html Placement groups> -- in the /Amazon EC2 User Guide for Linux Instances/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'securityGroupIds', 'computeResource_securityGroupIds' - The Amazon EC2 security groups that are associated with instances -- launched in the compute environment. One or more security groups must be -- specified, either in @securityGroupIds@ or using a launch template -- referenced in @launchTemplate@. This parameter is required for jobs that -- are running on Fargate resources and must contain at least one security -- group. Fargate doesn\'t support launch templates. If security groups are -- specified using both @securityGroupIds@ and @launchTemplate@, the values -- in @securityGroupIds@ are used. -- -- 'spotIamFleetRole', 'computeResource_spotIamFleetRole' - The Amazon Resource Name (ARN) of the Amazon EC2 Spot Fleet IAM role -- applied to a @SPOT@ compute environment. This role is required if the -- allocation strategy set to @BEST_FIT@ or if the allocation strategy -- isn\'t specified. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/spot_fleet_IAM_role.html Amazon EC2 spot fleet role> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- To tag your Spot Instances on creation, the Spot Fleet IAM role -- specified here must use the newer __AmazonEC2SpotFleetTaggingRole__ -- managed policy. The previously recommended __AmazonEC2SpotFleetRole__ -- managed policy doesn\'t have the required permissions to tag Spot -- Instances. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/troubleshooting.html#spot-instance-no-tag Spot instances not tagged on creation> -- in the /Batch User Guide/. -- -- 'tags', 'computeResource_tags' - Key-value pair tags to be applied to EC2 resources that are launched in -- the compute environment. For Batch, these take the form of -- @\"String1\": \"String2\"@, where @String1@ is the tag key and @String2@ -- is the tag value-for example, -- @{ \"Name\": \"Batch Instance - C4OnDemand\" }@. This is helpful for -- recognizing your Batch instances in the Amazon EC2 console. Updating -- these tags requires an infrastructure update to the compute environment. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/updating-compute-environments.html Updating compute environments> -- in the /Batch User Guide/. These tags aren\'t seen when using the Batch -- @ListTagsForResource@ API operation. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- 'type'', 'computeResource_type' - The type of compute environment: @EC2@, @SPOT@, @FARGATE@, or -- @FARGATE_SPOT@. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/compute_environments.html Compute environments> -- in the /Batch User Guide/. -- -- If you choose @SPOT@, you must also specify an Amazon EC2 Spot Fleet -- role with the @spotIamFleetRole@ parameter. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/spot_fleet_IAM_role.html Amazon EC2 spot fleet role> -- in the /Batch User Guide/. -- -- 'maxvCpus', 'computeResource_maxvCpus' - The maximum number of Amazon EC2 vCPUs that a compute environment can -- reach. -- -- With both @BEST_FIT_PROGRESSIVE@ and @SPOT_CAPACITY_OPTIMIZED@ -- allocation strategies using On-Demand or Spot Instances, and the -- @BEST_FIT@ strategy using Spot Instances, Batch might need to exceed -- @maxvCpus@ to meet your capacity requirements. In this event, Batch -- never exceeds @maxvCpus@ by more than a single instance. For example, no -- more than a single instance from among those specified in your compute -- environment is allocated. -- -- 'subnets', 'computeResource_subnets' - The VPC subnets where the compute resources are launched. These subnets -- must be within the same VPC. Fargate compute resources can contain up to -- 16 subnets. For more information, see -- <https://docs.aws.amazon.com/vpc/latest/userguide/VPC_Subnets.html VPCs and subnets> -- in the /Amazon VPC User Guide/. -- -- Batch on Amazon EC2 and Batch on Amazon EKS support Local Zones. For -- more information, see -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/using-regions-availability-zones.html#concepts-local-zones Local Zones> -- in the /Amazon EC2 User Guide for Linux Instances/, -- <https://docs.aws.amazon.com/eks/latest/userguide/local-zones.html Amazon EKS and Amazon Web Services Local Zones> -- in the /Amazon EKS User Guide/ and -- <https://docs.aws.amazon.com/AmazonECS/latest/developerguide/cluster-regions-zones.html#clusters-local-zones Amazon ECS clusters in Local Zones, Wavelength Zones, and Amazon Web Services Outposts> -- in the /Amazon ECS Developer Guide/. -- -- Batch on Fargate doesn\'t currently support Local Zones. newComputeResource :: -- | 'type'' CRType -> -- | 'maxvCpus' Prelude.Int -> ComputeResource newComputeResource :: CRType -> Int -> ComputeResource newComputeResource CRType pType_ Int pMaxvCpus_ = ComputeResource' { $sel:allocationStrategy:ComputeResource' :: Maybe CRAllocationStrategy allocationStrategy = forall a. Maybe a Prelude.Nothing, $sel:bidPercentage:ComputeResource' :: Maybe Int bidPercentage = forall a. Maybe a Prelude.Nothing, $sel:desiredvCpus:ComputeResource' :: Maybe Int desiredvCpus = forall a. Maybe a Prelude.Nothing, $sel:ec2Configuration:ComputeResource' :: Maybe [Ec2Configuration] ec2Configuration = forall a. Maybe a Prelude.Nothing, $sel:ec2KeyPair:ComputeResource' :: Maybe Text ec2KeyPair = forall a. Maybe a Prelude.Nothing, $sel:imageId:ComputeResource' :: Maybe Text imageId = forall a. Maybe a Prelude.Nothing, $sel:instanceRole:ComputeResource' :: Maybe Text instanceRole = forall a. Maybe a Prelude.Nothing, $sel:instanceTypes:ComputeResource' :: Maybe [Text] instanceTypes = forall a. Maybe a Prelude.Nothing, $sel:launchTemplate:ComputeResource' :: Maybe LaunchTemplateSpecification launchTemplate = forall a. Maybe a Prelude.Nothing, $sel:minvCpus:ComputeResource' :: Maybe Int minvCpus = forall a. Maybe a Prelude.Nothing, $sel:placementGroup:ComputeResource' :: Maybe Text placementGroup = forall a. Maybe a Prelude.Nothing, $sel:securityGroupIds:ComputeResource' :: Maybe [Text] securityGroupIds = forall a. Maybe a Prelude.Nothing, $sel:spotIamFleetRole:ComputeResource' :: Maybe Text spotIamFleetRole = forall a. Maybe a Prelude.Nothing, $sel:tags:ComputeResource' :: Maybe (HashMap Text Text) tags = forall a. Maybe a Prelude.Nothing, $sel:type':ComputeResource' :: CRType type' = CRType pType_, $sel:maxvCpus:ComputeResource' :: Int maxvCpus = Int pMaxvCpus_, $sel:subnets:ComputeResource' :: [Text] subnets = forall a. Monoid a => a Prelude.mempty } -- | The allocation strategy to use for the compute resource if not enough -- instances of the best fitting instance type can be allocated. This might -- be because of availability of the instance type in the Region or -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/ec2-resource-limits.html Amazon EC2 service limits>. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/allocation-strategies.html Allocation strategies> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- [BEST_FIT (default)] -- Batch selects an instance type that best fits the needs of the jobs -- with a preference for the lowest-cost instance type. If additional -- instances of the selected instance type aren\'t available, Batch -- waits for the additional instances to be available. If there aren\'t -- enough instances available or the user is reaching -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/ec2-resource-limits.html Amazon EC2 service limits>, -- additional jobs aren\'t run until the currently running jobs are -- completed. This allocation strategy keeps costs lower but can limit -- scaling. If you\'re using Spot Fleets with @BEST_FIT@, the Spot -- Fleet IAM Role must be specified. Compute resources that use a -- @BEST_FIT@ allocation strategy don\'t support infrastructure updates -- and can\'t update some parameters. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/updating-compute-environments.html Updating compute environments> -- in the /Batch User Guide/. -- -- [BEST_FIT_PROGRESSIVE] -- Batch selects additional instance types that are large enough to -- meet the requirements of the jobs in the queue. Its preference is -- for instance types with lower cost vCPUs. If additional instances of -- the previously selected instance types aren\'t available, Batch -- selects new instance types. -- -- [SPOT_CAPACITY_OPTIMIZED] -- Batch selects one or more instance types that are large enough to -- meet the requirements of the jobs in the queue. Its preference is -- for instance types that are less likely to be interrupted. This -- allocation strategy is only available for Spot Instance compute -- resources. -- -- With both @BEST_FIT_PROGRESSIVE@ and @SPOT_CAPACITY_OPTIMIZED@ -- strategies using On-Demand or Spot Instances, and the @BEST_FIT@ -- strategy using Spot Instances, Batch might need to exceed @maxvCpus@ to -- meet your capacity requirements. In this event, Batch never exceeds -- @maxvCpus@ by more than a single instance. computeResource_allocationStrategy :: Lens.Lens' ComputeResource (Prelude.Maybe CRAllocationStrategy) computeResource_allocationStrategy :: Lens' ComputeResource (Maybe CRAllocationStrategy) computeResource_allocationStrategy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe CRAllocationStrategy allocationStrategy :: Maybe CRAllocationStrategy $sel:allocationStrategy:ComputeResource' :: ComputeResource -> Maybe CRAllocationStrategy allocationStrategy} -> Maybe CRAllocationStrategy allocationStrategy) (\s :: ComputeResource s@ComputeResource' {} Maybe CRAllocationStrategy a -> ComputeResource s {$sel:allocationStrategy:ComputeResource' :: Maybe CRAllocationStrategy allocationStrategy = Maybe CRAllocationStrategy a} :: ComputeResource) -- | The maximum percentage that a Spot Instance price can be when compared -- with the On-Demand price for that instance type before instances are -- launched. For example, if your maximum percentage is 20%, then the Spot -- price must be less than 20% of the current On-Demand price for that -- Amazon EC2 instance. You always pay the lowest (market) price and never -- more than your maximum percentage. If you leave this field empty, the -- default value is 100% of the On-Demand price. For most use cases, we -- recommend leaving this field empty. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_bidPercentage :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Int) computeResource_bidPercentage :: Lens' ComputeResource (Maybe Int) computeResource_bidPercentage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Int bidPercentage :: Maybe Int $sel:bidPercentage:ComputeResource' :: ComputeResource -> Maybe Int bidPercentage} -> Maybe Int bidPercentage) (\s :: ComputeResource s@ComputeResource' {} Maybe Int a -> ComputeResource s {$sel:bidPercentage:ComputeResource' :: Maybe Int bidPercentage = Maybe Int a} :: ComputeResource) -- | The desired number of Amazon EC2 vCPUS in the compute environment. Batch -- modifies this value between the minimum and maximum values based on job -- queue demand. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_desiredvCpus :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Int) computeResource_desiredvCpus :: Lens' ComputeResource (Maybe Int) computeResource_desiredvCpus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Int desiredvCpus :: Maybe Int $sel:desiredvCpus:ComputeResource' :: ComputeResource -> Maybe Int desiredvCpus} -> Maybe Int desiredvCpus) (\s :: ComputeResource s@ComputeResource' {} Maybe Int a -> ComputeResource s {$sel:desiredvCpus:ComputeResource' :: Maybe Int desiredvCpus = Maybe Int a} :: ComputeResource) -- | Provides information that\'s used to select Amazon Machine Images (AMIs) -- for EC2 instances in the compute environment. If @Ec2Configuration@ -- isn\'t specified, the default is @ECS_AL2@. -- -- One or two values can be provided. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_ec2Configuration :: Lens.Lens' ComputeResource (Prelude.Maybe [Ec2Configuration]) computeResource_ec2Configuration :: Lens' ComputeResource (Maybe [Ec2Configuration]) computeResource_ec2Configuration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe [Ec2Configuration] ec2Configuration :: Maybe [Ec2Configuration] $sel:ec2Configuration:ComputeResource' :: ComputeResource -> Maybe [Ec2Configuration] ec2Configuration} -> Maybe [Ec2Configuration] ec2Configuration) (\s :: ComputeResource s@ComputeResource' {} Maybe [Ec2Configuration] a -> ComputeResource s {$sel:ec2Configuration:ComputeResource' :: Maybe [Ec2Configuration] ec2Configuration = Maybe [Ec2Configuration] a} :: ComputeResource) forall b c a. (b -> c) -> (a -> b) -> a -> c Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b. (Functor f, Functor g) => AnIso s t a b -> Iso (f s) (g t) (f a) (g b) Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b Lens.coerced -- | The Amazon EC2 key pair that\'s used for instances launched in the -- compute environment. You can use this key pair to log in to your -- instances with SSH. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_ec2KeyPair :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Text) computeResource_ec2KeyPair :: Lens' ComputeResource (Maybe Text) computeResource_ec2KeyPair = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Text ec2KeyPair :: Maybe Text $sel:ec2KeyPair:ComputeResource' :: ComputeResource -> Maybe Text ec2KeyPair} -> Maybe Text ec2KeyPair) (\s :: ComputeResource s@ComputeResource' {} Maybe Text a -> ComputeResource s {$sel:ec2KeyPair:ComputeResource' :: Maybe Text ec2KeyPair = Maybe Text a} :: ComputeResource) -- | The Amazon Machine Image (AMI) ID used for instances launched in the -- compute environment. This parameter is overridden by the -- @imageIdOverride@ member of the @Ec2Configuration@ structure. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- The AMI that you choose for a compute environment must match the -- architecture of the instance types that you intend to use for that -- compute environment. For example, if your compute environment uses A1 -- instance types, the compute resource AMI that you choose must support -- ARM instances. Amazon ECS vends both x86 and ARM versions of the Amazon -- ECS-optimized Amazon Linux 2 AMI. For more information, see -- <https://docs.aws.amazon.com/AmazonECS/latest/developerguide/ecs-optimized_AMI.html#ecs-optimized-ami-linux-variants.html Amazon ECS-optimized Amazon Linux 2 AMI> -- in the /Amazon Elastic Container Service Developer Guide/. computeResource_imageId :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Text) computeResource_imageId :: Lens' ComputeResource (Maybe Text) computeResource_imageId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Text imageId :: Maybe Text $sel:imageId:ComputeResource' :: ComputeResource -> Maybe Text imageId} -> Maybe Text imageId) (\s :: ComputeResource s@ComputeResource' {} Maybe Text a -> ComputeResource s {$sel:imageId:ComputeResource' :: Maybe Text imageId = Maybe Text a} :: ComputeResource) -- | The Amazon ECS instance profile applied to Amazon EC2 instances in a -- compute environment. You can specify the short name or full Amazon -- Resource Name (ARN) of an instance profile. For example, -- @ @/@ecsInstanceRole@/@ @ or -- @arn:aws:iam::@/@\<aws_account_id>@/@:instance-profile\/@/@ecsInstanceRole@/@ @. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/instance_IAM_role.html Amazon ECS instance role> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_instanceRole :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Text) computeResource_instanceRole :: Lens' ComputeResource (Maybe Text) computeResource_instanceRole = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Text instanceRole :: Maybe Text $sel:instanceRole:ComputeResource' :: ComputeResource -> Maybe Text instanceRole} -> Maybe Text instanceRole) (\s :: ComputeResource s@ComputeResource' {} Maybe Text a -> ComputeResource s {$sel:instanceRole:ComputeResource' :: Maybe Text instanceRole = Maybe Text a} :: ComputeResource) -- | The instances types that can be launched. You can specify instance -- families to launch any instance type within those families (for example, -- @c5@ or @p3@), or you can specify specific sizes within a family (such -- as @c5.8xlarge@). You can also choose @optimal@ to select instance types -- (from the C4, M4, and R4 instance families) that match the demand of -- your job queues. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- When you create a compute environment, the instance types that you -- select for the compute environment must share the same architecture. For -- example, you can\'t mix x86 and ARM instances in the same compute -- environment. -- -- Currently, @optimal@ uses instance types from the C4, M4, and R4 -- instance families. In Regions that don\'t have instance types from those -- instance families, instance types from the C5, M5, and R5 instance -- families are used. computeResource_instanceTypes :: Lens.Lens' ComputeResource (Prelude.Maybe [Prelude.Text]) computeResource_instanceTypes :: Lens' ComputeResource (Maybe [Text]) computeResource_instanceTypes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe [Text] instanceTypes :: Maybe [Text] $sel:instanceTypes:ComputeResource' :: ComputeResource -> Maybe [Text] instanceTypes} -> Maybe [Text] instanceTypes) (\s :: ComputeResource s@ComputeResource' {} Maybe [Text] a -> ComputeResource s {$sel:instanceTypes:ComputeResource' :: Maybe [Text] instanceTypes = Maybe [Text] a} :: ComputeResource) forall b c a. (b -> c) -> (a -> b) -> a -> c Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b. (Functor f, Functor g) => AnIso s t a b -> Iso (f s) (g t) (f a) (g b) Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b Lens.coerced -- | The launch template to use for your compute resources. Any other compute -- resource parameters that you specify in a CreateComputeEnvironment API -- operation override the same parameters in the launch template. You must -- specify either the launch template ID or launch template name in the -- request, but not both. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/launch-templates.html Launch template support> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_launchTemplate :: Lens.Lens' ComputeResource (Prelude.Maybe LaunchTemplateSpecification) computeResource_launchTemplate :: Lens' ComputeResource (Maybe LaunchTemplateSpecification) computeResource_launchTemplate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe LaunchTemplateSpecification launchTemplate :: Maybe LaunchTemplateSpecification $sel:launchTemplate:ComputeResource' :: ComputeResource -> Maybe LaunchTemplateSpecification launchTemplate} -> Maybe LaunchTemplateSpecification launchTemplate) (\s :: ComputeResource s@ComputeResource' {} Maybe LaunchTemplateSpecification a -> ComputeResource s {$sel:launchTemplate:ComputeResource' :: Maybe LaunchTemplateSpecification launchTemplate = Maybe LaunchTemplateSpecification a} :: ComputeResource) -- | The minimum number of Amazon EC2 vCPUs that an environment should -- maintain (even if the compute environment is @DISABLED@). -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_minvCpus :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Int) computeResource_minvCpus :: Lens' ComputeResource (Maybe Int) computeResource_minvCpus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Int minvCpus :: Maybe Int $sel:minvCpus:ComputeResource' :: ComputeResource -> Maybe Int minvCpus} -> Maybe Int minvCpus) (\s :: ComputeResource s@ComputeResource' {} Maybe Int a -> ComputeResource s {$sel:minvCpus:ComputeResource' :: Maybe Int minvCpus = Maybe Int a} :: ComputeResource) -- | The Amazon EC2 placement group to associate with your compute resources. -- If you intend to submit multi-node parallel jobs to your compute -- environment, you should consider creating a cluster placement group and -- associate it with your compute resources. This keeps your multi-node -- parallel job on a logical grouping of instances within a single -- Availability Zone with high network flow potential. For more -- information, see -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/placement-groups.html Placement groups> -- in the /Amazon EC2 User Guide for Linux Instances/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_placementGroup :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Text) computeResource_placementGroup :: Lens' ComputeResource (Maybe Text) computeResource_placementGroup = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Text placementGroup :: Maybe Text $sel:placementGroup:ComputeResource' :: ComputeResource -> Maybe Text placementGroup} -> Maybe Text placementGroup) (\s :: ComputeResource s@ComputeResource' {} Maybe Text a -> ComputeResource s {$sel:placementGroup:ComputeResource' :: Maybe Text placementGroup = Maybe Text a} :: ComputeResource) -- | The Amazon EC2 security groups that are associated with instances -- launched in the compute environment. One or more security groups must be -- specified, either in @securityGroupIds@ or using a launch template -- referenced in @launchTemplate@. This parameter is required for jobs that -- are running on Fargate resources and must contain at least one security -- group. Fargate doesn\'t support launch templates. If security groups are -- specified using both @securityGroupIds@ and @launchTemplate@, the values -- in @securityGroupIds@ are used. computeResource_securityGroupIds :: Lens.Lens' ComputeResource (Prelude.Maybe [Prelude.Text]) computeResource_securityGroupIds :: Lens' ComputeResource (Maybe [Text]) computeResource_securityGroupIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe [Text] securityGroupIds :: Maybe [Text] $sel:securityGroupIds:ComputeResource' :: ComputeResource -> Maybe [Text] securityGroupIds} -> Maybe [Text] securityGroupIds) (\s :: ComputeResource s@ComputeResource' {} Maybe [Text] a -> ComputeResource s {$sel:securityGroupIds:ComputeResource' :: Maybe [Text] securityGroupIds = Maybe [Text] a} :: ComputeResource) forall b c a. (b -> c) -> (a -> b) -> a -> c Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b. (Functor f, Functor g) => AnIso s t a b -> Iso (f s) (g t) (f a) (g b) Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b Lens.coerced -- | The Amazon Resource Name (ARN) of the Amazon EC2 Spot Fleet IAM role -- applied to a @SPOT@ compute environment. This role is required if the -- allocation strategy set to @BEST_FIT@ or if the allocation strategy -- isn\'t specified. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/spot_fleet_IAM_role.html Amazon EC2 spot fleet role> -- in the /Batch User Guide/. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. -- -- To tag your Spot Instances on creation, the Spot Fleet IAM role -- specified here must use the newer __AmazonEC2SpotFleetTaggingRole__ -- managed policy. The previously recommended __AmazonEC2SpotFleetRole__ -- managed policy doesn\'t have the required permissions to tag Spot -- Instances. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/troubleshooting.html#spot-instance-no-tag Spot instances not tagged on creation> -- in the /Batch User Guide/. computeResource_spotIamFleetRole :: Lens.Lens' ComputeResource (Prelude.Maybe Prelude.Text) computeResource_spotIamFleetRole :: Lens' ComputeResource (Maybe Text) computeResource_spotIamFleetRole = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe Text spotIamFleetRole :: Maybe Text $sel:spotIamFleetRole:ComputeResource' :: ComputeResource -> Maybe Text spotIamFleetRole} -> Maybe Text spotIamFleetRole) (\s :: ComputeResource s@ComputeResource' {} Maybe Text a -> ComputeResource s {$sel:spotIamFleetRole:ComputeResource' :: Maybe Text spotIamFleetRole = Maybe Text a} :: ComputeResource) -- | Key-value pair tags to be applied to EC2 resources that are launched in -- the compute environment. For Batch, these take the form of -- @\"String1\": \"String2\"@, where @String1@ is the tag key and @String2@ -- is the tag value-for example, -- @{ \"Name\": \"Batch Instance - C4OnDemand\" }@. This is helpful for -- recognizing your Batch instances in the Amazon EC2 console. Updating -- these tags requires an infrastructure update to the compute environment. -- For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/updating-compute-environments.html Updating compute environments> -- in the /Batch User Guide/. These tags aren\'t seen when using the Batch -- @ListTagsForResource@ API operation. -- -- This parameter isn\'t applicable to jobs that are running on Fargate -- resources. Don\'t specify it. computeResource_tags :: Lens.Lens' ComputeResource (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text)) = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Maybe (HashMap Text Text) tags :: Maybe (HashMap Text Text) $sel:tags:ComputeResource' :: ComputeResource -> Maybe (HashMap Text Text) tags} -> Maybe (HashMap Text Text) tags) (\s :: ComputeResource s@ComputeResource' {} Maybe (HashMap Text Text) a -> ComputeResource s {$sel:tags:ComputeResource' :: Maybe (HashMap Text Text) tags = Maybe (HashMap Text Text) a} :: ComputeResource) forall b c a. (b -> c) -> (a -> b) -> a -> c Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b. (Functor f, Functor g) => AnIso s t a b -> Iso (f s) (g t) (f a) (g b) Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b Lens.coerced -- | The type of compute environment: @EC2@, @SPOT@, @FARGATE@, or -- @FARGATE_SPOT@. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/compute_environments.html Compute environments> -- in the /Batch User Guide/. -- -- If you choose @SPOT@, you must also specify an Amazon EC2 Spot Fleet -- role with the @spotIamFleetRole@ parameter. For more information, see -- <https://docs.aws.amazon.com/batch/latest/userguide/spot_fleet_IAM_role.html Amazon EC2 spot fleet role> -- in the /Batch User Guide/. computeResource_type :: Lens.Lens' ComputeResource CRType computeResource_type :: Lens' ComputeResource CRType computeResource_type = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {CRType type' :: CRType $sel:type':ComputeResource' :: ComputeResource -> CRType type'} -> CRType type') (\s :: ComputeResource s@ComputeResource' {} CRType a -> ComputeResource s {$sel:type':ComputeResource' :: CRType type' = CRType a} :: ComputeResource) -- | The maximum number of Amazon EC2 vCPUs that a compute environment can -- reach. -- -- With both @BEST_FIT_PROGRESSIVE@ and @SPOT_CAPACITY_OPTIMIZED@ -- allocation strategies using On-Demand or Spot Instances, and the -- @BEST_FIT@ strategy using Spot Instances, Batch might need to exceed -- @maxvCpus@ to meet your capacity requirements. In this event, Batch -- never exceeds @maxvCpus@ by more than a single instance. For example, no -- more than a single instance from among those specified in your compute -- environment is allocated. computeResource_maxvCpus :: Lens.Lens' ComputeResource Prelude.Int computeResource_maxvCpus :: Lens' ComputeResource Int computeResource_maxvCpus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {Int maxvCpus :: Int $sel:maxvCpus:ComputeResource' :: ComputeResource -> Int maxvCpus} -> Int maxvCpus) (\s :: ComputeResource s@ComputeResource' {} Int a -> ComputeResource s {$sel:maxvCpus:ComputeResource' :: Int maxvCpus = Int a} :: ComputeResource) -- | The VPC subnets where the compute resources are launched. These subnets -- must be within the same VPC. Fargate compute resources can contain up to -- 16 subnets. For more information, see -- <https://docs.aws.amazon.com/vpc/latest/userguide/VPC_Subnets.html VPCs and subnets> -- in the /Amazon VPC User Guide/. -- -- Batch on Amazon EC2 and Batch on Amazon EKS support Local Zones. For -- more information, see -- <https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/using-regions-availability-zones.html#concepts-local-zones Local Zones> -- in the /Amazon EC2 User Guide for Linux Instances/, -- <https://docs.aws.amazon.com/eks/latest/userguide/local-zones.html Amazon EKS and Amazon Web Services Local Zones> -- in the /Amazon EKS User Guide/ and -- <https://docs.aws.amazon.com/AmazonECS/latest/developerguide/cluster-regions-zones.html#clusters-local-zones Amazon ECS clusters in Local Zones, Wavelength Zones, and Amazon Web Services Outposts> -- in the /Amazon ECS Developer Guide/. -- -- Batch on Fargate doesn\'t currently support Local Zones. computeResource_subnets :: Lens.Lens' ComputeResource [Prelude.Text] computeResource_subnets :: Lens' ComputeResource [Text] computeResource_subnets = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ComputeResource' {[Text] subnets :: [Text] $sel:subnets:ComputeResource' :: ComputeResource -> [Text] subnets} -> [Text] subnets) (\s :: ComputeResource s@ComputeResource' {} [Text] a -> ComputeResource s {$sel:subnets:ComputeResource' :: [Text] subnets = [Text] a} :: ComputeResource) forall b c a. (b -> c) -> (a -> b) -> a -> c Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b Lens.coerced instance Data.FromJSON ComputeResource where parseJSON :: Value -> Parser ComputeResource parseJSON = forall a. String -> (Object -> Parser a) -> Value -> Parser a Data.withObject String "ComputeResource" ( \Object x -> Maybe CRAllocationStrategy -> Maybe Int -> Maybe Int -> Maybe [Ec2Configuration] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Text] -> Maybe LaunchTemplateSpecification -> Maybe Int -> Maybe Text -> Maybe [Text] -> Maybe Text -> Maybe (HashMap Text Text) -> CRType -> Int -> [Text] -> ComputeResource ComputeResource' forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "allocationStrategy") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "bidPercentage") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "desiredvCpus") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> ( Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "ec2Configuration" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty ) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "ec2KeyPair") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "imageId") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "instanceRole") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "instanceTypes" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "launchTemplate") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "minvCpus") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "placementGroup") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> ( Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "securityGroupIds" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty ) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "spotIamFleetRole") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "tags" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "type") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "maxvCpus") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "subnets" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty) ) instance Prelude.Hashable ComputeResource where hashWithSalt :: Int -> ComputeResource -> Int hashWithSalt Int _salt ComputeResource' {Int [Text] Maybe Int Maybe [Text] Maybe [Ec2Configuration] Maybe Text Maybe (HashMap Text Text) Maybe CRAllocationStrategy Maybe LaunchTemplateSpecification CRType subnets :: [Text] maxvCpus :: Int type' :: CRType tags :: Maybe (HashMap Text Text) spotIamFleetRole :: Maybe Text securityGroupIds :: Maybe [Text] placementGroup :: Maybe Text minvCpus :: Maybe Int launchTemplate :: Maybe LaunchTemplateSpecification instanceTypes :: Maybe [Text] instanceRole :: Maybe Text imageId :: Maybe Text ec2KeyPair :: Maybe Text ec2Configuration :: Maybe [Ec2Configuration] desiredvCpus :: Maybe Int bidPercentage :: Maybe Int allocationStrategy :: Maybe CRAllocationStrategy $sel:subnets:ComputeResource' :: ComputeResource -> [Text] $sel:maxvCpus:ComputeResource' :: ComputeResource -> Int $sel:type':ComputeResource' :: ComputeResource -> CRType $sel:tags:ComputeResource' :: ComputeResource -> Maybe (HashMap Text Text) $sel:spotIamFleetRole:ComputeResource' :: ComputeResource -> Maybe Text $sel:securityGroupIds:ComputeResource' :: ComputeResource -> Maybe [Text] $sel:placementGroup:ComputeResource' :: ComputeResource -> Maybe Text $sel:minvCpus:ComputeResource' :: ComputeResource -> Maybe Int $sel:launchTemplate:ComputeResource' :: ComputeResource -> Maybe LaunchTemplateSpecification $sel:instanceTypes:ComputeResource' :: ComputeResource -> Maybe [Text] $sel:instanceRole:ComputeResource' :: ComputeResource -> Maybe Text $sel:imageId:ComputeResource' :: ComputeResource -> Maybe Text $sel:ec2KeyPair:ComputeResource' :: ComputeResource -> Maybe Text $sel:ec2Configuration:ComputeResource' :: ComputeResource -> Maybe [Ec2Configuration] $sel:desiredvCpus:ComputeResource' :: ComputeResource -> Maybe Int $sel:bidPercentage:ComputeResource' :: ComputeResource -> Maybe Int $sel:allocationStrategy:ComputeResource' :: ComputeResource -> Maybe CRAllocationStrategy ..} = Int _salt forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe CRAllocationStrategy allocationStrategy forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Int bidPercentage forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Int desiredvCpus forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe [Ec2Configuration] ec2Configuration forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text ec2KeyPair forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text imageId forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text instanceRole forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe [Text] instanceTypes forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe LaunchTemplateSpecification launchTemplate forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Int minvCpus forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text placementGroup forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe [Text] securityGroupIds forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text spotIamFleetRole forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe (HashMap Text Text) tags forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` CRType type' forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Int maxvCpus forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` [Text] subnets instance Prelude.NFData ComputeResource where rnf :: ComputeResource -> () rnf ComputeResource' {Int [Text] Maybe Int Maybe [Text] Maybe [Ec2Configuration] Maybe Text Maybe (HashMap Text Text) Maybe CRAllocationStrategy Maybe LaunchTemplateSpecification CRType subnets :: [Text] maxvCpus :: Int type' :: CRType tags :: Maybe (HashMap Text Text) spotIamFleetRole :: Maybe Text securityGroupIds :: Maybe [Text] placementGroup :: Maybe Text minvCpus :: Maybe Int launchTemplate :: Maybe LaunchTemplateSpecification instanceTypes :: Maybe [Text] instanceRole :: Maybe Text imageId :: Maybe Text ec2KeyPair :: Maybe Text ec2Configuration :: Maybe [Ec2Configuration] desiredvCpus :: Maybe Int bidPercentage :: Maybe Int allocationStrategy :: Maybe CRAllocationStrategy $sel:subnets:ComputeResource' :: ComputeResource -> [Text] $sel:maxvCpus:ComputeResource' :: ComputeResource -> Int $sel:type':ComputeResource' :: ComputeResource -> CRType $sel:tags:ComputeResource' :: ComputeResource -> Maybe (HashMap Text Text) $sel:spotIamFleetRole:ComputeResource' :: ComputeResource -> Maybe Text $sel:securityGroupIds:ComputeResource' :: ComputeResource -> Maybe [Text] $sel:placementGroup:ComputeResource' :: ComputeResource -> Maybe Text $sel:minvCpus:ComputeResource' :: ComputeResource -> Maybe Int $sel:launchTemplate:ComputeResource' :: ComputeResource -> Maybe LaunchTemplateSpecification $sel:instanceTypes:ComputeResource' :: ComputeResource -> Maybe [Text] $sel:instanceRole:ComputeResource' :: ComputeResource -> Maybe Text $sel:imageId:ComputeResource' :: ComputeResource -> Maybe Text $sel:ec2KeyPair:ComputeResource' :: ComputeResource -> Maybe Text $sel:ec2Configuration:ComputeResource' :: ComputeResource -> Maybe [Ec2Configuration] $sel:desiredvCpus:ComputeResource' :: ComputeResource -> Maybe Int $sel:bidPercentage:ComputeResource' :: ComputeResource -> Maybe Int $sel:allocationStrategy:ComputeResource' :: ComputeResource -> Maybe CRAllocationStrategy ..} = forall a. NFData a => a -> () Prelude.rnf Maybe CRAllocationStrategy allocationStrategy seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Int bidPercentage seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Int desiredvCpus seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe [Ec2Configuration] ec2Configuration seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text ec2KeyPair seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text imageId seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text instanceRole seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe [Text] instanceTypes seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe LaunchTemplateSpecification launchTemplate seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Int minvCpus seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text placementGroup seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe [Text] securityGroupIds seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text spotIamFleetRole seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe (HashMap Text Text) tags seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf CRType type' seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Int maxvCpus seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf [Text] subnets instance Data.ToJSON ComputeResource where toJSON :: ComputeResource -> Value toJSON ComputeResource' {Int [Text] Maybe Int Maybe [Text] Maybe [Ec2Configuration] Maybe Text Maybe (HashMap Text Text) Maybe CRAllocationStrategy Maybe LaunchTemplateSpecification CRType subnets :: [Text] maxvCpus :: Int type' :: CRType tags :: Maybe (HashMap Text Text) spotIamFleetRole :: Maybe Text securityGroupIds :: Maybe [Text] placementGroup :: Maybe Text minvCpus :: Maybe Int launchTemplate :: Maybe LaunchTemplateSpecification instanceTypes :: Maybe [Text] instanceRole :: Maybe Text imageId :: Maybe Text ec2KeyPair :: Maybe Text ec2Configuration :: Maybe [Ec2Configuration] desiredvCpus :: Maybe Int bidPercentage :: Maybe Int allocationStrategy :: Maybe CRAllocationStrategy $sel:subnets:ComputeResource' :: ComputeResource -> [Text] $sel:maxvCpus:ComputeResource' :: ComputeResource -> Int $sel:type':ComputeResource' :: ComputeResource -> CRType $sel:tags:ComputeResource' :: ComputeResource -> Maybe (HashMap Text Text) $sel:spotIamFleetRole:ComputeResource' :: ComputeResource -> Maybe Text $sel:securityGroupIds:ComputeResource' :: ComputeResource -> Maybe [Text] $sel:placementGroup:ComputeResource' :: ComputeResource -> Maybe Text $sel:minvCpus:ComputeResource' :: ComputeResource -> Maybe Int $sel:launchTemplate:ComputeResource' :: ComputeResource -> Maybe LaunchTemplateSpecification $sel:instanceTypes:ComputeResource' :: ComputeResource -> Maybe [Text] $sel:instanceRole:ComputeResource' :: ComputeResource -> Maybe Text $sel:imageId:ComputeResource' :: ComputeResource -> Maybe Text $sel:ec2KeyPair:ComputeResource' :: ComputeResource -> Maybe Text $sel:ec2Configuration:ComputeResource' :: ComputeResource -> Maybe [Ec2Configuration] $sel:desiredvCpus:ComputeResource' :: ComputeResource -> Maybe Int $sel:bidPercentage:ComputeResource' :: ComputeResource -> Maybe Int $sel:allocationStrategy:ComputeResource' :: ComputeResource -> Maybe CRAllocationStrategy ..} = [Pair] -> Value Data.object ( forall a. [Maybe a] -> [a] Prelude.catMaybes [ (Key "allocationStrategy" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe CRAllocationStrategy allocationStrategy, (Key "bidPercentage" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Int bidPercentage, (Key "desiredvCpus" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Int desiredvCpus, (Key "ec2Configuration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe [Ec2Configuration] ec2Configuration, (Key "ec2KeyPair" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Text ec2KeyPair, (Key "imageId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Text imageId, (Key "instanceRole" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Text instanceRole, (Key "instanceTypes" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe [Text] instanceTypes, (Key "launchTemplate" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe LaunchTemplateSpecification launchTemplate, (Key "minvCpus" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Int minvCpus, (Key "placementGroup" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Text placementGroup, (Key "securityGroupIds" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe [Text] securityGroupIds, (Key "spotIamFleetRole" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe Text spotIamFleetRole, (Key "tags" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> Maybe (HashMap Text Text) tags, forall a. a -> Maybe a Prelude.Just (Key "type" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= CRType type'), forall a. a -> Maybe a Prelude.Just (Key "maxvCpus" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= Int maxvCpus), forall a. a -> Maybe a Prelude.Just (Key "subnets" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= [Text] subnets) ] )