stratosphere-bedrock-1.0.0: gen/Stratosphere/Bedrock/FlowVersion/FlowNodeInputProperty.hs

module Stratosphere.Bedrock.FlowVersion.FlowNodeInputProperty (
        FlowNodeInputProperty(..), mkFlowNodeInputProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data FlowNodeInputProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-flownodeinput.html>
    FlowNodeInputProperty {haddock_workaround_ :: (),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-flownodeinput.html#cfn-bedrock-flowversion-flownodeinput-expression>
                           expression :: (Value Prelude.Text),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-flownodeinput.html#cfn-bedrock-flowversion-flownodeinput-name>
                           name :: (Value Prelude.Text),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-flownodeinput.html#cfn-bedrock-flowversion-flownodeinput-type>
                           type' :: (Value Prelude.Text)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkFlowNodeInputProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text -> FlowNodeInputProperty
mkFlowNodeInputProperty expression name type'
  = FlowNodeInputProperty
      {haddock_workaround_ = (), expression = expression, name = name,
       type' = type'}
instance ToResourceProperties FlowNodeInputProperty where
  toResourceProperties FlowNodeInputProperty {..}
    = ResourceProperties
        {awsType = "AWS::Bedrock::FlowVersion.FlowNodeInput",
         supportsTags = Prelude.False,
         properties = ["Expression" JSON..= expression, "Name" JSON..= name,
                       "Type" JSON..= type']}
instance JSON.ToJSON FlowNodeInputProperty where
  toJSON FlowNodeInputProperty {..}
    = JSON.object
        ["Expression" JSON..= expression, "Name" JSON..= name,
         "Type" JSON..= type']
instance Property "Expression" FlowNodeInputProperty where
  type PropertyType "Expression" FlowNodeInputProperty = Value Prelude.Text
  set newValue FlowNodeInputProperty {..}
    = FlowNodeInputProperty {expression = newValue, ..}
instance Property "Name" FlowNodeInputProperty where
  type PropertyType "Name" FlowNodeInputProperty = Value Prelude.Text
  set newValue FlowNodeInputProperty {..}
    = FlowNodeInputProperty {name = newValue, ..}
instance Property "Type" FlowNodeInputProperty where
  type PropertyType "Type" FlowNodeInputProperty = Value Prelude.Text
  set newValue FlowNodeInputProperty {..}
    = FlowNodeInputProperty {type' = newValue, ..}