{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.IoTEvents.GetDetectorModelAnalysisResults
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Retrieves one or more analysis results of the detector model.
--
-- After AWS IoT Events starts analyzing your detector model, you have up
-- to 24 hours to retrieve the analysis results.
module Amazonka.IoTEvents.GetDetectorModelAnalysisResults
  ( -- * Creating a Request
    GetDetectorModelAnalysisResults (..),
    newGetDetectorModelAnalysisResults,

    -- * Request Lenses
    getDetectorModelAnalysisResults_maxResults,
    getDetectorModelAnalysisResults_nextToken,
    getDetectorModelAnalysisResults_analysisId,

    -- * Destructuring the Response
    GetDetectorModelAnalysisResultsResponse (..),
    newGetDetectorModelAnalysisResultsResponse,

    -- * Response Lenses
    getDetectorModelAnalysisResultsResponse_analysisResults,
    getDetectorModelAnalysisResultsResponse_nextToken,
    getDetectorModelAnalysisResultsResponse_httpStatus,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoTEvents.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newGetDetectorModelAnalysisResults' smart constructor.
data GetDetectorModelAnalysisResults = GetDetectorModelAnalysisResults'
  { -- | The maximum number of results to be returned per request.
    GetDetectorModelAnalysisResults -> Maybe Int
maxResults :: Prelude.Maybe Prelude.Int,
    -- | The token that you can use to return the next set of results.
    GetDetectorModelAnalysisResults -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The ID of the analysis result that you want to retrieve.
    GetDetectorModelAnalysisResults -> Text
analysisId :: Prelude.Text
  }
  deriving (GetDetectorModelAnalysisResults
-> GetDetectorModelAnalysisResults -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetDetectorModelAnalysisResults
-> GetDetectorModelAnalysisResults -> Bool
$c/= :: GetDetectorModelAnalysisResults
-> GetDetectorModelAnalysisResults -> Bool
== :: GetDetectorModelAnalysisResults
-> GetDetectorModelAnalysisResults -> Bool
$c== :: GetDetectorModelAnalysisResults
-> GetDetectorModelAnalysisResults -> Bool
Prelude.Eq, ReadPrec [GetDetectorModelAnalysisResults]
ReadPrec GetDetectorModelAnalysisResults
Int -> ReadS GetDetectorModelAnalysisResults
ReadS [GetDetectorModelAnalysisResults]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetDetectorModelAnalysisResults]
$creadListPrec :: ReadPrec [GetDetectorModelAnalysisResults]
readPrec :: ReadPrec GetDetectorModelAnalysisResults
$creadPrec :: ReadPrec GetDetectorModelAnalysisResults
readList :: ReadS [GetDetectorModelAnalysisResults]
$creadList :: ReadS [GetDetectorModelAnalysisResults]
readsPrec :: Int -> ReadS GetDetectorModelAnalysisResults
$creadsPrec :: Int -> ReadS GetDetectorModelAnalysisResults
Prelude.Read, Int -> GetDetectorModelAnalysisResults -> ShowS
[GetDetectorModelAnalysisResults] -> ShowS
GetDetectorModelAnalysisResults -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetDetectorModelAnalysisResults] -> ShowS
$cshowList :: [GetDetectorModelAnalysisResults] -> ShowS
show :: GetDetectorModelAnalysisResults -> String
$cshow :: GetDetectorModelAnalysisResults -> String
showsPrec :: Int -> GetDetectorModelAnalysisResults -> ShowS
$cshowsPrec :: Int -> GetDetectorModelAnalysisResults -> ShowS
Prelude.Show, forall x.
Rep GetDetectorModelAnalysisResults x
-> GetDetectorModelAnalysisResults
forall x.
GetDetectorModelAnalysisResults
-> Rep GetDetectorModelAnalysisResults x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetDetectorModelAnalysisResults x
-> GetDetectorModelAnalysisResults
$cfrom :: forall x.
GetDetectorModelAnalysisResults
-> Rep GetDetectorModelAnalysisResults x
Prelude.Generic)

-- |
-- Create a value of 'GetDetectorModelAnalysisResults' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'maxResults', 'getDetectorModelAnalysisResults_maxResults' - The maximum number of results to be returned per request.
--
-- 'nextToken', 'getDetectorModelAnalysisResults_nextToken' - The token that you can use to return the next set of results.
--
-- 'analysisId', 'getDetectorModelAnalysisResults_analysisId' - The ID of the analysis result that you want to retrieve.
newGetDetectorModelAnalysisResults ::
  -- | 'analysisId'
  Prelude.Text ->
  GetDetectorModelAnalysisResults
