{-# 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.Pinpoint.Types.RecommenderConfigurationResponse where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data RecommenderConfigurationResponse = RecommenderConfigurationResponse'
{
RecommenderConfigurationResponse -> Maybe Text
recommendationTransformerUri :: Prelude.Maybe Prelude.Text,
RecommenderConfigurationResponse -> Maybe Text
recommendationsDisplayName :: Prelude.Maybe Prelude.Text,
RecommenderConfigurationResponse -> Maybe Text
recommendationProviderIdType :: Prelude.Maybe Prelude.Text,
RecommenderConfigurationResponse -> Maybe (HashMap Text Text)
attributes :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
RecommenderConfigurationResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
RecommenderConfigurationResponse -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
RecommenderConfigurationResponse -> Maybe Int
recommendationsPerMessage :: Prelude.Maybe Prelude.Int,
RecommenderConfigurationResponse -> Text
recommendationProviderUri :: Prelude.Text,
RecommenderConfigurationResponse -> Text
lastModifiedDate :: Prelude.Text,
RecommenderConfigurationResponse -> Text
creationDate :: Prelude.Text,
RecommenderConfigurationResponse -> Text
recommendationProviderRoleArn :: Prelude.Text,
RecommenderConfigurationResponse -> Text
id :: Prelude.Text
}
deriving (RecommenderConfigurationResponse
-> RecommenderConfigurationResponse -> Bool
(RecommenderConfigurationResponse
-> RecommenderConfigurationResponse -> Bool)
-> (RecommenderConfigurationResponse
-> RecommenderConfigurationResponse -> Bool)
-> Eq RecommenderConfigurationResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RecommenderConfigurationResponse
-> RecommenderConfigurationResponse -> Bool
$c/= :: RecommenderConfigurationResponse
-> RecommenderConfigurationResponse -> Bool
== :: RecommenderConfigurationResponse
-> RecommenderConfigurationResponse -> Bool
$c== :: RecommenderConfigurationResponse
-> RecommenderConfigurationResponse -> Bool
Prelude.Eq, ReadPrec [RecommenderConfigurationResponse]
ReadPrec RecommenderConfigurationResponse
Int -> ReadS RecommenderConfigurationResponse
ReadS [RecommenderConfigurationResponse]
(Int -> ReadS RecommenderConfigurationResponse)
-> ReadS [RecommenderConfigurationResponse]
-> ReadPrec RecommenderConfigurationResponse
-> ReadPrec [RecommenderConfigurationResponse]
-> Read RecommenderConfigurationResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RecommenderConfigurationResponse]
$creadListPrec :: ReadPrec [RecommenderConfigurationResponse]
readPrec :: ReadPrec RecommenderConfigurationResponse
$creadPrec :: ReadPrec RecommenderConfigurationResponse
readList :: ReadS [RecommenderConfigurationResponse]
$creadList :: ReadS [RecommenderConfigurationResponse]
readsPrec :: Int -> ReadS RecommenderConfigurationResponse
$creadsPrec :: Int -> ReadS RecommenderConfigurationResponse
Prelude.Read, Int -> RecommenderConfigurationResponse -> ShowS
[RecommenderConfigurationResponse] -> ShowS
RecommenderConfigurationResponse -> String
(Int -> RecommenderConfigurationResponse -> ShowS)
-> (RecommenderConfigurationResponse -> String)
-> ([RecommenderConfigurationResponse] -> ShowS)
-> Show RecommenderConfigurationResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RecommenderConfigurationResponse] -> ShowS
$cshowList :: [RecommenderConfigurationResponse] -> ShowS
show :: RecommenderConfigurationResponse -> String
$cshow :: RecommenderConfigurationResponse -> String
showsPrec :: Int -> RecommenderConfigurationResponse -> ShowS
$cshowsPrec :: Int -> RecommenderConfigurationResponse -> ShowS
Prelude.Show, (forall x.
RecommenderConfigurationResponse
-> Rep RecommenderConfigurationResponse x)
-> (forall x.
Rep RecommenderConfigurationResponse x
-> RecommenderConfigurationResponse)
-> Generic RecommenderConfigurationResponse
forall x.
Rep RecommenderConfigurationResponse x
-> RecommenderConfigurationResponse
forall x.
RecommenderConfigurationResponse
-> Rep RecommenderConfigurationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RecommenderConfigurationResponse x
-> RecommenderConfigurationResponse
$cfrom :: forall x.
RecommenderConfigurationResponse
-> Rep RecommenderConfigurationResponse x
Prelude.Generic)
newRecommenderConfigurationResponse ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
RecommenderConfigurationResponse
newRecommenderConfigurationResponse :: Text
-> Text -> Text -> Text -> Text -> RecommenderConfigurationResponse
newRecommenderConfigurationResponse
Text
pRecommendationProviderUri_
Text
pLastModifiedDate_
Text
pCreationDate_
Text
pRecommendationProviderRoleArn_
Text
pId_ =
RecommenderConfigurationResponse' :: Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse
RecommenderConfigurationResponse'
{ $sel:recommendationTransformerUri:RecommenderConfigurationResponse' :: Maybe Text
recommendationTransformerUri =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:recommendationsDisplayName:RecommenderConfigurationResponse' :: Maybe Text
recommendationsDisplayName =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:recommendationProviderIdType:RecommenderConfigurationResponse' :: Maybe Text
recommendationProviderIdType =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:attributes:RecommenderConfigurationResponse' :: Maybe (HashMap Text Text)
attributes = Maybe (HashMap Text Text)
forall a. Maybe a
Prelude.Nothing,
$sel:name:RecommenderConfigurationResponse' :: Maybe Text
name = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:description:RecommenderConfigurationResponse' :: Maybe Text
description = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:recommendationsPerMessage:RecommenderConfigurationResponse' :: Maybe Int
recommendationsPerMessage =
Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:recommendationProviderUri:RecommenderConfigurationResponse' :: Text
recommendationProviderUri =
Text
pRecommendationProviderUri_,
$sel:lastModifiedDate:RecommenderConfigurationResponse' :: Text
lastModifiedDate = Text
pLastModifiedDate_,
$sel:creationDate:RecommenderConfigurationResponse' :: Text
creationDate = Text
pCreationDate_,
$sel:recommendationProviderRoleArn:RecommenderConfigurationResponse' :: Text
recommendationProviderRoleArn =
Text
pRecommendationProviderRoleArn_,
$sel:id:RecommenderConfigurationResponse' :: Text
id = Text
pId_
}
recommenderConfigurationResponse_recommendationTransformerUri :: Lens.Lens' RecommenderConfigurationResponse (Prelude.Maybe Prelude.Text)
recommenderConfigurationResponse_recommendationTransformerUri :: (Maybe Text -> f (Maybe Text))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_recommendationTransformerUri = (RecommenderConfigurationResponse -> Maybe Text)
-> (RecommenderConfigurationResponse
-> Maybe Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Maybe Text
recommendationTransformerUri :: Maybe Text
$sel:recommendationTransformerUri:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Maybe Text
recommendationTransformerUri} -> Maybe Text
recommendationTransformerUri) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Maybe Text
a -> RecommenderConfigurationResponse
s {$sel:recommendationTransformerUri:RecommenderConfigurationResponse' :: Maybe Text
recommendationTransformerUri = Maybe Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_recommendationsDisplayName :: Lens.Lens' RecommenderConfigurationResponse (Prelude.Maybe Prelude.Text)
recommenderConfigurationResponse_recommendationsDisplayName :: (Maybe Text -> f (Maybe Text))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_recommendationsDisplayName = (RecommenderConfigurationResponse -> Maybe Text)
-> (RecommenderConfigurationResponse
-> Maybe Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Maybe Text
recommendationsDisplayName :: Maybe Text
$sel:recommendationsDisplayName:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Maybe Text
recommendationsDisplayName} -> Maybe Text
recommendationsDisplayName) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Maybe Text
a -> RecommenderConfigurationResponse
s {$sel:recommendationsDisplayName:RecommenderConfigurationResponse' :: Maybe Text
recommendationsDisplayName = Maybe Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_recommendationProviderIdType :: Lens.Lens' RecommenderConfigurationResponse (Prelude.Maybe Prelude.Text)
recommenderConfigurationResponse_recommendationProviderIdType :: (Maybe Text -> f (Maybe Text))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_recommendationProviderIdType = (RecommenderConfigurationResponse -> Maybe Text)
-> (RecommenderConfigurationResponse
-> Maybe Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Maybe Text
recommendationProviderIdType :: Maybe Text
$sel:recommendationProviderIdType:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Maybe Text
recommendationProviderIdType} -> Maybe Text
recommendationProviderIdType) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Maybe Text
a -> RecommenderConfigurationResponse
s {$sel:recommendationProviderIdType:RecommenderConfigurationResponse' :: Maybe Text
recommendationProviderIdType = Maybe Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_attributes :: Lens.Lens' RecommenderConfigurationResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
recommenderConfigurationResponse_attributes :: (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_attributes = (RecommenderConfigurationResponse -> Maybe (HashMap Text Text))
-> (RecommenderConfigurationResponse
-> Maybe (HashMap Text Text) -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Maybe (HashMap Text Text)
attributes :: Maybe (HashMap Text Text)
$sel:attributes:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Maybe (HashMap Text Text)
attributes} -> Maybe (HashMap Text Text)
attributes) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Maybe (HashMap Text Text)
a -> RecommenderConfigurationResponse
s {$sel:attributes:RecommenderConfigurationResponse' :: Maybe (HashMap Text Text)
attributes = Maybe (HashMap Text Text)
a} :: RecommenderConfigurationResponse) ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse)
-> ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
-> Iso
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
recommenderConfigurationResponse_name :: Lens.Lens' RecommenderConfigurationResponse (Prelude.Maybe Prelude.Text)
recommenderConfigurationResponse_name :: (Maybe Text -> f (Maybe Text))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_name = (RecommenderConfigurationResponse -> Maybe Text)
-> (RecommenderConfigurationResponse
-> Maybe Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Maybe Text
name :: Maybe Text
$sel:name:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Maybe Text
a -> RecommenderConfigurationResponse
s {$sel:name:RecommenderConfigurationResponse' :: Maybe Text
name = Maybe Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_description :: Lens.Lens' RecommenderConfigurationResponse (Prelude.Maybe Prelude.Text)
recommenderConfigurationResponse_description :: (Maybe Text -> f (Maybe Text))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_description = (RecommenderConfigurationResponse -> Maybe Text)
-> (RecommenderConfigurationResponse
-> Maybe Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Maybe Text
description :: Maybe Text
$sel:description:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Maybe Text
description} -> Maybe Text
description) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Maybe Text
a -> RecommenderConfigurationResponse
s {$sel:description:RecommenderConfigurationResponse' :: Maybe Text
description = Maybe Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_recommendationsPerMessage :: Lens.Lens' RecommenderConfigurationResponse (Prelude.Maybe Prelude.Int)
recommenderConfigurationResponse_recommendationsPerMessage :: (Maybe Int -> f (Maybe Int))
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_recommendationsPerMessage = (RecommenderConfigurationResponse -> Maybe Int)
-> (RecommenderConfigurationResponse
-> Maybe Int -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
(Maybe Int)
(Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Maybe Int
recommendationsPerMessage :: Maybe Int
$sel:recommendationsPerMessage:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Maybe Int
recommendationsPerMessage} -> Maybe Int
recommendationsPerMessage) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Maybe Int
a -> RecommenderConfigurationResponse
s {$sel:recommendationsPerMessage:RecommenderConfigurationResponse' :: Maybe Int
recommendationsPerMessage = Maybe Int
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_recommendationProviderUri :: Lens.Lens' RecommenderConfigurationResponse Prelude.Text
recommenderConfigurationResponse_recommendationProviderUri :: (Text -> f Text)
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_recommendationProviderUri = (RecommenderConfigurationResponse -> Text)
-> (RecommenderConfigurationResponse
-> Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Text
recommendationProviderUri :: Text
$sel:recommendationProviderUri:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Text
recommendationProviderUri} -> Text
recommendationProviderUri) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Text
a -> RecommenderConfigurationResponse
s {$sel:recommendationProviderUri:RecommenderConfigurationResponse' :: Text
recommendationProviderUri = Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_lastModifiedDate :: Lens.Lens' RecommenderConfigurationResponse Prelude.Text
recommenderConfigurationResponse_lastModifiedDate :: (Text -> f Text)
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_lastModifiedDate = (RecommenderConfigurationResponse -> Text)
-> (RecommenderConfigurationResponse
-> Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Text
lastModifiedDate :: Text
$sel:lastModifiedDate:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Text
lastModifiedDate} -> Text
lastModifiedDate) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Text
a -> RecommenderConfigurationResponse
s {$sel:lastModifiedDate:RecommenderConfigurationResponse' :: Text
lastModifiedDate = Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_creationDate :: Lens.Lens' RecommenderConfigurationResponse Prelude.Text
recommenderConfigurationResponse_creationDate :: (Text -> f Text)
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_creationDate = (RecommenderConfigurationResponse -> Text)
-> (RecommenderConfigurationResponse
-> Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Text
creationDate :: Text
$sel:creationDate:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Text
creationDate} -> Text
creationDate) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Text
a -> RecommenderConfigurationResponse
s {$sel:creationDate:RecommenderConfigurationResponse' :: Text
creationDate = Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_recommendationProviderRoleArn :: Lens.Lens' RecommenderConfigurationResponse Prelude.Text
recommenderConfigurationResponse_recommendationProviderRoleArn :: (Text -> f Text)
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_recommendationProviderRoleArn = (RecommenderConfigurationResponse -> Text)
-> (RecommenderConfigurationResponse
-> Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Text
recommendationProviderRoleArn :: Text
$sel:recommendationProviderRoleArn:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Text
recommendationProviderRoleArn} -> Text
recommendationProviderRoleArn) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Text
a -> RecommenderConfigurationResponse
s {$sel:recommendationProviderRoleArn:RecommenderConfigurationResponse' :: Text
recommendationProviderRoleArn = Text
a} :: RecommenderConfigurationResponse)
recommenderConfigurationResponse_id :: Lens.Lens' RecommenderConfigurationResponse Prelude.Text
recommenderConfigurationResponse_id :: (Text -> f Text)
-> RecommenderConfigurationResponse
-> f RecommenderConfigurationResponse
recommenderConfigurationResponse_id = (RecommenderConfigurationResponse -> Text)
-> (RecommenderConfigurationResponse
-> Text -> RecommenderConfigurationResponse)
-> Lens
RecommenderConfigurationResponse
RecommenderConfigurationResponse
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RecommenderConfigurationResponse' {Text
id :: Text
$sel:id:RecommenderConfigurationResponse' :: RecommenderConfigurationResponse -> Text
id} -> Text
id) (\s :: RecommenderConfigurationResponse
s@RecommenderConfigurationResponse' {} Text
a -> RecommenderConfigurationResponse
s {$sel:id:RecommenderConfigurationResponse' :: Text
id = Text
a} :: RecommenderConfigurationResponse)
instance
Core.FromJSON
RecommenderConfigurationResponse
where
parseJSON :: Value -> Parser RecommenderConfigurationResponse
parseJSON =
String
-> (Object -> Parser RecommenderConfigurationResponse)
-> Value
-> Parser RecommenderConfigurationResponse
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"RecommenderConfigurationResponse"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse
RecommenderConfigurationResponse'
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"RecommendationTransformerUri")
Parser
(Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"RecommendationsDisplayName")
Parser
(Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser (Maybe Text)
-> Parser
(Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"RecommendationProviderIdType")
Parser
(Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser (Maybe (HashMap Text Text))
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe (Maybe (HashMap Text Text)))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Attributes" Parser (Maybe (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> Parser (Maybe (HashMap Text Text))
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe (HashMap Text Text)
forall a. Monoid a => a
Prelude.mempty)
Parser
(Maybe Text
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Name")
Parser
(Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser (Maybe Text)
-> Parser
(Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Description")
Parser
(Maybe Int
-> Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser (Maybe Int)
-> Parser
(Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"RecommendationsPerMessage")
Parser
(Text
-> Text
-> Text
-> Text
-> Text
-> RecommenderConfigurationResponse)
-> Parser Text
-> Parser
(Text -> Text -> Text -> Text -> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser Text
forall a. FromJSON a => Object -> Text -> Parser a
Core..: Text
"RecommendationProviderUri")
Parser
(Text -> Text -> Text -> Text -> RecommenderConfigurationResponse)
-> Parser Text
-> Parser
(Text -> Text -> Text -> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser Text
forall a. FromJSON a => Object -> Text -> Parser a
Core..: Text
"LastModifiedDate")
Parser (Text -> Text -> Text -> RecommenderConfigurationResponse)
-> Parser Text
-> Parser (Text -> Text -> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser Text
forall a. FromJSON a => Object -> Text -> Parser a
Core..: Text
"CreationDate")
Parser (Text -> Text -> RecommenderConfigurationResponse)
-> Parser Text -> Parser (Text -> RecommenderConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser Text
forall a. FromJSON a => Object -> Text -> Parser a
Core..: Text
"RecommendationProviderRoleArn")
Parser (Text -> RecommenderConfigurationResponse)
-> Parser Text -> Parser RecommenderConfigurationResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser Text
forall a. FromJSON a => Object -> Text -> Parser a
Core..: Text
"Id")
)
instance
Prelude.Hashable
RecommenderConfigurationResponse
instance
Prelude.NFData
RecommenderConfigurationResponse