module Stratosphere.Pipes.Pipe.MultiMeasureMappingProperty (
module Exports, MultiMeasureMappingProperty(..),
mkMultiMeasureMappingProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Pipes.Pipe.MultiMeasureAttributeMappingProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data MultiMeasureMappingProperty
=
MultiMeasureMappingProperty {MultiMeasureMappingProperty -> ()
haddock_workaround_ :: (),
MultiMeasureMappingProperty
-> [MultiMeasureAttributeMappingProperty]
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty],
MultiMeasureMappingProperty -> Value Text
multiMeasureName :: (Value Prelude.Text)}
deriving stock (MultiMeasureMappingProperty -> MultiMeasureMappingProperty -> Bool
(MultiMeasureMappingProperty
-> MultiMeasureMappingProperty -> Bool)
-> (MultiMeasureMappingProperty
-> MultiMeasureMappingProperty -> Bool)
-> Eq MultiMeasureMappingProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MultiMeasureMappingProperty -> MultiMeasureMappingProperty -> Bool
== :: MultiMeasureMappingProperty -> MultiMeasureMappingProperty -> Bool
$c/= :: MultiMeasureMappingProperty -> MultiMeasureMappingProperty -> Bool
/= :: MultiMeasureMappingProperty -> MultiMeasureMappingProperty -> Bool
Prelude.Eq, Int -> MultiMeasureMappingProperty -> ShowS
[MultiMeasureMappingProperty] -> ShowS
MultiMeasureMappingProperty -> String
(Int -> MultiMeasureMappingProperty -> ShowS)
-> (MultiMeasureMappingProperty -> String)
-> ([MultiMeasureMappingProperty] -> ShowS)
-> Show MultiMeasureMappingProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> MultiMeasureMappingProperty -> ShowS
showsPrec :: Int -> MultiMeasureMappingProperty -> ShowS
$cshow :: MultiMeasureMappingProperty -> String
show :: MultiMeasureMappingProperty -> String
$cshowList :: [MultiMeasureMappingProperty] -> ShowS
showList :: [MultiMeasureMappingProperty] -> ShowS
Prelude.Show)
mkMultiMeasureMappingProperty ::
[MultiMeasureAttributeMappingProperty]
-> Value Prelude.Text -> MultiMeasureMappingProperty
mkMultiMeasureMappingProperty :: [MultiMeasureAttributeMappingProperty]
-> Value Text -> MultiMeasureMappingProperty
mkMultiMeasureMappingProperty
[MultiMeasureAttributeMappingProperty]
multiMeasureAttributeMappings
Value Text
multiMeasureName
= MultiMeasureMappingProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
multiMeasureAttributeMappings = [MultiMeasureAttributeMappingProperty]
multiMeasureAttributeMappings,
multiMeasureName :: Value Text
multiMeasureName = Value Text
multiMeasureName}
instance ToResourceProperties MultiMeasureMappingProperty where
toResourceProperties :: MultiMeasureMappingProperty -> ResourceProperties
toResourceProperties MultiMeasureMappingProperty {[MultiMeasureAttributeMappingProperty]
()
Value Text
haddock_workaround_ :: MultiMeasureMappingProperty -> ()
multiMeasureAttributeMappings :: MultiMeasureMappingProperty
-> [MultiMeasureAttributeMappingProperty]
multiMeasureName :: MultiMeasureMappingProperty -> Value Text
haddock_workaround_ :: ()
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
multiMeasureName :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Pipes::Pipe.MultiMeasureMapping",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"MultiMeasureAttributeMappings"
Key -> [MultiMeasureAttributeMappingProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [MultiMeasureAttributeMappingProperty]
multiMeasureAttributeMappings,
Key
"MultiMeasureName" 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
multiMeasureName]}
instance JSON.ToJSON MultiMeasureMappingProperty where
toJSON :: MultiMeasureMappingProperty -> Value
toJSON MultiMeasureMappingProperty {[MultiMeasureAttributeMappingProperty]
()
Value Text
haddock_workaround_ :: MultiMeasureMappingProperty -> ()
multiMeasureAttributeMappings :: MultiMeasureMappingProperty
-> [MultiMeasureAttributeMappingProperty]
multiMeasureName :: MultiMeasureMappingProperty -> Value Text
haddock_workaround_ :: ()
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
multiMeasureName :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"MultiMeasureAttributeMappings"
Key -> [MultiMeasureAttributeMappingProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [MultiMeasureAttributeMappingProperty]
multiMeasureAttributeMappings,
Key
"MultiMeasureName" 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
multiMeasureName]
instance Property "MultiMeasureAttributeMappings" MultiMeasureMappingProperty where
type PropertyType "MultiMeasureAttributeMappings" MultiMeasureMappingProperty = [MultiMeasureAttributeMappingProperty]
set :: PropertyType
"MultiMeasureAttributeMappings" MultiMeasureMappingProperty
-> MultiMeasureMappingProperty -> MultiMeasureMappingProperty
set PropertyType
"MultiMeasureAttributeMappings" MultiMeasureMappingProperty
newValue MultiMeasureMappingProperty {[MultiMeasureAttributeMappingProperty]
()
Value Text
haddock_workaround_ :: MultiMeasureMappingProperty -> ()
multiMeasureAttributeMappings :: MultiMeasureMappingProperty
-> [MultiMeasureAttributeMappingProperty]
multiMeasureName :: MultiMeasureMappingProperty -> Value Text
haddock_workaround_ :: ()
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
multiMeasureName :: Value Text
..}
= MultiMeasureMappingProperty
{multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
multiMeasureAttributeMappings = [MultiMeasureAttributeMappingProperty]
PropertyType
"MultiMeasureAttributeMappings" MultiMeasureMappingProperty
newValue, ()
Value Text
haddock_workaround_ :: ()
multiMeasureName :: Value Text
haddock_workaround_ :: ()
multiMeasureName :: Value Text
..}
instance Property "MultiMeasureName" MultiMeasureMappingProperty where
type PropertyType "MultiMeasureName" MultiMeasureMappingProperty = Value Prelude.Text
set :: PropertyType "MultiMeasureName" MultiMeasureMappingProperty
-> MultiMeasureMappingProperty -> MultiMeasureMappingProperty
set PropertyType "MultiMeasureName" MultiMeasureMappingProperty
newValue MultiMeasureMappingProperty {[MultiMeasureAttributeMappingProperty]
()
Value Text
haddock_workaround_ :: MultiMeasureMappingProperty -> ()
multiMeasureAttributeMappings :: MultiMeasureMappingProperty
-> [MultiMeasureAttributeMappingProperty]
multiMeasureName :: MultiMeasureMappingProperty -> Value Text
haddock_workaround_ :: ()
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
multiMeasureName :: Value Text
..}
= MultiMeasureMappingProperty {multiMeasureName :: Value Text
multiMeasureName = PropertyType "MultiMeasureName" MultiMeasureMappingProperty
Value Text
newValue, [MultiMeasureAttributeMappingProperty]
()
haddock_workaround_ :: ()
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
haddock_workaround_ :: ()
multiMeasureAttributeMappings :: [MultiMeasureAttributeMappingProperty]
..}