module Stratosphere.SageMaker.Cluster.ClusterRestrictedInstanceGroupProperty (
module Exports, ClusterRestrictedInstanceGroupProperty(..),
mkClusterRestrictedInstanceGroupProperty
) 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.EnvironmentConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.SageMaker.Cluster.VpcConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ClusterRestrictedInstanceGroupProperty
=
ClusterRestrictedInstanceGroupProperty {ClusterRestrictedInstanceGroupProperty -> ()
haddock_workaround_ :: (),
ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
currentCount :: (Prelude.Maybe (Value Prelude.Integer)),
ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
environmentConfig :: EnvironmentConfigProperty,
ClusterRestrictedInstanceGroupProperty -> Value Text
executionRole :: (Value Prelude.Text),
ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceCount :: (Value Prelude.Integer),
ClusterRestrictedInstanceGroupProperty -> Value Text
instanceGroupName :: (Value Prelude.Text),
ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceStorageConfigs :: (Prelude.Maybe [ClusterInstanceStorageConfigProperty]),
ClusterRestrictedInstanceGroupProperty -> Value Text
instanceType :: (Value Prelude.Text),
ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
onStartDeepHealthChecks :: (Prelude.Maybe (ValueList Prelude.Text)),
ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
overrideVpcConfig :: (Prelude.Maybe VpcConfigProperty),
ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
threadsPerCore :: (Prelude.Maybe (Value Prelude.Integer)),
ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
trainingPlanArn :: (Prelude.Maybe (Value Prelude.Text))}
deriving stock (ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty -> Bool
(ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty -> Bool)
-> (ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty -> Bool)
-> Eq ClusterRestrictedInstanceGroupProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty -> Bool
== :: ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty -> Bool
$c/= :: ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty -> Bool
/= :: ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty -> Bool
Prelude.Eq, Int -> ClusterRestrictedInstanceGroupProperty -> ShowS
[ClusterRestrictedInstanceGroupProperty] -> ShowS
ClusterRestrictedInstanceGroupProperty -> String
(Int -> ClusterRestrictedInstanceGroupProperty -> ShowS)
-> (ClusterRestrictedInstanceGroupProperty -> String)
-> ([ClusterRestrictedInstanceGroupProperty] -> ShowS)
-> Show ClusterRestrictedInstanceGroupProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ClusterRestrictedInstanceGroupProperty -> ShowS
showsPrec :: Int -> ClusterRestrictedInstanceGroupProperty -> ShowS
$cshow :: ClusterRestrictedInstanceGroupProperty -> String
show :: ClusterRestrictedInstanceGroupProperty -> String
$cshowList :: [ClusterRestrictedInstanceGroupProperty] -> ShowS
showList :: [ClusterRestrictedInstanceGroupProperty] -> ShowS
Prelude.Show)
mkClusterRestrictedInstanceGroupProperty ::
EnvironmentConfigProperty
-> Value Prelude.Text
-> Value Prelude.Integer
-> Value Prelude.Text
-> Value Prelude.Text -> ClusterRestrictedInstanceGroupProperty
mkClusterRestrictedInstanceGroupProperty :: EnvironmentConfigProperty
-> Value Text
-> Value Integer
-> Value Text
-> Value Text
-> ClusterRestrictedInstanceGroupProperty
mkClusterRestrictedInstanceGroupProperty
EnvironmentConfigProperty
environmentConfig
Value Text
executionRole
Value Integer
instanceCount
Value Text
instanceGroupName
Value Text
instanceType
= ClusterRestrictedInstanceGroupProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), environmentConfig :: EnvironmentConfigProperty
environmentConfig = EnvironmentConfigProperty
environmentConfig,
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,
currentCount :: Maybe (Value Integer)
currentCount = Maybe (Value Integer)
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,
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 ClusterRestrictedInstanceGroupProperty where
toResourceProperties :: ClusterRestrictedInstanceGroupProperty -> ResourceProperties
toResourceProperties ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::SageMaker::Cluster.ClusterRestrictedInstanceGroup",
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
"EnvironmentConfig" Key -> EnvironmentConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= EnvironmentConfigProperty
environmentConfig,
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]
([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 -> [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 -> 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 ClusterRestrictedInstanceGroupProperty where
toJSON :: ClusterRestrictedInstanceGroupProperty -> Value
toJSON ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
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
"EnvironmentConfig" Key -> EnvironmentConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= EnvironmentConfigProperty
environmentConfig,
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]
([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 -> [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 -> 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" ClusterRestrictedInstanceGroupProperty where
type PropertyType "CurrentCount" ClusterRestrictedInstanceGroupProperty = Value Prelude.Integer
set :: PropertyType "CurrentCount" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType "CurrentCount" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{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" ClusterRestrictedInstanceGroupProperty
Value Integer
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "EnvironmentConfig" ClusterRestrictedInstanceGroupProperty where
type PropertyType "EnvironmentConfig" ClusterRestrictedInstanceGroupProperty = EnvironmentConfigProperty
set :: PropertyType
"EnvironmentConfig" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType
"EnvironmentConfig" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{environmentConfig :: EnvironmentConfigProperty
environmentConfig = PropertyType
"EnvironmentConfig" ClusterRestrictedInstanceGroupProperty
EnvironmentConfigProperty
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
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
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "ExecutionRole" ClusterRestrictedInstanceGroupProperty where
type PropertyType "ExecutionRole" ClusterRestrictedInstanceGroupProperty = Value Prelude.Text
set :: PropertyType "ExecutionRole" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType "ExecutionRole" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{executionRole :: Value Text
executionRole = PropertyType "ExecutionRole" ClusterRestrictedInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceCount" ClusterRestrictedInstanceGroupProperty where
type PropertyType "InstanceCount" ClusterRestrictedInstanceGroupProperty = Value Prelude.Integer
set :: PropertyType "InstanceCount" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType "InstanceCount" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{instanceCount :: Value Integer
instanceCount = PropertyType "InstanceCount" ClusterRestrictedInstanceGroupProperty
Value Integer
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceGroupName" ClusterRestrictedInstanceGroupProperty where
type PropertyType "InstanceGroupName" ClusterRestrictedInstanceGroupProperty = Value Prelude.Text
set :: PropertyType
"InstanceGroupName" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType
"InstanceGroupName" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{instanceGroupName :: Value Text
instanceGroupName = PropertyType
"InstanceGroupName" ClusterRestrictedInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceStorageConfigs" ClusterRestrictedInstanceGroupProperty where
type PropertyType "InstanceStorageConfigs" ClusterRestrictedInstanceGroupProperty = [ClusterInstanceStorageConfigProperty]
set :: PropertyType
"InstanceStorageConfigs" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType
"InstanceStorageConfigs" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{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" ClusterRestrictedInstanceGroupProperty
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "InstanceType" ClusterRestrictedInstanceGroupProperty where
type PropertyType "InstanceType" ClusterRestrictedInstanceGroupProperty = Value Prelude.Text
set :: PropertyType "InstanceType" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType "InstanceType" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{instanceType :: Value Text
instanceType = PropertyType "InstanceType" ClusterRestrictedInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "OnStartDeepHealthChecks" ClusterRestrictedInstanceGroupProperty where
type PropertyType "OnStartDeepHealthChecks" ClusterRestrictedInstanceGroupProperty = ValueList Prelude.Text
set :: PropertyType
"OnStartDeepHealthChecks" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType
"OnStartDeepHealthChecks" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{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" ClusterRestrictedInstanceGroupProperty
ValueList Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "OverrideVpcConfig" ClusterRestrictedInstanceGroupProperty where
type PropertyType "OverrideVpcConfig" ClusterRestrictedInstanceGroupProperty = VpcConfigProperty
set :: PropertyType
"OverrideVpcConfig" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType
"OverrideVpcConfig" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{overrideVpcConfig :: Maybe VpcConfigProperty
overrideVpcConfig = VpcConfigProperty -> Maybe VpcConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"OverrideVpcConfig" ClusterRestrictedInstanceGroupProperty
VpcConfigProperty
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "ThreadsPerCore" ClusterRestrictedInstanceGroupProperty where
type PropertyType "ThreadsPerCore" ClusterRestrictedInstanceGroupProperty = Value Prelude.Integer
set :: PropertyType
"ThreadsPerCore" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType
"ThreadsPerCore" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{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" ClusterRestrictedInstanceGroupProperty
Value Integer
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
trainingPlanArn :: Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
trainingPlanArn :: Maybe (Value Text)
..}
instance Property "TrainingPlanArn" ClusterRestrictedInstanceGroupProperty where
type PropertyType "TrainingPlanArn" ClusterRestrictedInstanceGroupProperty = Value Prelude.Text
set :: PropertyType
"TrainingPlanArn" ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
-> ClusterRestrictedInstanceGroupProperty
set PropertyType
"TrainingPlanArn" ClusterRestrictedInstanceGroupProperty
newValue ClusterRestrictedInstanceGroupProperty {Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ClusterRestrictedInstanceGroupProperty -> ()
currentCount :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
environmentConfig :: ClusterRestrictedInstanceGroupProperty -> EnvironmentConfigProperty
executionRole :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceCount :: ClusterRestrictedInstanceGroupProperty -> Value Integer
instanceGroupName :: ClusterRestrictedInstanceGroupProperty -> Value Text
instanceStorageConfigs :: ClusterRestrictedInstanceGroupProperty
-> Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: ClusterRestrictedInstanceGroupProperty -> Value Text
onStartDeepHealthChecks :: ClusterRestrictedInstanceGroupProperty -> Maybe (ValueList Text)
overrideVpcConfig :: ClusterRestrictedInstanceGroupProperty -> Maybe VpcConfigProperty
threadsPerCore :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Integer)
trainingPlanArn :: ClusterRestrictedInstanceGroupProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
trainingPlanArn :: Maybe (Value Text)
..}
= ClusterRestrictedInstanceGroupProperty
{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" ClusterRestrictedInstanceGroupProperty
Value Text
newValue, Maybe [ClusterInstanceStorageConfigProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe VpcConfigProperty
()
Value Integer
Value Text
EnvironmentConfigProperty
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
haddock_workaround_ :: ()
currentCount :: Maybe (Value Integer)
environmentConfig :: EnvironmentConfigProperty
executionRole :: Value Text
instanceCount :: Value Integer
instanceGroupName :: Value Text
instanceStorageConfigs :: Maybe [ClusterInstanceStorageConfigProperty]
instanceType :: Value Text
onStartDeepHealthChecks :: Maybe (ValueList Text)
overrideVpcConfig :: Maybe VpcConfigProperty
threadsPerCore :: Maybe (Value Integer)
..}