module Stratosphere.Comprehend.Flywheel (
        module Exports, Flywheel(..), mkFlywheel
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Comprehend.Flywheel.DataSecurityConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.Comprehend.Flywheel.TaskConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data Flywheel
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html>
    Flywheel {Flywheel -> ()
haddock_workaround_ :: (),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-activemodelarn>
              Flywheel -> Maybe (Value Text)
activeModelArn :: (Prelude.Maybe (Value Prelude.Text)),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-dataaccessrolearn>
              Flywheel -> Value Text
dataAccessRoleArn :: (Value Prelude.Text),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-datalakes3uri>
              Flywheel -> Value Text
dataLakeS3Uri :: (Value Prelude.Text),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-datasecurityconfig>
              Flywheel -> Maybe DataSecurityConfigProperty
dataSecurityConfig :: (Prelude.Maybe DataSecurityConfigProperty),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-flywheelname>
              Flywheel -> Value Text
flywheelName :: (Value Prelude.Text),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-modeltype>
              Flywheel -> Maybe (Value Text)
modelType :: (Prelude.Maybe (Value Prelude.Text)),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-tags>
              Flywheel -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-comprehend-flywheel.html#cfn-comprehend-flywheel-taskconfig>
              Flywheel -> Maybe TaskConfigProperty
taskConfig :: (Prelude.Maybe TaskConfigProperty)}
  deriving stock (Flywheel -> Flywheel -> Bool
(Flywheel -> Flywheel -> Bool)
-> (Flywheel -> Flywheel -> Bool) -> Eq Flywheel
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Flywheel -> Flywheel -> Bool
== :: Flywheel -> Flywheel -> Bool
$c/= :: Flywheel -> Flywheel -> Bool
/= :: Flywheel -> Flywheel -> Bool
Prelude.Eq, Int -> Flywheel -> ShowS
[Flywheel] -> ShowS
Flywheel -> String
(Int -> Flywheel -> ShowS)
-> (Flywheel -> String) -> ([Flywheel] -> ShowS) -> Show Flywheel
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Flywheel -> ShowS
showsPrec :: Int -> Flywheel -> ShowS
$cshow :: Flywheel -> String
show :: Flywheel -> String
$cshowList :: [Flywheel] -> ShowS
showList :: [Flywheel] -> ShowS
Prelude.Show)
mkFlywheel ::
  Value Prelude.Text
  -> Value Prelude.Text -> Value Prelude.Text -> Flywheel
mkFlywheel :: Value Text -> Value Text -> Value Text -> Flywheel
mkFlywheel Value Text
dataAccessRoleArn Value Text
dataLakeS3Uri Value Text
flywheelName
  = Flywheel
      {haddock_workaround_ :: ()
haddock_workaround_ = (), dataAccessRoleArn :: Value Text
dataAccessRoleArn = Value Text
dataAccessRoleArn,
       dataLakeS3Uri :: Value Text
dataLakeS3Uri = Value Text
dataLakeS3Uri, flywheelName :: Value Text
flywheelName = Value Text
flywheelName,
       activeModelArn :: Maybe (Value Text)
activeModelArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       dataSecurityConfig :: Maybe DataSecurityConfigProperty
dataSecurityConfig = Maybe DataSecurityConfigProperty
forall a. Maybe a
Prelude.Nothing, modelType :: Maybe (Value Text)
modelType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing, taskConfig :: Maybe TaskConfigProperty
taskConfig = Maybe TaskConfigProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Flywheel where
  toResourceProperties :: Flywheel -> ResourceProperties
toResourceProperties Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Comprehend::Flywheel",
         supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"DataAccessRoleArn" 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
dataAccessRoleArn,
                            Key
"DataLakeS3Uri" 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
dataLakeS3Uri,
                            Key
"FlywheelName" 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
flywheelName]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [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
"ActiveModelArn" (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)
activeModelArn,
                               Key -> DataSecurityConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DataSecurityConfig" (DataSecurityConfigProperty -> (Key, Value))
-> Maybe DataSecurityConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataSecurityConfigProperty
dataSecurityConfig,
                               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
"ModelType" (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)
modelType,
                               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
                               Key -> TaskConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TaskConfig" (TaskConfigProperty -> (Key, Value))
-> Maybe TaskConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TaskConfigProperty
taskConfig]))}
instance JSON.ToJSON Flywheel where
  toJSON :: Flywheel -> Value
