module Stratosphere.SageMaker.Space.OwnershipSettingsProperty (
OwnershipSettingsProperty(..), mkOwnershipSettingsProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data OwnershipSettingsProperty
=
OwnershipSettingsProperty {OwnershipSettingsProperty -> ()
haddock_workaround_ :: (),
OwnershipSettingsProperty -> Value Text
ownerUserProfileName :: (Value Prelude.Text)}
deriving stock (OwnershipSettingsProperty -> OwnershipSettingsProperty -> Bool
(OwnershipSettingsProperty -> OwnershipSettingsProperty -> Bool)
-> (OwnershipSettingsProperty -> OwnershipSettingsProperty -> Bool)
-> Eq OwnershipSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OwnershipSettingsProperty -> OwnershipSettingsProperty -> Bool
== :: OwnershipSettingsProperty -> OwnershipSettingsProperty -> Bool
$c/= :: OwnershipSettingsProperty -> OwnershipSettingsProperty -> Bool
/= :: OwnershipSettingsProperty -> OwnershipSettingsProperty -> Bool
Prelude.Eq, Int -> OwnershipSettingsProperty -> ShowS
[OwnershipSettingsProperty] -> ShowS
OwnershipSettingsProperty -> String
(Int -> OwnershipSettingsProperty -> ShowS)
-> (OwnershipSettingsProperty -> String)
-> ([OwnershipSettingsProperty] -> ShowS)
-> Show OwnershipSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> OwnershipSettingsProperty -> ShowS
showsPrec :: Int -> OwnershipSettingsProperty -> ShowS
$cshow :: OwnershipSettingsProperty -> String
show :: OwnershipSettingsProperty -> String
$cshowList :: [OwnershipSettingsProperty] -> ShowS
showList :: [OwnershipSettingsProperty] -> ShowS
Prelude.Show)
mkOwnershipSettingsProperty ::
Value Prelude.Text -> OwnershipSettingsProperty
mkOwnershipSettingsProperty :: Value Text -> OwnershipSettingsProperty
mkOwnershipSettingsProperty Value Text
ownerUserProfileName
= OwnershipSettingsProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
ownerUserProfileName :: Value Text
ownerUserProfileName = Value Text
ownerUserProfileName}
instance ToResourceProperties OwnershipSettingsProperty where
toResourceProperties :: OwnershipSettingsProperty -> ResourceProperties
toResourceProperties OwnershipSettingsProperty {()
Value Text
haddock_workaround_ :: OwnershipSettingsProperty -> ()
ownerUserProfileName :: OwnershipSettingsProperty -> Value Text
haddock_workaround_ :: ()
ownerUserProfileName :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::SageMaker::Space.OwnershipSettings",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"OwnerUserProfileName" 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
ownerUserProfileName]}
instance JSON.ToJSON OwnershipSettingsProperty where
toJSON :: OwnershipSettingsProperty -> Value
toJSON OwnershipSettingsProperty {()
Value Text
haddock_workaround_ :: OwnershipSettingsProperty -> ()
ownerUserProfileName :: OwnershipSettingsProperty -> Value Text
haddock_workaround_ :: ()
ownerUserProfileName :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"OwnerUserProfileName" 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
ownerUserProfileName]
instance Property "OwnerUserProfileName" OwnershipSettingsProperty where
type PropertyType "OwnerUserProfileName" OwnershipSettingsProperty = Value Prelude.Text
set :: PropertyType "OwnerUserProfileName" OwnershipSettingsProperty
-> OwnershipSettingsProperty -> OwnershipSettingsProperty
set PropertyType "OwnerUserProfileName" OwnershipSettingsProperty
newValue OwnershipSettingsProperty {()
Value Text
haddock_workaround_ :: OwnershipSettingsProperty -> ()
ownerUserProfileName :: OwnershipSettingsProperty -> Value Text
haddock_workaround_ :: ()
ownerUserProfileName :: Value Text
..}
= OwnershipSettingsProperty {ownerUserProfileName :: Value Text
ownerUserProfileName = PropertyType "OwnerUserProfileName" OwnershipSettingsProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}