stratosphere-bedrock-1.0.0: gen/Stratosphere/Bedrock/DataSource/TransformationProperty.hs

module Stratosphere.Bedrock.DataSource.TransformationProperty (
        module Exports, TransformationProperty(..),
        mkTransformationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.DataSource.TransformationFunctionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data TransformationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-datasource-transformation.html>
    TransformationProperty {haddock_workaround_ :: (),
                            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-datasource-transformation.html#cfn-bedrock-datasource-transformation-steptoapply>
                            stepToApply :: (Value Prelude.Text),
                            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-datasource-transformation.html#cfn-bedrock-datasource-transformation-transformationfunction>
                            transformationFunction :: TransformationFunctionProperty}
  deriving stock (Prelude.Eq, Prelude.Show)
mkTransformationProperty ::
  Value Prelude.Text
  -> TransformationFunctionProperty -> TransformationProperty
mkTransformationProperty stepToApply transformationFunction
  = TransformationProperty
      {haddock_workaround_ = (), stepToApply = stepToApply,
       transformationFunction = transformationFunction}
instance ToResourceProperties TransformationProperty where
  toResourceProperties TransformationProperty {..}
    = ResourceProperties
        {awsType = "AWS::Bedrock::DataSource.Transformation",
         supportsTags = Prelude.False,
         properties = ["StepToApply" JSON..= stepToApply,
                       "TransformationFunction" JSON..= transformationFunction]}
instance JSON.ToJSON TransformationProperty where
  toJSON TransformationProperty {..}
    = JSON.object
        ["StepToApply" JSON..= stepToApply,
         "TransformationFunction" JSON..= transformationFunction]
instance Property "StepToApply" TransformationProperty where
  type PropertyType "StepToApply" TransformationProperty = Value Prelude.Text
  set newValue TransformationProperty {..}
    = TransformationProperty {stepToApply = newValue, ..}
instance Property "TransformationFunction" TransformationProperty where
  type PropertyType "TransformationFunction" TransformationProperty = TransformationFunctionProperty
  set newValue TransformationProperty {..}
    = TransformationProperty {transformationFunction = newValue, ..}