module Stratosphere.SageMaker.PartnerApp (
        module Exports, PartnerApp(..), mkPartnerApp
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.SageMaker.PartnerApp.PartnerAppConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.SageMaker.PartnerApp.PartnerAppMaintenanceConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data PartnerApp
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html>
    PartnerApp {PartnerApp -> ()
haddock_workaround_ :: (),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-applicationconfig>
                PartnerApp -> Maybe PartnerAppConfigProperty
applicationConfig :: (Prelude.Maybe PartnerAppConfigProperty),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-authtype>
                PartnerApp -> Value Text
authType :: (Value Prelude.Text),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-enableiamsessionbasedidentity>
                PartnerApp -> Maybe (Value Bool)
enableIamSessionBasedIdentity :: (Prelude.Maybe (Value Prelude.Bool)),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-executionrolearn>
                PartnerApp -> Value Text
executionRoleArn :: (Value Prelude.Text),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-kmskeyid>
                PartnerApp -> Maybe (Value Text)
kmsKeyId :: (Prelude.Maybe (Value Prelude.Text)),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-maintenanceconfig>
                PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
maintenanceConfig :: (Prelude.Maybe PartnerAppMaintenanceConfigProperty),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-name>
                PartnerApp -> Value Text
name :: (Value Prelude.Text),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-tags>
                PartnerApp -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-tier>
                PartnerApp -> Value Text
tier :: (Value Prelude.Text),
                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-partnerapp.html#cfn-sagemaker-partnerapp-type>
                PartnerApp -> Value Text
type' :: (Value Prelude.Text)}
  deriving stock (PartnerApp -> PartnerApp -> Bool
(PartnerApp -> PartnerApp -> Bool)
-> (PartnerApp -> PartnerApp -> Bool) -> Eq PartnerApp
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PartnerApp -> PartnerApp -> Bool
== :: PartnerApp -> PartnerApp -> Bool
$c/= :: PartnerApp -> PartnerApp -> Bool
/= :: PartnerApp -> PartnerApp -> Bool
Prelude.Eq, Int -> PartnerApp -> ShowS
[PartnerApp] -> ShowS
PartnerApp -> String
(Int -> PartnerApp -> ShowS)
-> (PartnerApp -> String)
-> ([PartnerApp] -> ShowS)
-> Show PartnerApp
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PartnerApp -> ShowS
showsPrec :: Int -> PartnerApp -> ShowS
$cshow :: PartnerApp -> String
show :: PartnerApp -> String
$cshowList :: [PartnerApp] -> ShowS
showList :: [PartnerApp] -> ShowS
Prelude.Show)
mkPartnerApp ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text
        -> Value Prelude.Text -> Value Prelude.Text -> PartnerApp
mkPartnerApp :: Value Text
-> Value Text
-> Value Text
-> Value Text
-> Value Text
-> PartnerApp
mkPartnerApp Value Text
authType Value Text
executionRoleArn Value Text
name Value Text
tier Value Text
type'
  = PartnerApp
      {haddock_workaround_ :: ()
haddock_workaround_ = (), authType :: Value Text
authType = Value Text
authType,
       executionRoleArn :: Value Text
executionRoleArn = Value Text
executionRoleArn, name :: Value Text
name = Value Text
name, tier :: Value Text
tier = Value Text
tier,
       type' :: Value Text
type' = Value Text
type', applicationConfig :: Maybe PartnerAppConfigProperty
applicationConfig = Maybe PartnerAppConfigProperty
forall a. Maybe a
Prelude.Nothing,
       enableIamSessionBasedIdentity :: Maybe (Value Bool)
enableIamSessionBasedIdentity = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing,
       kmsKeyId :: Maybe (Value Text)
kmsKeyId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
maintenanceConfig = Maybe PartnerAppMaintenanceConfigProperty
forall a. Maybe a
Prelude.Nothing,
       tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties PartnerApp where
  toResourceProperties :: PartnerApp -> ResourceProperties
toResourceProperties PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SageMaker::PartnerApp",
         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
"AuthType" 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
authType,
                            Key
"ExecutionRoleArn" 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
executionRoleArn, Key
"Name" 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
name,
                            Key
"Tier" 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
tier, Key
"Type" 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
type']
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> PartnerAppConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ApplicationConfig" (PartnerAppConfigProperty -> (Key, Value))
-> Maybe PartnerAppConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PartnerAppConfigProperty
applicationConfig,
                               Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnableIamSessionBasedIdentity"
                                 (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
enableIamSessionBasedIdentity,
                               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
"KmsKeyId" (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)
kmsKeyId,
                               Key -> PartnerAppMaintenanceConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MaintenanceConfig" (PartnerAppMaintenanceConfigProperty -> (Key, Value))
-> Maybe PartnerAppMaintenanceConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PartnerAppMaintenanceConfigProperty
maintenanceConfig,
                               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]))}
instance JSON.ToJSON PartnerApp where
  toJSON :: PartnerApp -> Value
toJSON PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: 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
"AuthType" 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
authType,
               Key
"ExecutionRoleArn" 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
executionRoleArn, Key
"Name" 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
name,
               Key
"Tier" 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
tier, Key
"Type" 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
type']
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> PartnerAppConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ApplicationConfig" (PartnerAppConfigProperty -> (Key, Value))
-> Maybe PartnerAppConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PartnerAppConfigProperty
applicationConfig,
                  Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnableIamSessionBasedIdentity"
                    (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
enableIamSessionBasedIdentity,
                  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
"KmsKeyId" (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)
kmsKeyId,
                  Key -> PartnerAppMaintenanceConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MaintenanceConfig" (PartnerAppMaintenanceConfigProperty -> (Key, Value))
-> Maybe PartnerAppMaintenanceConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PartnerAppMaintenanceConfigProperty
maintenanceConfig,
                  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])))
