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