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