newGetDetectorModelAnalysisResults :: Text -> GetDetectorModelAnalysisResults
newGetDetectorModelAnalysisResults Text
pAnalysisId_ =
  GetDetectorModelAnalysisResults'
    { $sel:maxResults:GetDetectorModelAnalysisResults' :: Maybe Int
maxResults =
        forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:GetDetectorModelAnalysisResults' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:analysisId:GetDetectorModelAnalysisResults' :: Text
analysisId = Text
pAnalysisId_
    }

-- | The maximum number of results to be returned per request.
getDetectorModelAnalysisResults_maxResults :: Lens.Lens' GetDetectorModelAnalysisResults (Prelude.Maybe Prelude.Int)
getDetectorModelAnalysisResults_maxResults :: Lens' GetDetectorModelAnalysisResults (Maybe Int)
getDetectorModelAnalysisResults_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetDetectorModelAnalysisResults' {Maybe Int
maxResults :: Maybe Int
$sel:maxResults:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Int
maxResults} -> Maybe Int
maxResults) (\s :: GetDetectorModelAnalysisResults
s@GetDetectorModelAnalysisResults' {} Maybe Int
a -> GetDetectorModelAnalysisResults
s {$sel:maxResults:GetDetectorModelAnalysisResults' :: Maybe Int
maxResults = Maybe Int
a} :: GetDetectorModelAnalysisResults)

-- | The token that you can use to return the next set of results.
getDetectorModelAnalysisResults_nextToken :: Lens.Lens' GetDetectorModelAnalysisResults (Prelude.Maybe Prelude.Text)
getDetectorModelAnalysisResults_nextToken :: Lens' GetDetectorModelAnalysisResults (Maybe Text)
getDetectorModelAnalysisResults_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetDetectorModelAnalysisResults' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetDetectorModelAnalysisResults
s@GetDetectorModelAnalysisResults' {} Maybe Text
a -> GetDetectorModelAnalysisResults
s {$sel:nextToken:GetDetectorModelAnalysisResults' :: Maybe Text
nextToken = Maybe Text
a} :: GetDetectorModelAnalysisResults)

-- | The ID of the analysis result that you want to retrieve.
getDetectorModelAnalysisResults_analysisId :: Lens.Lens' GetDetectorModelAnalysisResults Prelude.Text
getDetectorModelAnalysisResults_analysisId :: Lens' GetDetectorModelAnalysisResults Text
getDetectorModelAnalysisResults_analysisId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetDetectorModelAnalysisResults' {Text
analysisId :: Text
$sel:analysisId:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Text
analysisId} -> Text
analysisId) (\s :: GetDetectorModelAnalysisResults
s@GetDetectorModelAnalysisResults' {} Text
a -> GetDetectorModelAnalysisResults
s {$sel:analysisId:GetDetectorModelAnalysisResults' :: Text
analysisId = Text
a} :: GetDetectorModelAnalysisResults)

instance
  Core.AWSRequest
    GetDetectorModelAnalysisResults
  where
  type
    AWSResponse GetDetectorModelAnalysisResults =
      GetDetectorModelAnalysisResultsResponse
  request :: (Service -> Service)
-> GetDetectorModelAnalysisResults
-> Request GetDetectorModelAnalysisResults
request Service -> Service
overrides =
    forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetDetectorModelAnalysisResults
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse (AWSResponse GetDetectorModelAnalysisResults)))
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 [AnalysisResult]
-> Maybe Text -> Int -> GetDetectorModelAnalysisResultsResponse
GetDetectorModelAnalysisResultsResponse'
            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
"analysisResults"
                            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.<*> (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.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
      )

instance
  Prelude.Hashable
    GetDetectorModelAnalysisResults
  where
  hashWithSalt :: Int -> GetDetectorModelAnalysisResults -> Int
hashWithSalt
    Int
_salt
    GetDetectorModelAnalysisResults' {Maybe Int
Maybe Text
Text
analysisId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:analysisId:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Text
$sel:nextToken:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Text
$sel:maxResults:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Int
..} =
      Int
_salt
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxResults
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
analysisId

instance
  Prelude.NFData
    GetDetectorModelAnalysisResults
  where
  rnf :: GetDetectorModelAnalysisResults -> ()
rnf GetDetectorModelAnalysisResults' {Maybe Int
Maybe Text
Text
analysisId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:analysisId:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Text
$sel:nextToken:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Text
$sel:maxResults:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Int
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxResults
      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 Text
analysisId

instance
  Data.ToHeaders
    GetDetectorModelAnalysisResults
  where
  toHeaders :: GetDetectorModelAnalysisResults -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

instance Data.ToPath GetDetectorModelAnalysisResults where
  toPath :: GetDetectorModelAnalysisResults -> ByteString
