{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.MachineLearning.DescribeBatchPredictions
(
DescribeBatchPredictions (..),
newDescribeBatchPredictions,
describeBatchPredictions_eq,
describeBatchPredictions_filterVariable,
describeBatchPredictions_ge,
describeBatchPredictions_gt,
describeBatchPredictions_le,
describeBatchPredictions_lt,
describeBatchPredictions_limit,
describeBatchPredictions_ne,
describeBatchPredictions_nextToken,
describeBatchPredictions_prefix,
describeBatchPredictions_sortOrder,
DescribeBatchPredictionsResponse (..),
newDescribeBatchPredictionsResponse,
describeBatchPredictionsResponse_nextToken,
describeBatchPredictionsResponse_results,
describeBatchPredictionsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.MachineLearning.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeBatchPredictions = DescribeBatchPredictions'
{
DescribeBatchPredictions -> Maybe Text
eq :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe BatchPredictionFilterVariable
filterVariable :: Prelude.Maybe BatchPredictionFilterVariable,
DescribeBatchPredictions -> Maybe Text
ge :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe Text
gt :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe Text
le :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe Text
lt :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe Natural
limit :: Prelude.Maybe Prelude.Natural,
DescribeBatchPredictions -> Maybe Text
ne :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe Text
prefix :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictions -> Maybe SortOrder
sortOrder :: Prelude.Maybe SortOrder
}
deriving (DescribeBatchPredictions -> DescribeBatchPredictions -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeBatchPredictions -> DescribeBatchPredictions -> Bool
$c/= :: DescribeBatchPredictions -> DescribeBatchPredictions -> Bool
== :: DescribeBatchPredictions -> DescribeBatchPredictions -> Bool
$c== :: DescribeBatchPredictions -> DescribeBatchPredictions -> Bool
Prelude.Eq, ReadPrec [DescribeBatchPredictions]
ReadPrec DescribeBatchPredictions
Int -> ReadS DescribeBatchPredictions
ReadS [DescribeBatchPredictions]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeBatchPredictions]
$creadListPrec :: ReadPrec [DescribeBatchPredictions]
readPrec :: ReadPrec DescribeBatchPredictions
$creadPrec :: ReadPrec DescribeBatchPredictions
readList :: ReadS [DescribeBatchPredictions]
$creadList :: ReadS [DescribeBatchPredictions]
readsPrec :: Int -> ReadS DescribeBatchPredictions
$creadsPrec :: Int -> ReadS DescribeBatchPredictions
Prelude.Read, Int -> DescribeBatchPredictions -> ShowS
[DescribeBatchPredictions] -> ShowS
DescribeBatchPredictions -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeBatchPredictions] -> ShowS
$cshowList :: [DescribeBatchPredictions] -> ShowS
show :: DescribeBatchPredictions -> String
$cshow :: DescribeBatchPredictions -> String
showsPrec :: Int -> DescribeBatchPredictions -> ShowS
$cshowsPrec :: Int -> DescribeBatchPredictions -> ShowS
Prelude.Show, forall x.
Rep DescribeBatchPredictions x -> DescribeBatchPredictions
forall x.
DescribeBatchPredictions -> Rep DescribeBatchPredictions x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeBatchPredictions x -> DescribeBatchPredictions
$cfrom :: forall x.
DescribeBatchPredictions -> Rep DescribeBatchPredictions x
Prelude.Generic)
newDescribeBatchPredictions ::
DescribeBatchPredictions
newDescribeBatchPredictions :: DescribeBatchPredictions
newDescribeBatchPredictions =
DescribeBatchPredictions'
{ $sel:eq:DescribeBatchPredictions' :: Maybe Text
eq = forall a. Maybe a
Prelude.Nothing,
$sel:filterVariable:DescribeBatchPredictions' :: Maybe BatchPredictionFilterVariable
filterVariable = forall a. Maybe a
Prelude.Nothing,
$sel:ge:DescribeBatchPredictions' :: Maybe Text
ge = forall a. Maybe a
Prelude.Nothing,
$sel:gt:DescribeBatchPredictions' :: Maybe Text
gt = forall a. Maybe a
Prelude.Nothing,
$sel:le:DescribeBatchPredictions' :: Maybe Text
le = forall a. Maybe a
Prelude.Nothing,
$sel:lt:DescribeBatchPredictions' :: Maybe Text
lt = forall a. Maybe a
Prelude.Nothing,
$sel:limit:DescribeBatchPredictions' :: Maybe Natural
limit = forall a. Maybe a
Prelude.Nothing,
$sel:ne:DescribeBatchPredictions' :: Maybe Text
ne = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeBatchPredictions' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:prefix:DescribeBatchPredictions' :: Maybe Text
prefix = forall a. Maybe a
Prelude.Nothing,
$sel:sortOrder:DescribeBatchPredictions' :: Maybe SortOrder
sortOrder = forall a. Maybe a
Prelude.Nothing
}
describeBatchPredictions_eq :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_eq :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_eq = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
eq :: Maybe Text
$sel:eq:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
eq} -> Maybe Text
eq) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:eq:DescribeBatchPredictions' :: Maybe Text
eq = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_filterVariable :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe BatchPredictionFilterVariable)
describeBatchPredictions_filterVariable :: Lens'
DescribeBatchPredictions (Maybe BatchPredictionFilterVariable)
describeBatchPredictions_filterVariable = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe BatchPredictionFilterVariable
filterVariable :: Maybe BatchPredictionFilterVariable
$sel:filterVariable:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe BatchPredictionFilterVariable
filterVariable} -> Maybe BatchPredictionFilterVariable
filterVariable) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe BatchPredictionFilterVariable
a -> DescribeBatchPredictions
s {$sel:filterVariable:DescribeBatchPredictions' :: Maybe BatchPredictionFilterVariable
filterVariable = Maybe BatchPredictionFilterVariable
a} :: DescribeBatchPredictions)
describeBatchPredictions_ge :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_ge :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_ge = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
ge :: Maybe Text
$sel:ge:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
ge} -> Maybe Text
ge) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:ge:DescribeBatchPredictions' :: Maybe Text
ge = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_gt :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_gt :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_gt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
gt :: Maybe Text
$sel:gt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
gt} -> Maybe Text
gt) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:gt:DescribeBatchPredictions' :: Maybe Text
gt = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_le :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_le :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_le = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
le :: Maybe Text
$sel:le:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
le} -> Maybe Text
le) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:le:DescribeBatchPredictions' :: Maybe Text
le = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_lt :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_lt :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_lt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
lt :: Maybe Text
$sel:lt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
lt} -> Maybe Text
lt) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:lt:DescribeBatchPredictions' :: Maybe Text
lt = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_limit :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Natural)
describeBatchPredictions_limit :: Lens' DescribeBatchPredictions (Maybe Natural)
describeBatchPredictions_limit = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Natural
limit :: Maybe Natural
$sel:limit:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Natural
limit} -> Maybe Natural
limit) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Natural
a -> DescribeBatchPredictions
s {$sel:limit:DescribeBatchPredictions' :: Maybe Natural
limit = Maybe Natural
a} :: DescribeBatchPredictions)
describeBatchPredictions_ne :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_ne :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_ne = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
ne :: Maybe Text
$sel:ne:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
ne} -> Maybe Text
ne) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:ne:DescribeBatchPredictions' :: Maybe Text
ne = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_nextToken :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_nextToken :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:nextToken:DescribeBatchPredictions' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_prefix :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe Prelude.Text)
describeBatchPredictions_prefix :: Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_prefix = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe Text
prefix :: Maybe Text
$sel:prefix:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
prefix} -> Maybe Text
prefix) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe Text
a -> DescribeBatchPredictions
s {$sel:prefix:DescribeBatchPredictions' :: Maybe Text
prefix = Maybe Text
a} :: DescribeBatchPredictions)
describeBatchPredictions_sortOrder :: Lens.Lens' DescribeBatchPredictions (Prelude.Maybe SortOrder)
describeBatchPredictions_sortOrder :: Lens' DescribeBatchPredictions (Maybe SortOrder)
describeBatchPredictions_sortOrder = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictions' {Maybe SortOrder
sortOrder :: Maybe SortOrder
$sel:sortOrder:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe SortOrder
sortOrder} -> Maybe SortOrder
sortOrder) (\s :: DescribeBatchPredictions
s@DescribeBatchPredictions' {} Maybe SortOrder
a -> DescribeBatchPredictions
s {$sel:sortOrder:DescribeBatchPredictions' :: Maybe SortOrder
sortOrder = Maybe SortOrder
a} :: DescribeBatchPredictions)
instance Core.AWSPager DescribeBatchPredictions where
page :: DescribeBatchPredictions
-> AWSResponse DescribeBatchPredictions
-> Maybe DescribeBatchPredictions
page DescribeBatchPredictions
rq AWSResponse DescribeBatchPredictions
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeBatchPredictions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeBatchPredictionsResponse (Maybe Text)
describeBatchPredictionsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeBatchPredictions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeBatchPredictionsResponse (Maybe [BatchPrediction])
describeBatchPredictionsResponse_results
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ DescribeBatchPredictions
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeBatchPredictions (Maybe Text)
describeBatchPredictions_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeBatchPredictions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeBatchPredictionsResponse (Maybe Text)
describeBatchPredictionsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance Core.AWSRequest DescribeBatchPredictions where
type
AWSResponse DescribeBatchPredictions =
DescribeBatchPredictionsResponse
request :: (Service -> Service)
-> DescribeBatchPredictions -> Request DescribeBatchPredictions
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DescribeBatchPredictions
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeBatchPredictions)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Text
-> Maybe [BatchPrediction]
-> Int
-> DescribeBatchPredictionsResponse
DescribeBatchPredictionsResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"NextToken")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"Results" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable DescribeBatchPredictions where
hashWithSalt :: Int -> DescribeBatchPredictions -> Int
hashWithSalt Int
_salt DescribeBatchPredictions' {Maybe Natural
Maybe Text
Maybe BatchPredictionFilterVariable
Maybe SortOrder
sortOrder :: Maybe SortOrder
prefix :: Maybe Text
nextToken :: Maybe Text
ne :: Maybe Text
limit :: Maybe Natural
lt :: Maybe Text
le :: Maybe Text
gt :: Maybe Text
ge :: Maybe Text
filterVariable :: Maybe BatchPredictionFilterVariable
eq :: Maybe Text
$sel:sortOrder:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe SortOrder
$sel:prefix:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:nextToken:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:ne:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:limit:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Natural
$sel:lt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:le:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:gt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:ge:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:filterVariable:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe BatchPredictionFilterVariable
$sel:eq:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
eq
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchPredictionFilterVariable
filterVariable
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
ge
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
gt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
le
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
lt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
limit
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
ne
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
prefix
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SortOrder
sortOrder
instance Prelude.NFData DescribeBatchPredictions where
rnf :: DescribeBatchPredictions -> ()
rnf DescribeBatchPredictions' {Maybe Natural
Maybe Text
Maybe BatchPredictionFilterVariable
Maybe SortOrder
sortOrder :: Maybe SortOrder
prefix :: Maybe Text
nextToken :: Maybe Text
ne :: Maybe Text
limit :: Maybe Natural
lt :: Maybe Text
le :: Maybe Text
gt :: Maybe Text
ge :: Maybe Text
filterVariable :: Maybe BatchPredictionFilterVariable
eq :: Maybe Text
$sel:sortOrder:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe SortOrder
$sel:prefix:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:nextToken:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:ne:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:limit:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Natural
$sel:lt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:le:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:gt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:ge:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:filterVariable:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe BatchPredictionFilterVariable
$sel:eq:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
eq
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchPredictionFilterVariable
filterVariable
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
ge
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
gt
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
le
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
lt
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
limit
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
ne
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
prefix
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SortOrder
sortOrder
instance Data.ToHeaders DescribeBatchPredictions where
toHeaders :: DescribeBatchPredictions -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"AmazonML_20141212.DescribeBatchPredictions" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON DescribeBatchPredictions where
toJSON :: DescribeBatchPredictions -> Value
toJSON DescribeBatchPredictions' {Maybe Natural
Maybe Text
Maybe BatchPredictionFilterVariable
Maybe SortOrder
sortOrder :: Maybe SortOrder
prefix :: Maybe Text
nextToken :: Maybe Text
ne :: Maybe Text
limit :: Maybe Natural
lt :: Maybe Text
le :: Maybe Text
gt :: Maybe Text
ge :: Maybe Text
filterVariable :: Maybe BatchPredictionFilterVariable
eq :: Maybe Text
$sel:sortOrder:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe SortOrder
$sel:prefix:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:nextToken:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:ne:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:limit:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Natural
$sel:lt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:le:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:gt:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:ge:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
$sel:filterVariable:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe BatchPredictionFilterVariable
$sel:eq:DescribeBatchPredictions' :: DescribeBatchPredictions -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"EQ" 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 Text
eq,
(Key
"FilterVariable" 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 BatchPredictionFilterVariable
filterVariable,
(Key
"GE" 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 Text
ge,
(Key
"GT" 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 Text
gt,
(Key
"LE" 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 Text
le,
(Key
"LT" 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 Text
lt,
(Key
"Limit" 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 Natural
limit,
(Key
"NE" 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 Text
ne,
(Key
"NextToken" 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 Text
nextToken,
(Key
"Prefix" 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 Text
prefix,
(Key
"SortOrder" 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 SortOrder
sortOrder
]
)
instance Data.ToPath DescribeBatchPredictions where
toPath :: DescribeBatchPredictions -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeBatchPredictions where
toQuery :: DescribeBatchPredictions -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeBatchPredictionsResponse = DescribeBatchPredictionsResponse'
{
DescribeBatchPredictionsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeBatchPredictionsResponse -> Maybe [BatchPrediction]
results :: Prelude.Maybe [BatchPrediction],
DescribeBatchPredictionsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeBatchPredictionsResponse
-> DescribeBatchPredictionsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeBatchPredictionsResponse
-> DescribeBatchPredictionsResponse -> Bool
$c/= :: DescribeBatchPredictionsResponse
-> DescribeBatchPredictionsResponse -> Bool
== :: DescribeBatchPredictionsResponse
-> DescribeBatchPredictionsResponse -> Bool
$c== :: DescribeBatchPredictionsResponse
-> DescribeBatchPredictionsResponse -> Bool
Prelude.Eq, ReadPrec [DescribeBatchPredictionsResponse]
ReadPrec DescribeBatchPredictionsResponse
Int -> ReadS DescribeBatchPredictionsResponse
ReadS [DescribeBatchPredictionsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeBatchPredictionsResponse]
$creadListPrec :: ReadPrec [DescribeBatchPredictionsResponse]
readPrec :: ReadPrec DescribeBatchPredictionsResponse
$creadPrec :: ReadPrec DescribeBatchPredictionsResponse
readList :: ReadS [DescribeBatchPredictionsResponse]
$creadList :: ReadS [DescribeBatchPredictionsResponse]
readsPrec :: Int -> ReadS DescribeBatchPredictionsResponse
$creadsPrec :: Int -> ReadS DescribeBatchPredictionsResponse
Prelude.Read, Int -> DescribeBatchPredictionsResponse -> ShowS
[DescribeBatchPredictionsResponse] -> ShowS
DescribeBatchPredictionsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeBatchPredictionsResponse] -> ShowS
$cshowList :: [DescribeBatchPredictionsResponse] -> ShowS
show :: DescribeBatchPredictionsResponse -> String
$cshow :: DescribeBatchPredictionsResponse -> String
showsPrec :: Int -> DescribeBatchPredictionsResponse -> ShowS
$cshowsPrec :: Int -> DescribeBatchPredictionsResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeBatchPredictionsResponse x
-> DescribeBatchPredictionsResponse
forall x.
DescribeBatchPredictionsResponse
-> Rep DescribeBatchPredictionsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeBatchPredictionsResponse x
-> DescribeBatchPredictionsResponse
$cfrom :: forall x.
DescribeBatchPredictionsResponse
-> Rep DescribeBatchPredictionsResponse x
Prelude.Generic)
newDescribeBatchPredictionsResponse ::
Prelude.Int ->
DescribeBatchPredictionsResponse
newDescribeBatchPredictionsResponse :: Int -> DescribeBatchPredictionsResponse
newDescribeBatchPredictionsResponse Int
pHttpStatus_ =
DescribeBatchPredictionsResponse'
{ $sel:nextToken:DescribeBatchPredictionsResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:results:DescribeBatchPredictionsResponse' :: Maybe [BatchPrediction]
results = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeBatchPredictionsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeBatchPredictionsResponse_nextToken :: Lens.Lens' DescribeBatchPredictionsResponse (Prelude.Maybe Prelude.Text)
describeBatchPredictionsResponse_nextToken :: Lens' DescribeBatchPredictionsResponse (Maybe Text)
describeBatchPredictionsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictionsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeBatchPredictionsResponse' :: DescribeBatchPredictionsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeBatchPredictionsResponse
s@DescribeBatchPredictionsResponse' {} Maybe Text
a -> DescribeBatchPredictionsResponse
s {$sel:nextToken:DescribeBatchPredictionsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeBatchPredictionsResponse)
describeBatchPredictionsResponse_results :: Lens.Lens' DescribeBatchPredictionsResponse (Prelude.Maybe [BatchPrediction])
describeBatchPredictionsResponse_results :: Lens' DescribeBatchPredictionsResponse (Maybe [BatchPrediction])
describeBatchPredictionsResponse_results = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictionsResponse' {Maybe [BatchPrediction]
results :: Maybe [BatchPrediction]
$sel:results:DescribeBatchPredictionsResponse' :: DescribeBatchPredictionsResponse -> Maybe [BatchPrediction]
results} -> Maybe [BatchPrediction]
results) (\s :: DescribeBatchPredictionsResponse
s@DescribeBatchPredictionsResponse' {} Maybe [BatchPrediction]
a -> DescribeBatchPredictionsResponse
s {$sel:results:DescribeBatchPredictionsResponse' :: Maybe [BatchPrediction]
results = Maybe [BatchPrediction]
a} :: DescribeBatchPredictionsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describeBatchPredictionsResponse_httpStatus :: Lens.Lens' DescribeBatchPredictionsResponse Prelude.Int
describeBatchPredictionsResponse_httpStatus :: Lens' DescribeBatchPredictionsResponse Int
describeBatchPredictionsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeBatchPredictionsResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeBatchPredictionsResponse' :: DescribeBatchPredictionsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeBatchPredictionsResponse
s@DescribeBatchPredictionsResponse' {} Int
a -> DescribeBatchPredictionsResponse
s {$sel:httpStatus:DescribeBatchPredictionsResponse' :: Int
httpStatus = Int
a} :: DescribeBatchPredictionsResponse)
instance
Prelude.NFData
DescribeBatchPredictionsResponse
where
rnf :: DescribeBatchPredictionsResponse -> ()
rnf DescribeBatchPredictionsResponse' {Int
Maybe [BatchPrediction]
Maybe Text
httpStatus :: Int
results :: Maybe [BatchPrediction]
nextToken :: Maybe Text
$sel:httpStatus:DescribeBatchPredictionsResponse' :: DescribeBatchPredictionsResponse -> Int
$sel:results:DescribeBatchPredictionsResponse' :: DescribeBatchPredictionsResponse -> Maybe [BatchPrediction]
$sel:nextToken:DescribeBatchPredictionsResponse' :: DescribeBatchPredictionsResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [BatchPrediction]
results
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus