module Stratosphere.Bedrock.FlowVersion.ConditionFlowNodeConfigurationProperty (
module Exports, ConditionFlowNodeConfigurationProperty(..),
mkConditionFlowNodeConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.FlowVersion.FlowConditionProperty as Exports
import Stratosphere.ResourceProperties
data ConditionFlowNodeConfigurationProperty
=
ConditionFlowNodeConfigurationProperty {ConditionFlowNodeConfigurationProperty -> ()
haddock_workaround_ :: (),
ConditionFlowNodeConfigurationProperty -> [FlowConditionProperty]
conditions :: [FlowConditionProperty]}
deriving stock (ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty -> Bool
(ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty -> Bool)
-> (ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty -> Bool)
-> Eq ConditionFlowNodeConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty -> Bool
== :: ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty -> Bool
$c/= :: ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty -> Bool
/= :: ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty -> Bool
Prelude.Eq, Int -> ConditionFlowNodeConfigurationProperty -> ShowS
[ConditionFlowNodeConfigurationProperty] -> ShowS
ConditionFlowNodeConfigurationProperty -> String
(Int -> ConditionFlowNodeConfigurationProperty -> ShowS)
-> (ConditionFlowNodeConfigurationProperty -> String)
-> ([ConditionFlowNodeConfigurationProperty] -> ShowS)
-> Show ConditionFlowNodeConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ConditionFlowNodeConfigurationProperty -> ShowS
showsPrec :: Int -> ConditionFlowNodeConfigurationProperty -> ShowS
$cshow :: ConditionFlowNodeConfigurationProperty -> String
show :: ConditionFlowNodeConfigurationProperty -> String
$cshowList :: [ConditionFlowNodeConfigurationProperty] -> ShowS
showList :: [ConditionFlowNodeConfigurationProperty] -> ShowS
Prelude.Show)
mkConditionFlowNodeConfigurationProperty ::
[FlowConditionProperty] -> ConditionFlowNodeConfigurationProperty
mkConditionFlowNodeConfigurationProperty :: [FlowConditionProperty] -> ConditionFlowNodeConfigurationProperty
mkConditionFlowNodeConfigurationProperty [FlowConditionProperty]
conditions
= ConditionFlowNodeConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), conditions :: [FlowConditionProperty]
conditions = [FlowConditionProperty]
conditions}
instance ToResourceProperties ConditionFlowNodeConfigurationProperty where
toResourceProperties :: ConditionFlowNodeConfigurationProperty -> ResourceProperties
toResourceProperties ConditionFlowNodeConfigurationProperty {[FlowConditionProperty]
()
haddock_workaround_ :: ConditionFlowNodeConfigurationProperty -> ()
conditions :: ConditionFlowNodeConfigurationProperty -> [FlowConditionProperty]
haddock_workaround_ :: ()
conditions :: [FlowConditionProperty]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Bedrock::FlowVersion.ConditionFlowNodeConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"Conditions" Key -> [FlowConditionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [FlowConditionProperty]
conditions]}
instance JSON.ToJSON ConditionFlowNodeConfigurationProperty where
toJSON :: ConditionFlowNodeConfigurationProperty -> Value
toJSON ConditionFlowNodeConfigurationProperty {[FlowConditionProperty]
()
haddock_workaround_ :: ConditionFlowNodeConfigurationProperty -> ()
conditions :: ConditionFlowNodeConfigurationProperty -> [FlowConditionProperty]
haddock_workaround_ :: ()
conditions :: [FlowConditionProperty]
..}
= [(Key, Value)] -> Value
JSON.object [Key
"Conditions" Key -> [FlowConditionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [FlowConditionProperty]
conditions]
instance Property "Conditions" ConditionFlowNodeConfigurationProperty where
type PropertyType "Conditions" ConditionFlowNodeConfigurationProperty = [FlowConditionProperty]
set :: PropertyType "Conditions" ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty
-> ConditionFlowNodeConfigurationProperty
set PropertyType "Conditions" ConditionFlowNodeConfigurationProperty
newValue ConditionFlowNodeConfigurationProperty {[FlowConditionProperty]
()
haddock_workaround_ :: ConditionFlowNodeConfigurationProperty -> ()
conditions :: ConditionFlowNodeConfigurationProperty -> [FlowConditionProperty]
haddock_workaround_ :: ()
conditions :: [FlowConditionProperty]
..}
= ConditionFlowNodeConfigurationProperty
{conditions :: [FlowConditionProperty]
conditions = [FlowConditionProperty]
PropertyType "Conditions" ConditionFlowNodeConfigurationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}