toPath GetDetectorModelAnalysisResults' {Maybe Int
Maybe Text
Text
analysisId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:analysisId:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Text
$sel:nextToken:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Text
$sel:maxResults:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Int
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"/analysis/detector-models/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
analysisId,
        ByteString
"/results"
      ]

instance Data.ToQuery GetDetectorModelAnalysisResults where
  toQuery :: GetDetectorModelAnalysisResults -> QueryString
toQuery GetDetectorModelAnalysisResults' {Maybe Int
Maybe Text
Text
analysisId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:analysisId:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Text
$sel:nextToken:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Text
$sel:maxResults:GetDetectorModelAnalysisResults' :: GetDetectorModelAnalysisResults -> Maybe Int
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"maxResults" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
maxResults,
        ByteString
"nextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken
      ]

-- | /See:/ 'newGetDetectorModelAnalysisResultsResponse' smart constructor.
data GetDetectorModelAnalysisResultsResponse = GetDetectorModelAnalysisResultsResponse'
  { -- | Contains information about one or more analysis results.
    GetDetectorModelAnalysisResultsResponse -> Maybe [AnalysisResult]
analysisResults :: Prelude.Maybe [AnalysisResult],
    -- | The token that you can use to return the next set of results, or @null@
    -- if there are no more results.
    GetDetectorModelAnalysisResultsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    GetDetectorModelAnalysisResultsResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (GetDetectorModelAnalysisResultsResponse
-> GetDetectorModelAnalysisResultsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetDetectorModelAnalysisResultsResponse
-> GetDetectorModelAnalysisResultsResponse -> Bool
$c/= :: GetDetectorModelAnalysisResultsResponse
-> GetDetectorModelAnalysisResultsResponse -> Bool
== :: GetDetectorModelAnalysisResultsResponse
-> GetDetectorModelAnalysisResultsResponse -> Bool
$c== :: GetDetectorModelAnalysisResultsResponse
-> GetDetectorModelAnalysisResultsResponse -> Bool
Prelude.Eq, ReadPrec [GetDetectorModelAnalysisResultsResponse]
ReadPrec GetDetectorModelAnalysisResultsResponse
Int -> ReadS GetDetectorModelAnalysisResultsResponse
ReadS [GetDetectorModelAnalysisResultsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetDetectorModelAnalysisResultsResponse]
$creadListPrec :: ReadPrec [GetDetectorModelAnalysisResultsResponse]
readPrec :: ReadPrec GetDetectorModelAnalysisResultsResponse
$creadPrec :: ReadPrec GetDetectorModelAnalysisResultsResponse
readList :: ReadS [GetDetectorModelAnalysisResultsResponse]
$creadList :: ReadS [GetDetectorModelAnalysisResultsResponse]
readsPrec :: Int -> ReadS GetDetectorModelAnalysisResultsResponse
$creadsPrec :: Int -> ReadS GetDetectorModelAnalysisResultsResponse
Prelude.Read, Int -> GetDetectorModelAnalysisResultsResponse -> ShowS
[GetDetectorModelAnalysisResultsResponse] -> ShowS
GetDetectorModelAnalysisResultsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetDetectorModelAnalysisResultsResponse] -> ShowS
$cshowList :: [GetDetectorModelAnalysisResultsResponse] -> ShowS
show :: GetDetectorModelAnalysisResultsResponse -> String
$cshow :: GetDetectorModelAnalysisResultsResponse -> String
showsPrec :: Int -> GetDetectorModelAnalysisResultsResponse -> ShowS
$cshowsPrec :: Int -> GetDetectorModelAnalysisResultsResponse -> ShowS
Prelude.Show, forall x.
Rep GetDetectorModelAnalysisResultsResponse x
-> GetDetectorModelAnalysisResultsResponse
forall x.
GetDetectorModelAnalysisResultsResponse
-> Rep GetDetectorModelAnalysisResultsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetDetectorModelAnalysisResultsResponse x
-> GetDetectorModelAnalysisResultsResponse
$cfrom :: forall x.
GetDetectorModelAnalysisResultsResponse
-> Rep GetDetectorModelAnalysisResultsResponse x
Prelude.Generic)

-- |
-- Create a value of 'GetDetectorModelAnalysisResultsResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'analysisResults', 'getDetectorModelAnalysisResultsResponse_analysisResults' - Contains information about one or more analysis results.
--
-- 'nextToken', 'getDetectorModelAnalysisResultsResponse_nextToken' - The token that you can use to return the next set of results, or @null@
-- if there are no more results.
--
-- 'httpStatus', 'getDetectorModelAnalysisResultsResponse_httpStatus' - The response's http status code.
newGetDetectorModelAnalysisResultsResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  GetDetectorModelAnalysisResultsResponse
newGetDetectorModelAnalysisResultsResponse :: Int -> GetDetectorModelAnalysisResultsResponse
newGetDetectorModelAnalysisResultsResponse
  Int
