{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.LexV2Models.Types.ExportResourceSpecification where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.LexV2Models.Types.BotExportSpecification
import Amazonka.LexV2Models.Types.BotLocaleExportSpecification
import Amazonka.LexV2Models.Types.CustomVocabularyExportSpecification
import qualified Amazonka.Prelude as Prelude
data ExportResourceSpecification = ExportResourceSpecification'
{
ExportResourceSpecification -> Maybe BotExportSpecification
botExportSpecification :: Prelude.Maybe BotExportSpecification,
ExportResourceSpecification -> Maybe BotLocaleExportSpecification
botLocaleExportSpecification :: Prelude.Maybe BotLocaleExportSpecification,
ExportResourceSpecification
-> Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification :: Prelude.Maybe CustomVocabularyExportSpecification
}
deriving (ExportResourceSpecification -> ExportResourceSpecification -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ExportResourceSpecification -> ExportResourceSpecification -> Bool
$c/= :: ExportResourceSpecification -> ExportResourceSpecification -> Bool
== :: ExportResourceSpecification -> ExportResourceSpecification -> Bool
$c== :: ExportResourceSpecification -> ExportResourceSpecification -> Bool
Prelude.Eq, ReadPrec [ExportResourceSpecification]
ReadPrec ExportResourceSpecification
Int -> ReadS ExportResourceSpecification
ReadS [ExportResourceSpecification]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ExportResourceSpecification]
$creadListPrec :: ReadPrec [ExportResourceSpecification]
readPrec :: ReadPrec ExportResourceSpecification
$creadPrec :: ReadPrec ExportResourceSpecification
readList :: ReadS [ExportResourceSpecification]
$creadList :: ReadS [ExportResourceSpecification]
readsPrec :: Int -> ReadS ExportResourceSpecification
$creadsPrec :: Int -> ReadS ExportResourceSpecification
Prelude.Read, Int -> ExportResourceSpecification -> ShowS
[ExportResourceSpecification] -> ShowS
ExportResourceSpecification -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ExportResourceSpecification] -> ShowS
$cshowList :: [ExportResourceSpecification] -> ShowS
show :: ExportResourceSpecification -> String
$cshow :: ExportResourceSpecification -> String
showsPrec :: Int -> ExportResourceSpecification -> ShowS
$cshowsPrec :: Int -> ExportResourceSpecification -> ShowS
Prelude.Show, forall x.
Rep ExportResourceSpecification x -> ExportResourceSpecification
forall x.
ExportResourceSpecification -> Rep ExportResourceSpecification x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ExportResourceSpecification x -> ExportResourceSpecification
$cfrom :: forall x.
ExportResourceSpecification -> Rep ExportResourceSpecification x
Prelude.Generic)
newExportResourceSpecification ::
ExportResourceSpecification
newExportResourceSpecification :: ExportResourceSpecification
newExportResourceSpecification =
ExportResourceSpecification'
{ $sel:botExportSpecification:ExportResourceSpecification' :: Maybe BotExportSpecification
botExportSpecification =
forall a. Maybe a
Prelude.Nothing,
$sel:botLocaleExportSpecification:ExportResourceSpecification' :: Maybe BotLocaleExportSpecification
botLocaleExportSpecification = forall a. Maybe a
Prelude.Nothing,
$sel:customVocabularyExportSpecification:ExportResourceSpecification' :: Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification =
forall a. Maybe a
Prelude.Nothing
}
exportResourceSpecification_botExportSpecification :: Lens.Lens' ExportResourceSpecification (Prelude.Maybe BotExportSpecification)
exportResourceSpecification_botExportSpecification :: Lens' ExportResourceSpecification (Maybe BotExportSpecification)
exportResourceSpecification_botExportSpecification = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExportResourceSpecification' {Maybe BotExportSpecification
botExportSpecification :: Maybe BotExportSpecification
$sel:botExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotExportSpecification
botExportSpecification} -> Maybe BotExportSpecification
botExportSpecification) (\s :: ExportResourceSpecification
s@ExportResourceSpecification' {} Maybe BotExportSpecification
a -> ExportResourceSpecification
s {$sel:botExportSpecification:ExportResourceSpecification' :: Maybe BotExportSpecification
botExportSpecification = Maybe BotExportSpecification
a} :: ExportResourceSpecification)
exportResourceSpecification_botLocaleExportSpecification :: Lens.Lens' ExportResourceSpecification (Prelude.Maybe BotLocaleExportSpecification)
exportResourceSpecification_botLocaleExportSpecification :: Lens'
ExportResourceSpecification (Maybe BotLocaleExportSpecification)
exportResourceSpecification_botLocaleExportSpecification = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExportResourceSpecification' {Maybe BotLocaleExportSpecification
botLocaleExportSpecification :: Maybe BotLocaleExportSpecification
$sel:botLocaleExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotLocaleExportSpecification
botLocaleExportSpecification} -> Maybe BotLocaleExportSpecification
botLocaleExportSpecification) (\s :: ExportResourceSpecification
s@ExportResourceSpecification' {} Maybe BotLocaleExportSpecification
a -> ExportResourceSpecification
s {$sel:botLocaleExportSpecification:ExportResourceSpecification' :: Maybe BotLocaleExportSpecification
botLocaleExportSpecification = Maybe BotLocaleExportSpecification
a} :: ExportResourceSpecification)
exportResourceSpecification_customVocabularyExportSpecification :: Lens.Lens' ExportResourceSpecification (Prelude.Maybe CustomVocabularyExportSpecification)
exportResourceSpecification_customVocabularyExportSpecification :: Lens'
ExportResourceSpecification
(Maybe CustomVocabularyExportSpecification)
exportResourceSpecification_customVocabularyExportSpecification = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExportResourceSpecification' {Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification :: Maybe CustomVocabularyExportSpecification
$sel:customVocabularyExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification
-> Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification} -> Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification) (\s :: ExportResourceSpecification
s@ExportResourceSpecification' {} Maybe CustomVocabularyExportSpecification
a -> ExportResourceSpecification
s {$sel:customVocabularyExportSpecification:ExportResourceSpecification' :: Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification = Maybe CustomVocabularyExportSpecification
a} :: ExportResourceSpecification)
instance Data.FromJSON ExportResourceSpecification where
parseJSON :: Value -> Parser ExportResourceSpecification
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"ExportResourceSpecification"
( \Object
x ->
Maybe BotExportSpecification
-> Maybe BotLocaleExportSpecification
-> Maybe CustomVocabularyExportSpecification
-> ExportResourceSpecification
ExportResourceSpecification'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"botExportSpecification")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"botLocaleExportSpecification")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"customVocabularyExportSpecification")
)
instance Prelude.Hashable ExportResourceSpecification where
hashWithSalt :: Int -> ExportResourceSpecification -> Int
hashWithSalt Int
_salt ExportResourceSpecification' {Maybe BotExportSpecification
Maybe BotLocaleExportSpecification
Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification :: Maybe CustomVocabularyExportSpecification
botLocaleExportSpecification :: Maybe BotLocaleExportSpecification
botExportSpecification :: Maybe BotExportSpecification
$sel:customVocabularyExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification
-> Maybe CustomVocabularyExportSpecification
$sel:botLocaleExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotLocaleExportSpecification
$sel:botExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotExportSpecification
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BotExportSpecification
botExportSpecification
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BotLocaleExportSpecification
botLocaleExportSpecification
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification
instance Prelude.NFData ExportResourceSpecification where
rnf :: ExportResourceSpecification -> ()
rnf ExportResourceSpecification' {Maybe BotExportSpecification
Maybe BotLocaleExportSpecification
Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification :: Maybe CustomVocabularyExportSpecification
botLocaleExportSpecification :: Maybe BotLocaleExportSpecification
botExportSpecification :: Maybe BotExportSpecification
$sel:customVocabularyExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification
-> Maybe CustomVocabularyExportSpecification
$sel:botLocaleExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotLocaleExportSpecification
$sel:botExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotExportSpecification
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe BotExportSpecification
botExportSpecification
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BotLocaleExportSpecification
botLocaleExportSpecification
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification
instance Data.ToJSON ExportResourceSpecification where
toJSON :: ExportResourceSpecification -> Value
toJSON ExportResourceSpecification' {Maybe BotExportSpecification
Maybe BotLocaleExportSpecification
Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification :: Maybe CustomVocabularyExportSpecification
botLocaleExportSpecification :: Maybe BotLocaleExportSpecification
botExportSpecification :: Maybe BotExportSpecification
$sel:customVocabularyExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification
-> Maybe CustomVocabularyExportSpecification
$sel:botLocaleExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotLocaleExportSpecification
$sel:botExportSpecification:ExportResourceSpecification' :: ExportResourceSpecification -> Maybe BotExportSpecification
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"botExportSpecification" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BotExportSpecification
botExportSpecification,
(Key
"botLocaleExportSpecification" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BotLocaleExportSpecification
botLocaleExportSpecification,
(Key
"customVocabularyExportSpecification" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CustomVocabularyExportSpecification
customVocabularyExportSpecification
]
)