module Stratosphere.CleanRooms.IdMappingTable.IdMappingTableInputReferencePropertiesProperty (
module Exports, IdMappingTableInputReferencePropertiesProperty(..),
mkIdMappingTableInputReferencePropertiesProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.CleanRooms.IdMappingTable.IdMappingTableInputSourceProperty as Exports
import Stratosphere.ResourceProperties
data IdMappingTableInputReferencePropertiesProperty
=
IdMappingTableInputReferencePropertiesProperty {IdMappingTableInputReferencePropertiesProperty -> ()
haddock_workaround_ :: (),
IdMappingTableInputReferencePropertiesProperty
-> [IdMappingTableInputSourceProperty]
idMappingTableInputSource :: [IdMappingTableInputSourceProperty]}
deriving stock (IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty -> Bool
(IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty -> Bool)
-> (IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty -> Bool)
-> Eq IdMappingTableInputReferencePropertiesProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty -> Bool
== :: IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty -> Bool
$c/= :: IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty -> Bool
/= :: IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty -> Bool
Prelude.Eq, Int -> IdMappingTableInputReferencePropertiesProperty -> ShowS
[IdMappingTableInputReferencePropertiesProperty] -> ShowS
IdMappingTableInputReferencePropertiesProperty -> String
(Int -> IdMappingTableInputReferencePropertiesProperty -> ShowS)
-> (IdMappingTableInputReferencePropertiesProperty -> String)
-> ([IdMappingTableInputReferencePropertiesProperty] -> ShowS)
-> Show IdMappingTableInputReferencePropertiesProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> IdMappingTableInputReferencePropertiesProperty -> ShowS
showsPrec :: Int -> IdMappingTableInputReferencePropertiesProperty -> ShowS
$cshow :: IdMappingTableInputReferencePropertiesProperty -> String
show :: IdMappingTableInputReferencePropertiesProperty -> String
$cshowList :: [IdMappingTableInputReferencePropertiesProperty] -> ShowS
showList :: [IdMappingTableInputReferencePropertiesProperty] -> ShowS
Prelude.Show)
mkIdMappingTableInputReferencePropertiesProperty ::
[IdMappingTableInputSourceProperty]
-> IdMappingTableInputReferencePropertiesProperty
mkIdMappingTableInputReferencePropertiesProperty :: [IdMappingTableInputSourceProperty]
-> IdMappingTableInputReferencePropertiesProperty
mkIdMappingTableInputReferencePropertiesProperty
[IdMappingTableInputSourceProperty]
idMappingTableInputSource
= IdMappingTableInputReferencePropertiesProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
idMappingTableInputSource :: [IdMappingTableInputSourceProperty]
idMappingTableInputSource = [IdMappingTableInputSourceProperty]
idMappingTableInputSource}
instance ToResourceProperties IdMappingTableInputReferencePropertiesProperty where
toResourceProperties :: IdMappingTableInputReferencePropertiesProperty
-> ResourceProperties
toResourceProperties
IdMappingTableInputReferencePropertiesProperty {[IdMappingTableInputSourceProperty]
()
haddock_workaround_ :: IdMappingTableInputReferencePropertiesProperty -> ()
idMappingTableInputSource :: IdMappingTableInputReferencePropertiesProperty
-> [IdMappingTableInputSourceProperty]
haddock_workaround_ :: ()
idMappingTableInputSource :: [IdMappingTableInputSourceProperty]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::CleanRooms::IdMappingTable.IdMappingTableInputReferenceProperties",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"IdMappingTableInputSource"
Key -> [IdMappingTableInputSourceProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [IdMappingTableInputSourceProperty]
idMappingTableInputSource]}
instance JSON.ToJSON IdMappingTableInputReferencePropertiesProperty where
toJSON :: IdMappingTableInputReferencePropertiesProperty -> Value
toJSON IdMappingTableInputReferencePropertiesProperty {[IdMappingTableInputSourceProperty]
()
haddock_workaround_ :: IdMappingTableInputReferencePropertiesProperty -> ()
idMappingTableInputSource :: IdMappingTableInputReferencePropertiesProperty
-> [IdMappingTableInputSourceProperty]
haddock_workaround_ :: ()
idMappingTableInputSource :: [IdMappingTableInputSourceProperty]
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"IdMappingTableInputSource" Key -> [IdMappingTableInputSourceProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [IdMappingTableInputSourceProperty]
idMappingTableInputSource]
instance Property "IdMappingTableInputSource" IdMappingTableInputReferencePropertiesProperty where
type PropertyType "IdMappingTableInputSource" IdMappingTableInputReferencePropertiesProperty = [IdMappingTableInputSourceProperty]
set :: PropertyType
"IdMappingTableInputSource"
IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty
-> IdMappingTableInputReferencePropertiesProperty
set PropertyType
"IdMappingTableInputSource"
IdMappingTableInputReferencePropertiesProperty
newValue IdMappingTableInputReferencePropertiesProperty {[IdMappingTableInputSourceProperty]
()
haddock_workaround_ :: IdMappingTableInputReferencePropertiesProperty -> ()
idMappingTableInputSource :: IdMappingTableInputReferencePropertiesProperty
-> [IdMappingTableInputSourceProperty]
haddock_workaround_ :: ()
idMappingTableInputSource :: [IdMappingTableInputSourceProperty]
..}
= IdMappingTableInputReferencePropertiesProperty
{idMappingTableInputSource :: [IdMappingTableInputSourceProperty]
idMappingTableInputSource = [IdMappingTableInputSourceProperty]
PropertyType
"IdMappingTableInputSource"
IdMappingTableInputReferencePropertiesProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}