instance Property "ApplicationConfig" PartnerApp where
  type PropertyType "ApplicationConfig" PartnerApp = PartnerAppConfigProperty
  set :: PropertyType "ApplicationConfig" PartnerApp
-> PartnerApp -> PartnerApp
set PropertyType "ApplicationConfig" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
    = PartnerApp {applicationConfig :: Maybe PartnerAppConfigProperty
applicationConfig = PartnerAppConfigProperty -> Maybe PartnerAppConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ApplicationConfig" PartnerApp
PartnerAppConfigProperty
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
instance Property "AuthType" PartnerApp where
  type PropertyType "AuthType" PartnerApp = Value Prelude.Text
  set :: PropertyType "AuthType" PartnerApp -> PartnerApp -> PartnerApp
set PropertyType "AuthType" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..} = PartnerApp {authType :: Value Text
authType = PropertyType "AuthType" PartnerApp
Value Text
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
instance Property "EnableIamSessionBasedIdentity" PartnerApp where
  type PropertyType "EnableIamSessionBasedIdentity" PartnerApp = Value Prelude.Bool
  set :: PropertyType "EnableIamSessionBasedIdentity" PartnerApp
-> PartnerApp -> PartnerApp
set PropertyType "EnableIamSessionBasedIdentity" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
    = PartnerApp
        {enableIamSessionBasedIdentity :: Maybe (Value Bool)
enableIamSessionBasedIdentity = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnableIamSessionBasedIdentity" PartnerApp
Value Bool
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
instance Property "ExecutionRoleArn" PartnerApp where
  type PropertyType "ExecutionRoleArn" PartnerApp = Value Prelude.Text
  set :: PropertyType "ExecutionRoleArn" PartnerApp
-> PartnerApp -> PartnerApp
set PropertyType "ExecutionRoleArn" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
    = PartnerApp {executionRoleArn :: Value Text
executionRoleArn = PropertyType "ExecutionRoleArn" PartnerApp
Value Text
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
instance Property "KmsKeyId" PartnerApp where
  type PropertyType "KmsKeyId" PartnerApp = Value Prelude.Text
  set :: PropertyType "KmsKeyId" PartnerApp -> PartnerApp -> PartnerApp
set PropertyType "KmsKeyId" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
    = PartnerApp {kmsKeyId :: Maybe (Value Text)
kmsKeyId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "KmsKeyId" PartnerApp
Value Text
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
instance Property "MaintenanceConfig" PartnerApp where
  type PropertyType "MaintenanceConfig" PartnerApp = PartnerAppMaintenanceConfigProperty
  set :: PropertyType "MaintenanceConfig" PartnerApp
-> PartnerApp -> PartnerApp
set PropertyType "MaintenanceConfig" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
    = PartnerApp {maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
maintenanceConfig = PartnerAppMaintenanceConfigProperty
-> Maybe PartnerAppMaintenanceConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MaintenanceConfig" PartnerApp
PartnerAppMaintenanceConfigProperty
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
instance Property "Name" PartnerApp where
  type PropertyType "Name" PartnerApp = Value Prelude.Text
  set :: PropertyType "Name" PartnerApp -> PartnerApp -> PartnerApp
set PropertyType "Name" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..} = PartnerApp {name :: Value Text
name = PropertyType "Name" PartnerApp
Value Text
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
instance Property "Tags" PartnerApp where
  type PropertyType "Tags" PartnerApp = [Tag]
  set :: PropertyType "Tags" PartnerApp -> PartnerApp -> PartnerApp
set PropertyType "Tags" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..}
    = PartnerApp {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" PartnerApp
newValue, Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tier :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tier :: Value Text
type' :: Value Text
..}
instance Property "Tier" PartnerApp where
  type PropertyType "Tier" PartnerApp = Value Prelude.Text
  set :: PropertyType "Tier" PartnerApp -> PartnerApp -> PartnerApp
set PropertyType "Tier" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..} = PartnerApp {tier :: Value Text
tier = PropertyType "Tier" PartnerApp
Value Text
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
type' :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
type' :: Value Text
..}
instance Property "Type" PartnerApp where
  type PropertyType "Type" PartnerApp = Value Prelude.Text
  set :: PropertyType "Type" PartnerApp -> PartnerApp -> PartnerApp
set PropertyType "Type" PartnerApp
newValue PartnerApp {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: PartnerApp -> ()
applicationConfig :: PartnerApp -> Maybe PartnerAppConfigProperty
authType :: PartnerApp -> Value Text
enableIamSessionBasedIdentity :: PartnerApp -> Maybe (Value Bool)
executionRoleArn :: PartnerApp -> Value Text
kmsKeyId :: PartnerApp -> Maybe (Value Text)
maintenanceConfig :: PartnerApp -> Maybe PartnerAppMaintenanceConfigProperty
name :: PartnerApp -> Value Text
tags :: PartnerApp -> Maybe [Tag]
tier :: PartnerApp -> Value Text
type' :: PartnerApp -> Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
type' :: Value Text
..} = PartnerApp {type' :: Value Text
type' = PropertyType "Type" PartnerApp
Value Text
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe PartnerAppConfigProperty
Maybe PartnerAppMaintenanceConfigProperty
()
Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
haddock_workaround_ :: ()
applicationConfig :: Maybe PartnerAppConfigProperty
authType :: Value Text
enableIamSessionBasedIdentity :: Maybe (Value Bool)
executionRoleArn :: Value Text
kmsKeyId :: Maybe (Value Text)
maintenanceConfig :: Maybe PartnerAppMaintenanceConfigProperty
name :: Value Text
tags :: Maybe [Tag]
tier :: Value Text
..}