module Stratosphere.Bedrock.FlowVersion.PromptFlowNodeInlineConfigurationProperty (
        module Exports, PromptFlowNodeInlineConfigurationProperty(..),
        mkPromptFlowNodeInlineConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.FlowVersion.PromptInferenceConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.FlowVersion.PromptTemplateConfigurationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data PromptFlowNodeInlineConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-promptflownodeinlineconfiguration.html>
    PromptFlowNodeInlineConfigurationProperty {PromptFlowNodeInlineConfigurationProperty -> ()
haddock_workaround_ :: (),
                                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-promptflownodeinlineconfiguration.html#cfn-bedrock-flowversion-promptflownodeinlineconfiguration-inferenceconfiguration>
                                               PromptFlowNodeInlineConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
inferenceConfiguration :: (Prelude.Maybe PromptInferenceConfigurationProperty),
                                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-promptflownodeinlineconfiguration.html#cfn-bedrock-flowversion-promptflownodeinlineconfiguration-modelid>
                                               PromptFlowNodeInlineConfigurationProperty -> Value Text
modelId :: (Value Prelude.Text),
                                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-promptflownodeinlineconfiguration.html#cfn-bedrock-flowversion-promptflownodeinlineconfiguration-templateconfiguration>
                                               PromptFlowNodeInlineConfigurationProperty
-> PromptTemplateConfigurationProperty
templateConfiguration :: PromptTemplateConfigurationProperty,
                                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flowversion-promptflownodeinlineconfiguration.html#cfn-bedrock-flowversion-promptflownodeinlineconfiguration-templatetype>
                                               PromptFlowNodeInlineConfigurationProperty -> Value Text
templateType :: (Value Prelude.Text)}
  deriving stock (PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty -> Bool
(PromptFlowNodeInlineConfigurationProperty
 -> PromptFlowNodeInlineConfigurationProperty -> Bool)
-> (PromptFlowNodeInlineConfigurationProperty
    -> PromptFlowNodeInlineConfigurationProperty -> Bool)
-> Eq PromptFlowNodeInlineConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty -> Bool
== :: PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty -> Bool
$c/= :: PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty -> Bool
/= :: PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty -> Bool
Prelude.Eq, Int -> PromptFlowNodeInlineConfigurationProperty -> ShowS
[PromptFlowNodeInlineConfigurationProperty] -> ShowS
PromptFlowNodeInlineConfigurationProperty -> String
(Int -> PromptFlowNodeInlineConfigurationProperty -> ShowS)
-> (PromptFlowNodeInlineConfigurationProperty -> String)
-> ([PromptFlowNodeInlineConfigurationProperty] -> ShowS)
-> Show PromptFlowNodeInlineConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PromptFlowNodeInlineConfigurationProperty -> ShowS
showsPrec :: Int -> PromptFlowNodeInlineConfigurationProperty -> ShowS
$cshow :: PromptFlowNodeInlineConfigurationProperty -> String
show :: PromptFlowNodeInlineConfigurationProperty -> String
$cshowList :: [PromptFlowNodeInlineConfigurationProperty] -> ShowS
showList :: [PromptFlowNodeInlineConfigurationProperty] -> ShowS
Prelude.Show)
mkPromptFlowNodeInlineConfigurationProperty ::
  Value Prelude.Text
  -> PromptTemplateConfigurationProperty
     -> Value Prelude.Text -> PromptFlowNodeInlineConfigurationProperty
mkPromptFlowNodeInlineConfigurationProperty :: Value Text
-> PromptTemplateConfigurationProperty
-> Value Text
-> PromptFlowNodeInlineConfigurationProperty
mkPromptFlowNodeInlineConfigurationProperty
  Value Text
modelId
  PromptTemplateConfigurationProperty
templateConfiguration
  Value Text
templateType
  = PromptFlowNodeInlineConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), modelId :: Value Text
modelId = Value Text
modelId,
       templateConfiguration :: PromptTemplateConfigurationProperty
templateConfiguration = PromptTemplateConfigurationProperty
templateConfiguration,
       templateType :: Value Text
templateType = Value Text
templateType,
       inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
inferenceConfiguration = Maybe PromptInferenceConfigurationProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties PromptFlowNodeInlineConfigurationProperty where
  toResourceProperties :: PromptFlowNodeInlineConfigurationProperty -> ResourceProperties
toResourceProperties PromptFlowNodeInlineConfigurationProperty {Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: PromptFlowNodeInlineConfigurationProperty -> ()
inferenceConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
modelId :: PromptFlowNodeInlineConfigurationProperty -> Value Text
templateConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> PromptTemplateConfigurationProperty
templateType :: PromptFlowNodeInlineConfigurationProperty -> Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Bedrock::FlowVersion.PromptFlowNodeInlineConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ModelId" 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
modelId,
                            Key
"TemplateConfiguration" Key -> PromptTemplateConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= PromptTemplateConfigurationProperty
templateConfiguration,
                            Key
"TemplateType" 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
templateType]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> PromptInferenceConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InferenceConfiguration"
                                 (PromptInferenceConfigurationProperty -> (Key, Value))
-> Maybe PromptInferenceConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PromptInferenceConfigurationProperty
inferenceConfiguration]))}
instance JSON.ToJSON PromptFlowNodeInlineConfigurationProperty where
  toJSON :: PromptFlowNodeInlineConfigurationProperty -> Value
