module Stratosphere.Lex.Bot.SlotDefaultValueSpecificationProperty (
        module Exports, SlotDefaultValueSpecificationProperty(..),
        mkSlotDefaultValueSpecificationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Lex.Bot.SlotDefaultValueProperty as Exports
import Stratosphere.ResourceProperties
data SlotDefaultValueSpecificationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lex-bot-slotdefaultvaluespecification.html>
    SlotDefaultValueSpecificationProperty {SlotDefaultValueSpecificationProperty -> ()
haddock_workaround_ :: (),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lex-bot-slotdefaultvaluespecification.html#cfn-lex-bot-slotdefaultvaluespecification-defaultvaluelist>
                                           SlotDefaultValueSpecificationProperty -> [SlotDefaultValueProperty]
defaultValueList :: [SlotDefaultValueProperty]}
  deriving stock (SlotDefaultValueSpecificationProperty
-> SlotDefaultValueSpecificationProperty -> Bool
(SlotDefaultValueSpecificationProperty
 -> SlotDefaultValueSpecificationProperty -> Bool)
-> (SlotDefaultValueSpecificationProperty
    -> SlotDefaultValueSpecificationProperty -> Bool)
-> Eq SlotDefaultValueSpecificationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SlotDefaultValueSpecificationProperty
-> SlotDefaultValueSpecificationProperty -> Bool
== :: SlotDefaultValueSpecificationProperty
-> SlotDefaultValueSpecificationProperty -> Bool
$c/= :: SlotDefaultValueSpecificationProperty
-> SlotDefaultValueSpecificationProperty -> Bool
/= :: SlotDefaultValueSpecificationProperty
-> SlotDefaultValueSpecificationProperty -> Bool
Prelude.Eq, Int -> SlotDefaultValueSpecificationProperty -> ShowS
[SlotDefaultValueSpecificationProperty] -> ShowS
SlotDefaultValueSpecificationProperty -> String
(Int -> SlotDefaultValueSpecificationProperty -> ShowS)
-> (SlotDefaultValueSpecificationProperty -> String)
-> ([SlotDefaultValueSpecificationProperty] -> ShowS)
-> Show SlotDefaultValueSpecificationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SlotDefaultValueSpecificationProperty -> ShowS
showsPrec :: Int -> SlotDefaultValueSpecificationProperty -> ShowS
$cshow :: SlotDefaultValueSpecificationProperty -> String
show :: SlotDefaultValueSpecificationProperty -> String
$cshowList :: [SlotDefaultValueSpecificationProperty] -> ShowS
showList :: [SlotDefaultValueSpecificationProperty] -> ShowS
Prelude.Show)
mkSlotDefaultValueSpecificationProperty ::
  [SlotDefaultValueProperty] -> SlotDefaultValueSpecificationProperty
mkSlotDefaultValueSpecificationProperty :: [SlotDefaultValueProperty] -> SlotDefaultValueSpecificationProperty
mkSlotDefaultValueSpecificationProperty [SlotDefaultValueProperty]
defaultValueList
  = SlotDefaultValueSpecificationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), defaultValueList :: [SlotDefaultValueProperty]
defaultValueList = [SlotDefaultValueProperty]
defaultValueList}
instance ToResourceProperties SlotDefaultValueSpecificationProperty where
  toResourceProperties :: SlotDefaultValueSpecificationProperty -> ResourceProperties
toResourceProperties SlotDefaultValueSpecificationProperty {[SlotDefaultValueProperty]
()
haddock_workaround_ :: SlotDefaultValueSpecificationProperty -> ()
defaultValueList :: SlotDefaultValueSpecificationProperty -> [SlotDefaultValueProperty]
haddock_workaround_ :: ()
defaultValueList :: [SlotDefaultValueProperty]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Lex::Bot.SlotDefaultValueSpecification",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"DefaultValueList" Key -> [SlotDefaultValueProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [SlotDefaultValueProperty]
defaultValueList]}
instance JSON.ToJSON SlotDefaultValueSpecificationProperty where
  toJSON :: SlotDefaultValueSpecificationProperty -> Value
toJSON SlotDefaultValueSpecificationProperty {[SlotDefaultValueProperty]
()
haddock_workaround_ :: SlotDefaultValueSpecificationProperty -> ()
defaultValueList :: SlotDefaultValueSpecificationProperty -> [SlotDefaultValueProperty]
haddock_workaround_ :: ()
defaultValueList :: [SlotDefaultValueProperty]
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"DefaultValueList" Key -> [SlotDefaultValueProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [SlotDefaultValueProperty]
defaultValueList]
instance Property "DefaultValueList" SlotDefaultValueSpecificationProperty where
  type PropertyType "DefaultValueList" SlotDefaultValueSpecificationProperty = [SlotDefaultValueProperty]
  set :: PropertyType
  "DefaultValueList" SlotDefaultValueSpecificationProperty
-> SlotDefaultValueSpecificationProperty
-> SlotDefaultValueSpecificationProperty
set PropertyType
  "DefaultValueList" SlotDefaultValueSpecificationProperty
newValue SlotDefaultValueSpecificationProperty {[SlotDefaultValueProperty]
()
haddock_workaround_ :: SlotDefaultValueSpecificationProperty -> ()
defaultValueList :: SlotDefaultValueSpecificationProperty -> [SlotDefaultValueProperty]
haddock_workaround_ :: ()
defaultValueList :: [SlotDefaultValueProperty]
..}
    = SlotDefaultValueSpecificationProperty
        {defaultValueList :: [SlotDefaultValueProperty]
defaultValueList = [SlotDefaultValueProperty]
PropertyType
  "DefaultValueList" SlotDefaultValueSpecificationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}