stratosphere-bedrock-1.0.0: gen/Stratosphere/Bedrock/ApplicationInferenceProfile.hs

module Stratosphere.Bedrock.ApplicationInferenceProfile (
        module Exports, ApplicationInferenceProfile(..),
        mkApplicationInferenceProfile
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.ApplicationInferenceProfile.InferenceProfileModelSourceProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data ApplicationInferenceProfile
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-bedrock-applicationinferenceprofile.html>
    ApplicationInferenceProfile {haddock_workaround_ :: (),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-bedrock-applicationinferenceprofile.html#cfn-bedrock-applicationinferenceprofile-description>
                                 description :: (Prelude.Maybe (Value Prelude.Text)),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-bedrock-applicationinferenceprofile.html#cfn-bedrock-applicationinferenceprofile-inferenceprofilename>
                                 inferenceProfileName :: (Value Prelude.Text),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-bedrock-applicationinferenceprofile.html#cfn-bedrock-applicationinferenceprofile-modelsource>
                                 modelSource :: (Prelude.Maybe InferenceProfileModelSourceProperty),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-bedrock-applicationinferenceprofile.html#cfn-bedrock-applicationinferenceprofile-tags>
                                 tags :: (Prelude.Maybe [Tag])}
  deriving stock (Prelude.Eq, Prelude.Show)
mkApplicationInferenceProfile ::
  Value Prelude.Text -> ApplicationInferenceProfile
mkApplicationInferenceProfile inferenceProfileName
  = ApplicationInferenceProfile
      {haddock_workaround_ = (),
       inferenceProfileName = inferenceProfileName,
       description = Prelude.Nothing, modelSource = Prelude.Nothing,
       tags = Prelude.Nothing}
instance ToResourceProperties ApplicationInferenceProfile where
  toResourceProperties ApplicationInferenceProfile {..}
    = ResourceProperties
        {awsType = "AWS::Bedrock::ApplicationInferenceProfile",
         supportsTags = Prelude.True,
         properties = Prelude.fromList
                        ((Prelude.<>)
                           ["InferenceProfileName" JSON..= inferenceProfileName]
                           (Prelude.catMaybes
                              [(JSON..=) "Description" Prelude.<$> description,
                               (JSON..=) "ModelSource" Prelude.<$> modelSource,
                               (JSON..=) "Tags" Prelude.<$> tags]))}
instance JSON.ToJSON ApplicationInferenceProfile where
  toJSON ApplicationInferenceProfile {..}
    = JSON.object
        (Prelude.fromList
           ((Prelude.<>)
              ["InferenceProfileName" JSON..= inferenceProfileName]
              (Prelude.catMaybes
                 [(JSON..=) "Description" Prelude.<$> description,
                  (JSON..=) "ModelSource" Prelude.<$> modelSource,
                  (JSON..=) "Tags" Prelude.<$> tags])))
instance Property "Description" ApplicationInferenceProfile where
  type PropertyType "Description" ApplicationInferenceProfile = Value Prelude.Text
  set newValue ApplicationInferenceProfile {..}
    = ApplicationInferenceProfile
        {description = Prelude.pure newValue, ..}
instance Property "InferenceProfileName" ApplicationInferenceProfile where
  type PropertyType "InferenceProfileName" ApplicationInferenceProfile = Value Prelude.Text
  set newValue ApplicationInferenceProfile {..}
    = ApplicationInferenceProfile {inferenceProfileName = newValue, ..}
instance Property "ModelSource" ApplicationInferenceProfile where
  type PropertyType "ModelSource" ApplicationInferenceProfile = InferenceProfileModelSourceProperty
  set newValue ApplicationInferenceProfile {..}
    = ApplicationInferenceProfile
        {modelSource = Prelude.pure newValue, ..}
instance Property "Tags" ApplicationInferenceProfile where
  type PropertyType "Tags" ApplicationInferenceProfile = [Tag]
  set newValue ApplicationInferenceProfile {..}
    = ApplicationInferenceProfile {tags = Prelude.pure newValue, ..}