module Stratosphere.Bedrock.Flow.InlineCodeFlowNodeConfigurationProperty (
        InlineCodeFlowNodeConfigurationProperty(..),
        mkInlineCodeFlowNodeConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data InlineCodeFlowNodeConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flow-inlinecodeflownodeconfiguration.html>
    InlineCodeFlowNodeConfigurationProperty {InlineCodeFlowNodeConfigurationProperty -> ()
haddock_workaround_ :: (),
                                             -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flow-inlinecodeflownodeconfiguration.html#cfn-bedrock-flow-inlinecodeflownodeconfiguration-code>
                                             InlineCodeFlowNodeConfigurationProperty -> Value Text
code :: (Value Prelude.Text),
                                             -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-flow-inlinecodeflownodeconfiguration.html#cfn-bedrock-flow-inlinecodeflownodeconfiguration-language>
                                             InlineCodeFlowNodeConfigurationProperty -> Value Text
language :: (Value Prelude.Text)}
  deriving stock (InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty -> Bool
(InlineCodeFlowNodeConfigurationProperty
 -> InlineCodeFlowNodeConfigurationProperty -> Bool)
-> (InlineCodeFlowNodeConfigurationProperty
    -> InlineCodeFlowNodeConfigurationProperty -> Bool)
-> Eq InlineCodeFlowNodeConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty -> Bool
== :: InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty -> Bool
$c/= :: InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty -> Bool
/= :: InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty -> Bool
Prelude.Eq, Int -> InlineCodeFlowNodeConfigurationProperty -> ShowS
[InlineCodeFlowNodeConfigurationProperty] -> ShowS
InlineCodeFlowNodeConfigurationProperty -> String
(Int -> InlineCodeFlowNodeConfigurationProperty -> ShowS)
-> (InlineCodeFlowNodeConfigurationProperty -> String)
-> ([InlineCodeFlowNodeConfigurationProperty] -> ShowS)
-> Show InlineCodeFlowNodeConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> InlineCodeFlowNodeConfigurationProperty -> ShowS
showsPrec :: Int -> InlineCodeFlowNodeConfigurationProperty -> ShowS
$cshow :: InlineCodeFlowNodeConfigurationProperty -> String
show :: InlineCodeFlowNodeConfigurationProperty -> String
$cshowList :: [InlineCodeFlowNodeConfigurationProperty] -> ShowS
showList :: [InlineCodeFlowNodeConfigurationProperty] -> ShowS
Prelude.Show)
mkInlineCodeFlowNodeConfigurationProperty ::
  Value Prelude.Text
  -> Value Prelude.Text -> InlineCodeFlowNodeConfigurationProperty
mkInlineCodeFlowNodeConfigurationProperty :: Value Text -> Value Text -> InlineCodeFlowNodeConfigurationProperty
mkInlineCodeFlowNodeConfigurationProperty Value Text
code Value Text
language
  = InlineCodeFlowNodeConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), code :: Value Text
code = Value Text
code, language :: Value Text
language = Value Text
language}
instance ToResourceProperties InlineCodeFlowNodeConfigurationProperty where
  toResourceProperties :: InlineCodeFlowNodeConfigurationProperty -> ResourceProperties
toResourceProperties InlineCodeFlowNodeConfigurationProperty {()
Value Text
haddock_workaround_ :: InlineCodeFlowNodeConfigurationProperty -> ()
code :: InlineCodeFlowNodeConfigurationProperty -> Value Text
language :: InlineCodeFlowNodeConfigurationProperty -> Value Text
haddock_workaround_ :: ()
code :: Value Text
language :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Bedrock::Flow.InlineCodeFlowNodeConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Code" 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
code, Key
"Language" 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
language]}
instance JSON.ToJSON InlineCodeFlowNodeConfigurationProperty where
  toJSON :: InlineCodeFlowNodeConfigurationProperty -> Value
toJSON InlineCodeFlowNodeConfigurationProperty {()
Value Text
haddock_workaround_ :: InlineCodeFlowNodeConfigurationProperty -> ()
code :: InlineCodeFlowNodeConfigurationProperty -> Value Text
language :: InlineCodeFlowNodeConfigurationProperty -> Value Text
haddock_workaround_ :: ()
code :: Value Text
language :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Code" 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
code, Key
"Language" 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
language]
instance Property "Code" InlineCodeFlowNodeConfigurationProperty where
  type PropertyType "Code" InlineCodeFlowNodeConfigurationProperty = Value Prelude.Text
  set :: PropertyType "Code" InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty
set PropertyType "Code" InlineCodeFlowNodeConfigurationProperty
newValue InlineCodeFlowNodeConfigurationProperty {()
Value Text
haddock_workaround_ :: InlineCodeFlowNodeConfigurationProperty -> ()
code :: InlineCodeFlowNodeConfigurationProperty -> Value Text
language :: InlineCodeFlowNodeConfigurationProperty -> Value Text
haddock_workaround_ :: ()
code :: Value Text
language :: Value Text
..}
    = InlineCodeFlowNodeConfigurationProperty {code :: Value Text
code = PropertyType "Code" InlineCodeFlowNodeConfigurationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
language :: Value Text
haddock_workaround_ :: ()
language :: Value Text
..}
instance Property "Language" InlineCodeFlowNodeConfigurationProperty where
  type PropertyType "Language" InlineCodeFlowNodeConfigurationProperty = Value Prelude.Text
  set :: PropertyType "Language" InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty
-> InlineCodeFlowNodeConfigurationProperty
set PropertyType "Language" InlineCodeFlowNodeConfigurationProperty
newValue InlineCodeFlowNodeConfigurationProperty {()
Value Text
haddock_workaround_ :: InlineCodeFlowNodeConfigurationProperty -> ()
code :: InlineCodeFlowNodeConfigurationProperty -> Value Text
language :: InlineCodeFlowNodeConfigurationProperty -> Value Text
haddock_workaround_ :: ()
code :: Value Text
language :: Value Text
..}
    = InlineCodeFlowNodeConfigurationProperty {language :: Value Text
language = PropertyType "Language" InlineCodeFlowNodeConfigurationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
code :: Value Text
haddock_workaround_ :: ()
code :: Value Text
..}