module Stratosphere.SageMaker.Cluster.ClusterInstanceGroupProperty (
        module Exports, ClusterInstanceGroupProperty(..),
        mkClusterInstanceGroupProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.SageMaker.Cluster.ClusterInstanceStorageConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.SageMaker.Cluster.ClusterLifeCycleConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.SageMaker.Cluster.ScheduledUpdateConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.SageMaker.Cluster.VpcConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ClusterInstanceGroupProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html>
    ClusterInstanceGroupProperty {ClusterInstanceGroupProperty -> ()
haddock_workaround_ :: (),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-currentcount>
                                  ClusterInstanceGroupProperty -> Maybe (Value Integer)
currentCount :: (Prelude.Maybe (Value Prelude.Integer)),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-executionrole>
                                  ClusterInstanceGroupProperty -> Value Text
executionRole :: (Value Prelude.Text),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-imageid>
                                  ClusterInstanceGroupProperty -> Maybe (Value Text)
imageId :: (Prelude.Maybe (Value Prelude.Text)),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-instancecount>
                                  ClusterInstanceGroupProperty -> Value Integer
instanceCount :: (Value Prelude.Integer),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-instancegroupname>
                                  ClusterInstanceGroupProperty -> Value Text
instanceGroupName :: (Value Prelude.Text),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-instancestorageconfigs>
                                  ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceStorageConfigs :: (Prelude.Maybe [ClusterInstanceStorageConfigProperty]),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-instancetype>
                                  ClusterInstanceGroupProperty -> Value Text
instanceType :: (Value Prelude.Text),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-lifecycleconfig>
                                  ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
lifeCycleConfig :: ClusterLifeCycleConfigProperty,
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-onstartdeephealthchecks>
                                  ClusterInstanceGroupProperty -> Maybe (ValueList Text)
onStartDeepHealthChecks :: (Prelude.Maybe (ValueList Prelude.Text)),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-overridevpcconfig>
                                  ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
overrideVpcConfig :: (Prelude.Maybe VpcConfigProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-scheduledupdateconfig>
                                  ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
scheduledUpdateConfig :: (Prelude.Maybe ScheduledUpdateConfigProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-threadspercore>
                                  ClusterInstanceGroupProperty -> Maybe (Value Integer)
threadsPerCore :: (Prelude.Maybe (Value Prelude.Integer)),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-cluster-clusterinstancegroup.html#cfn-sagemaker-cluster-clusterinstancegroup-trainingplanarn>
                                  ClusterInstanceGroupProperty -> Maybe (Value Text)
trainingPlanArn :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> Bool
(ClusterInstanceGroupProperty
 -> ClusterInstanceGroupProperty -> Bool)
-> (ClusterInstanceGroupProperty
    -> ClusterInstanceGroupProperty -> Bool)
-> Eq ClusterInstanceGroupProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> Bool
== :: ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> Bool
$c/= :: ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> Bool
/= :: ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> Bool
Prelude.Eq, Int -> ClusterInstanceGroupProperty -> ShowS
[ClusterInstanceGroupProperty] -> ShowS
ClusterInstanceGroupProperty -> String
(Int -> ClusterInstanceGroupProperty -> ShowS)
-> (ClusterInstanceGroupProperty -> String)
-> ([ClusterInstanceGroupProperty] -> ShowS)
-> Show ClusterInstanceGroupProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ClusterInstanceGroupProperty -> ShowS
showsPrec :: Int -> ClusterInstanceGroupProperty -> ShowS
$cshow :: ClusterInstanceGroupProperty -> String
show :: ClusterInstanceGroupProperty -> String
$cshowList :: [ClusterInstanceGroupProperty] -> ShowS
showList :: [ClusterInstanceGroupProperty] -> ShowS
Prelude.Show)
mkClusterInstanceGroupProperty ::
  Value Prelude.Text
  -> Value Prelude.Integer
     -> Value Prelude.Text
        -> Value Prelude.Text
           -> ClusterLifeCycleConfigProperty -> ClusterInstanceGroupProperty
mkClusterInstanceGroupProperty :: Value Text
-> Value Integer
-> Value Text
-> Value Text
-> ClusterLifeCycleConfigProperty
-> ClusterInstanceGroupProperty
mkClusterInstanceGroupProperty
  Value Text
executionRole
  Value Integer
instanceCount
  Value Text
instanceGroupName
  Value Text
instanceType
  ClusterLifeCycleConfigProperty
lifeCycleConfig
  = ClusterInstanceGroupProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), executionRole :: Value Text
executionRole = Value Text
executionRole,
       instanceCount :: Value Integer
instanceCount = Value Integer
instanceCount,
       instanceGroupName :: Value Text
instanceGroupName = Value Text
instanceGroupName, instanceType :: Value Text
instanceType = Value Text
instanceType,
       lifeCycleConfig :: ClusterLifeCycleConfigProperty
lifeCycleConfig = ClusterLifeCycleConfigProperty
lifeCycleConfig, currentCount :: Maybe (Value Integer)
currentCount = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       imageId :: Maybe (Value Text)
imageId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceStorageConfigs = Maybe [ClusterInstanceStorageConfigProperty]
forall a. Maybe a
Prelude.Nothing,
       onStartDeepHealthChecks :: Maybe (ValueList Text)
onStartDeepHealthChecks = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       overrideVpcConfig :: Maybe VpcConfigProperty
overrideVpcConfig = Maybe VpcConfigProperty
forall a. Maybe a
Prelude.Nothing,
       scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
scheduledUpdateConfig = Maybe ScheduledUpdateConfigProperty
forall a. Maybe a
Prelude.Nothing,
       threadsPerCore :: Maybe (Value Integer)
threadsPerCore = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       trainingPlanArn :: Maybe (Value Text)
trainingPlanArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ClusterInstanceGroupProperty where
  toResourceProperties :: ClusterInstanceGroupProperty -> ResourceProperties
toResourceProperties ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SageMaker::Cluster.ClusterInstanceGroup",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ExecutionRole" 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
executionRole,
                            Key
"InstanceCount" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
instanceCount,
                            Key
"InstanceGroupName" 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
instanceGroupName,
                            Key
"InstanceType" 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
instanceType,
                            Key
"LifeCycleConfig" Key -> ClusterLifeCycleConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ClusterLifeCycleConfigProperty
lifeCycleConfig]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CurrentCount" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
currentCount,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ImageId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
imageId,
                               Key -> [ClusterInstanceStorageConfigProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InstanceStorageConfigs"
                                 ([ClusterInstanceStorageConfigProperty] -> (Key, Value))
-> Maybe [ClusterInstanceStorageConfigProperty]
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ClusterInstanceStorageConfigProperty]
instanceStorageConfigs,
                               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
"OnStartDeepHealthChecks"
                                 (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)
onStartDeepHealthChecks,
                               Key -> VpcConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"OverrideVpcConfig" (VpcConfigProperty -> (Key, Value))
-> Maybe VpcConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VpcConfigProperty
overrideVpcConfig,
                               Key -> ScheduledUpdateConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ScheduledUpdateConfig"
                                 (ScheduledUpdateConfigProperty -> (Key, Value))
-> Maybe ScheduledUpdateConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScheduledUpdateConfigProperty
scheduledUpdateConfig,
                               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ThreadsPerCore" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
threadsPerCore,
                               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
"TrainingPlanArn" (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)
trainingPlanArn]))}
instance JSON.ToJSON ClusterInstanceGroupProperty where
  toJSON :: ClusterInstanceGroupProperty -> Value
