module Stratosphere.DataPipeline.Pipeline.ParameterValueProperty (
        ParameterValueProperty(..), mkParameterValueProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ParameterValueProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-datapipeline-pipeline-parametervalue.html>
    ParameterValueProperty {ParameterValueProperty -> ()
haddock_workaround_ :: (),
                            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-datapipeline-pipeline-parametervalue.html#cfn-datapipeline-pipeline-parametervalue-id>
                            ParameterValueProperty -> Value Text
id :: (Value Prelude.Text),
                            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-datapipeline-pipeline-parametervalue.html#cfn-datapipeline-pipeline-parametervalue-stringvalue>
                            ParameterValueProperty -> Value Text
stringValue :: (Value Prelude.Text)}
  deriving stock (ParameterValueProperty -> ParameterValueProperty -> Bool
(ParameterValueProperty -> ParameterValueProperty -> Bool)
-> (ParameterValueProperty -> ParameterValueProperty -> Bool)
-> Eq ParameterValueProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ParameterValueProperty -> ParameterValueProperty -> Bool
== :: ParameterValueProperty -> ParameterValueProperty -> Bool
$c/= :: ParameterValueProperty -> ParameterValueProperty -> Bool
/= :: ParameterValueProperty -> ParameterValueProperty -> Bool
Prelude.Eq, Int -> ParameterValueProperty -> ShowS
[ParameterValueProperty] -> ShowS
ParameterValueProperty -> String
(Int -> ParameterValueProperty -> ShowS)
-> (ParameterValueProperty -> String)
-> ([ParameterValueProperty] -> ShowS)
-> Show ParameterValueProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ParameterValueProperty -> ShowS
showsPrec :: Int -> ParameterValueProperty -> ShowS
$cshow :: ParameterValueProperty -> String
show :: ParameterValueProperty -> String
$cshowList :: [ParameterValueProperty] -> ShowS
showList :: [ParameterValueProperty] -> ShowS
Prelude.Show)
mkParameterValueProperty ::
  Value Prelude.Text -> Value Prelude.Text -> ParameterValueProperty
mkParameterValueProperty :: Value Text -> Value Text -> ParameterValueProperty
mkParameterValueProperty Value Text
id Value Text
stringValue
  = ParameterValueProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), id :: Value Text
id = Value Text
id, stringValue :: Value Text
stringValue = Value Text
stringValue}
instance ToResourceProperties ParameterValueProperty where
  toResourceProperties :: ParameterValueProperty -> ResourceProperties
toResourceProperties ParameterValueProperty {()
Value Text
haddock_workaround_ :: ParameterValueProperty -> ()
id :: ParameterValueProperty -> Value Text
stringValue :: ParameterValueProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
stringValue :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::DataPipeline::Pipeline.ParameterValue",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Id" 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
id, Key
"StringValue" 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
stringValue]}
instance JSON.ToJSON ParameterValueProperty where
  toJSON :: ParameterValueProperty -> Value
toJSON ParameterValueProperty {()
Value Text
haddock_workaround_ :: ParameterValueProperty -> ()
id :: ParameterValueProperty -> Value Text
stringValue :: ParameterValueProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
stringValue :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Id" 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
id, Key
"StringValue" 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
stringValue]
instance Property "Id" ParameterValueProperty where
  type PropertyType "Id" ParameterValueProperty = Value Prelude.Text
  set :: PropertyType "Id" ParameterValueProperty
-> ParameterValueProperty -> ParameterValueProperty
set PropertyType "Id" ParameterValueProperty
newValue ParameterValueProperty {()
Value Text
haddock_workaround_ :: ParameterValueProperty -> ()
id :: ParameterValueProperty -> Value Text
stringValue :: ParameterValueProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
stringValue :: Value Text
..}
    = ParameterValueProperty {id :: Value Text
id = PropertyType "Id" ParameterValueProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
stringValue :: Value Text
haddock_workaround_ :: ()
stringValue :: Value Text
..}
instance Property "StringValue" ParameterValueProperty where
  type PropertyType "StringValue" ParameterValueProperty = Value Prelude.Text
  set :: PropertyType "StringValue" ParameterValueProperty
-> ParameterValueProperty -> ParameterValueProperty
set PropertyType "StringValue" ParameterValueProperty
newValue ParameterValueProperty {()
Value Text
haddock_workaround_ :: ParameterValueProperty -> ()
id :: ParameterValueProperty -> Value Text
stringValue :: ParameterValueProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
stringValue :: Value Text
..}
    = ParameterValueProperty {stringValue :: Value Text
stringValue = PropertyType "StringValue" ParameterValueProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
id :: Value Text
haddock_workaround_ :: ()
id :: Value Text
..}