toJSON Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = [(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
"DataAccessRoleArn" 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
dataAccessRoleArn,
               Key
"DataLakeS3Uri" 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
dataLakeS3Uri,
               Key
"FlywheelName" 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
flywheelName]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [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
"ActiveModelArn" (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)
activeModelArn,
                  Key -> DataSecurityConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DataSecurityConfig" (DataSecurityConfigProperty -> (Key, Value))
-> Maybe DataSecurityConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataSecurityConfigProperty
dataSecurityConfig,
                  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
"ModelType" (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)
modelType,
                  Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
                  Key -> TaskConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TaskConfig" (TaskConfigProperty -> (Key, Value))
-> Maybe TaskConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TaskConfigProperty
taskConfig])))
instance Property "ActiveModelArn" Flywheel where
  type PropertyType "ActiveModelArn" Flywheel = Value Prelude.Text
  set :: PropertyType "ActiveModelArn" Flywheel -> Flywheel -> Flywheel
set PropertyType "ActiveModelArn" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = Flywheel {activeModelArn :: Maybe (Value Text)
activeModelArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ActiveModelArn" Flywheel
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: ()
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
haddock_workaround_ :: ()
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
instance Property "DataAccessRoleArn" Flywheel where
  type PropertyType "DataAccessRoleArn" Flywheel = Value Prelude.Text
  set :: PropertyType "DataAccessRoleArn" Flywheel -> Flywheel -> Flywheel
set PropertyType "DataAccessRoleArn" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = Flywheel {dataAccessRoleArn :: Value Text
dataAccessRoleArn = PropertyType "DataAccessRoleArn" Flywheel
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
instance Property "DataLakeS3Uri" Flywheel where
  type PropertyType "DataLakeS3Uri" Flywheel = Value Prelude.Text
  set :: PropertyType "DataLakeS3Uri" Flywheel -> Flywheel -> Flywheel
set PropertyType "DataLakeS3Uri" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = Flywheel {dataLakeS3Uri :: Value Text
dataLakeS3Uri = PropertyType "DataLakeS3Uri" Flywheel
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
instance Property "DataSecurityConfig" Flywheel where
  type PropertyType "DataSecurityConfig" Flywheel = DataSecurityConfigProperty
  set :: PropertyType "DataSecurityConfig" Flywheel -> Flywheel -> Flywheel
set PropertyType "DataSecurityConfig" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = Flywheel {dataSecurityConfig :: Maybe DataSecurityConfigProperty
dataSecurityConfig = DataSecurityConfigProperty -> Maybe DataSecurityConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DataSecurityConfig" Flywheel
DataSecurityConfigProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
()
Value Text
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
instance Property "FlywheelName" Flywheel where
  type PropertyType "FlywheelName" Flywheel = Value Prelude.Text
  set :: PropertyType "FlywheelName" Flywheel -> Flywheel -> Flywheel
set PropertyType "FlywheelName" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..} = Flywheel {flywheelName :: Value Text
flywheelName = PropertyType "FlywheelName" Flywheel
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
instance Property "ModelType" Flywheel where
  type PropertyType "ModelType" Flywheel = Value Prelude.Text
  set :: PropertyType "ModelType" Flywheel -> Flywheel -> Flywheel
set PropertyType "ModelType" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = Flywheel {modelType :: Maybe (Value Text)
modelType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ModelType" Flywheel
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
instance Property "Tags" Flywheel where
  type PropertyType "Tags" Flywheel = [Tag]
  set :: PropertyType "Tags" Flywheel -> Flywheel -> Flywheel
set PropertyType "Tags" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = Flywheel {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" Flywheel
newValue, Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
taskConfig :: Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
taskConfig :: Maybe TaskConfigProperty
..}
instance Property "TaskConfig" Flywheel where
  type PropertyType "TaskConfig" Flywheel = TaskConfigProperty
  set :: PropertyType "TaskConfig" Flywheel -> Flywheel -> Flywheel
set PropertyType "TaskConfig" Flywheel
newValue Flywheel {Maybe [Tag]
Maybe (Value Text)
Maybe TaskConfigProperty
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: Flywheel -> ()
activeModelArn :: Flywheel -> Maybe (Value Text)
dataAccessRoleArn :: Flywheel -> Value Text
dataLakeS3Uri :: Flywheel -> Value Text
dataSecurityConfig :: Flywheel -> Maybe DataSecurityConfigProperty
flywheelName :: Flywheel -> Value Text
modelType :: Flywheel -> Maybe (Value Text)
tags :: Flywheel -> Maybe [Tag]
taskConfig :: Flywheel -> Maybe TaskConfigProperty
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
taskConfig :: Maybe TaskConfigProperty
..}
    = Flywheel {taskConfig :: Maybe TaskConfigProperty
taskConfig = TaskConfigProperty -> Maybe TaskConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TaskConfig" Flywheel
TaskConfigProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe DataSecurityConfigProperty
()
Value Text
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
activeModelArn :: Maybe (Value Text)
dataAccessRoleArn :: Value Text
dataLakeS3Uri :: Value Text
dataSecurityConfig :: Maybe DataSecurityConfigProperty
flywheelName :: Value Text
modelType :: Maybe (Value Text)
tags :: Maybe [Tag]
..}