toJSON ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ExecutionRole" 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
executionRole,
               Key
"InstanceCount" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
instanceCount,
               Key
"InstanceGroupName" 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
instanceGroupName,
               Key
"InstanceType" 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
instanceType,
               Key
"LifeCycleConfig" Key -> ClusterLifeCycleConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ClusterLifeCycleConfigProperty
lifeCycleConfig]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CurrentCount" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
currentCount,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ImageId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
imageId,
                  Key -> [ClusterInstanceStorageConfigProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InstanceStorageConfigs"
                    ([ClusterInstanceStorageConfigProperty] -> (Key, Value))
-> Maybe [ClusterInstanceStorageConfigProperty]
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ClusterInstanceStorageConfigProperty]
instanceStorageConfigs,
                  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
"OnStartDeepHealthChecks"
                    (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)
onStartDeepHealthChecks,
                  Key -> VpcConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"OverrideVpcConfig" (VpcConfigProperty -> (Key, Value))
-> Maybe VpcConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VpcConfigProperty
overrideVpcConfig,
                  Key -> ScheduledUpdateConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ScheduledUpdateConfig"
                    (ScheduledUpdateConfigProperty -> (Key, Value))
-> Maybe ScheduledUpdateConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScheduledUpdateConfigProperty
scheduledUpdateConfig,
                  Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ThreadsPerCore" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