toJSON PromptFlowNodeInlineConfigurationProperty {Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: PromptFlowNodeInlineConfigurationProperty -> ()
inferenceConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
modelId :: PromptFlowNodeInlineConfigurationProperty -> Value Text
templateConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> PromptTemplateConfigurationProperty
templateType :: PromptFlowNodeInlineConfigurationProperty -> Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ModelId" 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
modelId,
               Key
"TemplateConfiguration" Key -> PromptTemplateConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= PromptTemplateConfigurationProperty
templateConfiguration,
               Key
"TemplateType" 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
templateType]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> PromptInferenceConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InferenceConfiguration"
                    (PromptInferenceConfigurationProperty -> (Key, Value))
-> Maybe PromptInferenceConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PromptInferenceConfigurationProperty
inferenceConfiguration])))
instance Property "InferenceConfiguration" PromptFlowNodeInlineConfigurationProperty where
  type PropertyType "InferenceConfiguration" PromptFlowNodeInlineConfigurationProperty = PromptInferenceConfigurationProperty
  set :: PropertyType
  "InferenceConfiguration" PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
set PropertyType
  "InferenceConfiguration" PromptFlowNodeInlineConfigurationProperty
newValue PromptFlowNodeInlineConfigurationProperty {Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: PromptFlowNodeInlineConfigurationProperty -> ()
inferenceConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
modelId :: PromptFlowNodeInlineConfigurationProperty -> Value Text
templateConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> PromptTemplateConfigurationProperty
templateType :: PromptFlowNodeInlineConfigurationProperty -> Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
    = PromptFlowNodeInlineConfigurationProperty
        {inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
inferenceConfiguration = PromptInferenceConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "InferenceConfiguration" PromptFlowNodeInlineConfigurationProperty
PromptInferenceConfigurationProperty
newValue, ()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: ()
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
haddock_workaround_ :: ()
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
instance Property "ModelId" PromptFlowNodeInlineConfigurationProperty where
  type PropertyType "ModelId" PromptFlowNodeInlineConfigurationProperty = Value Prelude.Text
  set :: PropertyType "ModelId" PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
set PropertyType "ModelId" PromptFlowNodeInlineConfigurationProperty
newValue PromptFlowNodeInlineConfigurationProperty {Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: PromptFlowNodeInlineConfigurationProperty -> ()
inferenceConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
modelId :: PromptFlowNodeInlineConfigurationProperty -> Value Text
templateConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> PromptTemplateConfigurationProperty
templateType :: PromptFlowNodeInlineConfigurationProperty -> Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
    = PromptFlowNodeInlineConfigurationProperty
        {modelId :: Value Text
modelId = PropertyType "ModelId" PromptFlowNodeInlineConfigurationProperty
Value Text
newValue, Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
instance Property "TemplateConfiguration" PromptFlowNodeInlineConfigurationProperty where
  type PropertyType "TemplateConfiguration" PromptFlowNodeInlineConfigurationProperty = PromptTemplateConfigurationProperty
  set :: PropertyType
  "TemplateConfiguration" PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
set PropertyType
  "TemplateConfiguration" PromptFlowNodeInlineConfigurationProperty
newValue PromptFlowNodeInlineConfigurationProperty {Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: PromptFlowNodeInlineConfigurationProperty -> ()
inferenceConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
modelId :: PromptFlowNodeInlineConfigurationProperty -> Value Text
templateConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> PromptTemplateConfigurationProperty
templateType :: PromptFlowNodeInlineConfigurationProperty -> Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
    = PromptFlowNodeInlineConfigurationProperty
        {templateConfiguration :: PromptTemplateConfigurationProperty
templateConfiguration = PropertyType
  "TemplateConfiguration" PromptFlowNodeInlineConfigurationProperty
PromptTemplateConfigurationProperty
newValue, Maybe PromptInferenceConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateType :: Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateType :: Value Text
..}
instance Property "TemplateType" PromptFlowNodeInlineConfigurationProperty where
  type PropertyType "TemplateType" PromptFlowNodeInlineConfigurationProperty = Value Prelude.Text
  set :: PropertyType
  "TemplateType" PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
-> PromptFlowNodeInlineConfigurationProperty
set PropertyType
  "TemplateType" PromptFlowNodeInlineConfigurationProperty
newValue PromptFlowNodeInlineConfigurationProperty {Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: PromptFlowNodeInlineConfigurationProperty -> ()
inferenceConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> Maybe PromptInferenceConfigurationProperty
modelId :: PromptFlowNodeInlineConfigurationProperty -> Value Text
templateConfiguration :: PromptFlowNodeInlineConfigurationProperty
-> PromptTemplateConfigurationProperty
templateType :: PromptFlowNodeInlineConfigurationProperty -> Value Text
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
templateType :: Value Text
..}
    = PromptFlowNodeInlineConfigurationProperty
        {templateType :: Value Text
templateType = PropertyType
  "TemplateType" PromptFlowNodeInlineConfigurationProperty
Value Text
newValue, Maybe PromptInferenceConfigurationProperty
()
Value Text
PromptTemplateConfigurationProperty
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
haddock_workaround_ :: ()
inferenceConfiguration :: Maybe PromptInferenceConfigurationProperty
modelId :: Value Text
templateConfiguration :: PromptTemplateConfigurationProperty
..}