pHttpStatus_ =
    GetDetectorModelAnalysisResultsResponse'
      { $sel:analysisResults:GetDetectorModelAnalysisResultsResponse' :: Maybe [AnalysisResult]
analysisResults =
          forall a. Maybe a
Prelude.Nothing,
        $sel:nextToken:GetDetectorModelAnalysisResultsResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:GetDetectorModelAnalysisResultsResponse' :: Int
httpStatus = Int
pHttpStatus_
      }

-- | Contains information about one or more analysis results.
getDetectorModelAnalysisResultsResponse_analysisResults :: Lens.Lens' GetDetectorModelAnalysisResultsResponse (Prelude.Maybe [AnalysisResult])
getDetectorModelAnalysisResultsResponse_analysisResults :: Lens'
  GetDetectorModelAnalysisResultsResponse (Maybe [AnalysisResult])
getDetectorModelAnalysisResultsResponse_analysisResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetDetectorModelAnalysisResultsResponse' {Maybe [AnalysisResult]
analysisResults :: Maybe [AnalysisResult]
$sel:analysisResults:GetDetectorModelAnalysisResultsResponse' :: GetDetectorModelAnalysisResultsResponse -> Maybe [AnalysisResult]
analysisResults} -> Maybe [AnalysisResult]
analysisResults) (\s :: GetDetectorModelAnalysisResultsResponse
s@GetDetectorModelAnalysisResultsResponse' {} Maybe [AnalysisResult]
a -> GetDetectorModelAnalysisResultsResponse
s {$sel:analysisResults:GetDetectorModelAnalysisResultsResponse' :: Maybe [AnalysisResult]
analysisResults = Maybe [AnalysisResult]
a} :: GetDetectorModelAnalysisResultsResponse) 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

-- | The token that you can use to return the next set of results, or @null@
-- if there are no more results.
getDetectorModelAnalysisResultsResponse_nextToken :: Lens.Lens' GetDetectorModelAnalysisResultsResponse (Prelude.Maybe Prelude.Text)
getDetectorModelAnalysisResultsResponse_nextToken :: Lens' GetDetectorModelAnalysisResultsResponse (Maybe Text)
getDetectorModelAnalysisResultsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetDetectorModelAnalysisResultsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetDetectorModelAnalysisResultsResponse' :: GetDetectorModelAnalysisResultsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetDetectorModelAnalysisResultsResponse
s@GetDetectorModelAnalysisResultsResponse' {} Maybe Text
a -> GetDetectorModelAnalysisResultsResponse
s {$sel:nextToken:GetDetectorModelAnalysisResultsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: GetDetectorModelAnalysisResultsResponse)

-- | The response's http status code.
getDetectorModelAnalysisResultsResponse_httpStatus :: Lens.Lens' GetDetectorModelAnalysisResultsResponse Prelude.Int
getDetectorModelAnalysisResultsResponse_httpStatus :: Lens' GetDetectorModelAnalysisResultsResponse Int
getDetectorModelAnalysisResultsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetDetectorModelAnalysisResultsResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetDetectorModelAnalysisResultsResponse' :: GetDetectorModelAnalysisResultsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetDetectorModelAnalysisResultsResponse
s@GetDetectorModelAnalysisResultsResponse' {} Int
a -> GetDetectorModelAnalysisResultsResponse
s {$sel:httpStatus:GetDetectorModelAnalysisResultsResponse' :: Int
httpStatus = Int
a} :: GetDetectorModelAnalysisResultsResponse)

instance
  Prelude.NFData
    GetDetectorModelAnalysisResultsResponse
  where
  rnf :: GetDetectorModelAnalysisResultsResponse -> ()
rnf GetDetectorModelAnalysisResultsResponse' {Int
Maybe [AnalysisResult]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
analysisResults :: Maybe [AnalysisResult]
$sel:httpStatus:GetDetectorModelAnalysisResultsResponse' :: GetDetectorModelAnalysisResultsResponse -> Int
$sel:nextToken:GetDetectorModelAnalysisResultsResponse' :: GetDetectorModelAnalysisResultsResponse -> Maybe Text
$sel:analysisResults:GetDetectorModelAnalysisResultsResponse' :: GetDetectorModelAnalysisResultsResponse -> Maybe [AnalysisResult]
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe [AnalysisResult]
analysisResults
      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 Int
httpStatus