threadsPerCore,
                  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
"TrainingPlanArn" (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)
trainingPlanArn])))
instance Property "CurrentCount" ClusterInstanceGroupProperty where
  type PropertyType "CurrentCount" ClusterInstanceGroupProperty = Value Prelude.Integer
  set :: PropertyType "CurrentCount" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "CurrentCount" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {currentCount :: Maybe (Value Integer)
currentCount = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CurrentCount" ClusterInstanceGroupProperty
Value Integer
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "ExecutionRole" ClusterInstanceGroupProperty where
  type PropertyType "ExecutionRole" ClusterInstanceGroupProperty = Value Prelude.Text
  set :: PropertyType "ExecutionRole" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "ExecutionRole" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty {executionRole :: Value Text
executionRole = PropertyType "ExecutionRole" ClusterInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "ImageId" ClusterInstanceGroupProperty where
  type PropertyType "ImageId" ClusterInstanceGroupProperty = Value Prelude.Text
  set :: PropertyType "ImageId" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "ImageId" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {imageId :: Maybe (Value Text)
imageId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ImageId" ClusterInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceCount" ClusterInstanceGroupProperty where
  type PropertyType "InstanceCount" ClusterInstanceGroupProperty = Value Prelude.Integer
  set :: PropertyType "InstanceCount" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "InstanceCount" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty {instanceCount :: Value Integer
instanceCount = PropertyType "InstanceCount" ClusterInstanceGroupProperty
Value Integer
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceGroupName" ClusterInstanceGroupProperty where
  type PropertyType "InstanceGroupName" ClusterInstanceGroupProperty = Value Prelude.Text
  set :: PropertyType "InstanceGroupName" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "InstanceGroupName" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty {instanceGroupName :: Value Text
instanceGroupName = PropertyType "InstanceGroupName" ClusterInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceStorageConfigs" ClusterInstanceGroupProperty where
  type PropertyType "InstanceStorageConfigs" ClusterInstanceGroupProperty = [ClusterInstanceStorageConfigProperty]
  set :: PropertyType "InstanceStorageConfigs" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "InstanceStorageConfigs" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceStorageConfigs = [ClusterInstanceStorageConfigProperty]
-> Maybe [ClusterInstanceStorageConfigProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ClusterInstanceStorageConfigProperty]
PropertyType "InstanceStorageConfigs" ClusterInstanceGroupProperty
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceType" ClusterInstanceGroupProperty where
  type PropertyType "InstanceType" ClusterInstanceGroupProperty = Value Prelude.Text
  set :: PropertyType "InstanceType" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "InstanceType" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty {instanceType :: Value Text
instanceType = PropertyType "InstanceType" ClusterInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "LifeCycleConfig" ClusterInstanceGroupProperty where
  type PropertyType "LifeCycleConfig" ClusterInstanceGroupProperty = ClusterLifeCycleConfigProperty
  set :: PropertyType "LifeCycleConfig" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "LifeCycleConfig" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty {lifeCycleConfig :: ClusterLifeCycleConfigProperty
lifeCycleConfig = PropertyType "LifeCycleConfig" ClusterInstanceGroupProperty
ClusterLifeCycleConfigProperty
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "OnStartDeepHealthChecks" ClusterInstanceGroupProperty where
  type PropertyType "OnStartDeepHealthChecks" ClusterInstanceGroupProperty = ValueList Prelude.Text
  set :: PropertyType "OnStartDeepHealthChecks" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "OnStartDeepHealthChecks" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {onStartDeepHealthChecks :: Maybe (ValueList Text)
onStartDeepHealthChecks = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "OnStartDeepHealthChecks" ClusterInstanceGroupProperty
ValueList Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "OverrideVpcConfig" ClusterInstanceGroupProperty where
  type PropertyType "OverrideVpcConfig" ClusterInstanceGroupProperty = VpcConfigProperty
  set :: PropertyType "OverrideVpcConfig" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "OverrideVpcConfig" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {overrideVpcConfig :: Maybe VpcConfigProperty
overrideVpcConfig = VpcConfigProperty -> Maybe VpcConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "OverrideVpcConfig" ClusterInstanceGroupProperty
VpcConfigProperty
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "ScheduledUpdateConfig" ClusterInstanceGroupProperty where
  type PropertyType "ScheduledUpdateConfig" ClusterInstanceGroupProperty = ScheduledUpdateConfigProperty
  set :: PropertyType "ScheduledUpdateConfig" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "ScheduledUpdateConfig" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
scheduledUpdateConfig = ScheduledUpdateConfigProperty
-> Maybe ScheduledUpdateConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ScheduledUpdateConfig" ClusterInstanceGroupProperty
ScheduledUpdateConfigProperty
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "ThreadsPerCore" ClusterInstanceGroupProperty where
  type PropertyType "ThreadsPerCore" ClusterInstanceGroupProperty = Value Prelude.Integer
  set :: PropertyType "ThreadsPerCore" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "ThreadsPerCore" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {threadsPerCore :: Maybe (Value Integer)
threadsPerCore = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ThreadsPerCore" ClusterInstanceGroupProperty
Value Integer
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "TrainingPlanArn" ClusterInstanceGroupProperty where
  type PropertyType "TrainingPlanArn" ClusterInstanceGroupProperty = Value Prelude.Text
  set :: PropertyType "TrainingPlanArn" ClusterInstanceGroupProperty
-> ClusterInstanceGroupProperty -> ClusterInstanceGroupProperty
set PropertyType "TrainingPlanArn" ClusterInstanceGroupProperty
newValue ClusterInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ClusterInstanceGroupProperty -> ()
currentCount :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
executionRole :: ClusterInstanceGroupProperty -> Value Text
imageId :: ClusterInstanceGroupProperty -> Maybe (Value Text)
instanceCount :: ClusterInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterInstanceGroupProperty -> Value Text
lifeCycleConfig :: ClusterInstanceGroupProperty -> ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: ClusterInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterInstanceGroupProperty -> Maybe VpcConfigProperty
scheduledUpdateConfig :: ClusterInstanceGroupProperty -> Maybe ScheduledUpdateConfigProperty
threadsPerCore :: ClusterInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
    = ClusterInstanceGroupProperty
        {trainingPlanArn :: Maybe (Value Text)
trainingPlanArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TrainingPlanArn" ClusterInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ScheduledUpdateConfigProperty
Maybe VpcConfigProperty
()
Value Integer
Value Text
ClusterLifeCycleConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
imageId :: Maybe (Value Text)
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
lifeCycleConfig :: ClusterLifeCycleConfigProperty
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
scheduledUpdateConfig :: Maybe ScheduledUpdateConfigProperty
threadsPerCore :: Maybe (Value Integer)
..}