{-# 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.SageMaker.BatchDescribeModelPackage
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- This action batch describes a list of versioned model packages
module Amazonka.SageMaker.BatchDescribeModelPackage
  ( -- * Creating a Request
    BatchDescribeModelPackage (..),
    newBatchDescribeModelPackage,

    -- * Request Lenses
    batchDescribeModelPackage_modelPackageArnList,

    -- * Destructuring the Response
    BatchDescribeModelPackageResponse (..),
    newBatchDescribeModelPackageResponse,

    -- * Response Lenses
    batchDescribeModelPackageResponse_batchDescribeModelPackageErrorMap,
    batchDescribeModelPackageResponse_modelPackageSummaries,
    batchDescribeModelPackageResponse_httpStatus,
  )
where

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

-- | /See:/ 'newBatchDescribeModelPackage' smart constructor.
data BatchDescribeModelPackage = BatchDescribeModelPackage'
  { -- | The list of Amazon Resource Name (ARN) of the model package groups.
    BatchDescribeModelPackage -> NonEmpty Text
modelPackageArnList :: Prelude.NonEmpty Prelude.Text
  }
  deriving (BatchDescribeModelPackage -> BatchDescribeModelPackage -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BatchDescribeModelPackage -> BatchDescribeModelPackage -> Bool
$c/= :: BatchDescribeModelPackage -> BatchDescribeModelPackage -> Bool
== :: BatchDescribeModelPackage -> BatchDescribeModelPackage -> Bool
$c== :: BatchDescribeModelPackage -> BatchDescribeModelPackage -> Bool
Prelude.Eq, ReadPrec [BatchDescribeModelPackage]
ReadPrec BatchDescribeModelPackage
Int -> ReadS BatchDescribeModelPackage
ReadS [BatchDescribeModelPackage]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [BatchDescribeModelPackage]
$creadListPrec :: ReadPrec [BatchDescribeModelPackage]
readPrec :: ReadPrec BatchDescribeModelPackage
$creadPrec :: ReadPrec BatchDescribeModelPackage
readList :: ReadS [BatchDescribeModelPackage]
$creadList :: ReadS [BatchDescribeModelPackage]
readsPrec :: Int -> ReadS BatchDescribeModelPackage
$creadsPrec :: Int -> ReadS BatchDescribeModelPackage
Prelude.Read, Int -> BatchDescribeModelPackage -> ShowS
[BatchDescribeModelPackage] -> ShowS
BatchDescribeModelPackage -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BatchDescribeModelPackage] -> ShowS
$cshowList :: [BatchDescribeModelPackage] -> ShowS
show :: BatchDescribeModelPackage -> String
$cshow :: BatchDescribeModelPackage -> String
showsPrec :: Int -> BatchDescribeModelPackage -> ShowS
$cshowsPrec :: Int -> BatchDescribeModelPackage -> ShowS
Prelude.Show, forall x.
Rep BatchDescribeModelPackage x -> BatchDescribeModelPackage
forall x.
BatchDescribeModelPackage -> Rep BatchDescribeModelPackage x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep BatchDescribeModelPackage x -> BatchDescribeModelPackage
$cfrom :: forall x.
BatchDescribeModelPackage -> Rep BatchDescribeModelPackage x
Prelude.Generic)

-- |
-- Create a value of 'BatchDescribeModelPackage' 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:
--
-- 'modelPackageArnList', 'batchDescribeModelPackage_modelPackageArnList' - The list of Amazon Resource Name (ARN) of the model package groups.
newBatchDescribeModelPackage ::
  -- | 'modelPackageArnList'
  Prelude.NonEmpty Prelude.Text ->
  BatchDescribeModelPackage
newBatchDescribeModelPackage :: NonEmpty Text -> BatchDescribeModelPackage
newBatchDescribeModelPackage NonEmpty Text
pModelPackageArnList_ =
  BatchDescribeModelPackage'
    { $sel:modelPackageArnList:BatchDescribeModelPackage' :: NonEmpty Text
modelPackageArnList =
        forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced forall t b. AReview t b -> b -> t
Lens.# NonEmpty Text
pModelPackageArnList_
    }

-- | The list of Amazon Resource Name (ARN) of the model package groups.
batchDescribeModelPackage_modelPackageArnList :: Lens.Lens' BatchDescribeModelPackage (Prelude.NonEmpty Prelude.Text)
batchDescribeModelPackage_modelPackageArnList :: Lens' BatchDescribeModelPackage (NonEmpty Text)
batchDescribeModelPackage_modelPackageArnList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchDescribeModelPackage' {NonEmpty Text
modelPackageArnList :: NonEmpty Text
$sel:modelPackageArnList:BatchDescribeModelPackage' :: BatchDescribeModelPackage -> NonEmpty Text
modelPackageArnList} -> NonEmpty Text
modelPackageArnList) (\s :: BatchDescribeModelPackage
s@BatchDescribeModelPackage' {} NonEmpty Text
a -> BatchDescribeModelPackage
s {$sel:modelPackageArnList:BatchDescribeModelPackage' :: NonEmpty Text
modelPackageArnList = NonEmpty Text
a} :: BatchDescribeModelPackage) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

instance Core.AWSRequest BatchDescribeModelPackage where
  type
    AWSResponse BatchDescribeModelPackage =
      BatchDescribeModelPackageResponse
  request :: (Service -> Service)
-> BatchDescribeModelPackage -> Request BatchDescribeModelPackage
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 BatchDescribeModelPackage
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse BatchDescribeModelPackage)))
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 (HashMap Text BatchDescribeModelPackageError)
-> Maybe (HashMap Text BatchDescribeModelPackageSummary)
-> Int
-> BatchDescribeModelPackageResponse
BatchDescribeModelPackageResponse'
            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
"BatchDescribeModelPackageErrorMap"
                            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
"ModelPackageSummaries"
                            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 BatchDescribeModelPackage where
  hashWithSalt :: Int -> BatchDescribeModelPackage -> Int
hashWithSalt Int
_salt BatchDescribeModelPackage' {NonEmpty Text
modelPackageArnList :: NonEmpty Text
$sel:modelPackageArnList:BatchDescribeModelPackage' :: BatchDescribeModelPackage -> NonEmpty Text
..} =
    Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` NonEmpty Text
modelPackageArnList

instance Prelude.NFData BatchDescribeModelPackage where
  rnf :: BatchDescribeModelPackage -> ()
rnf BatchDescribeModelPackage' {NonEmpty Text
modelPackageArnList :: NonEmpty Text
$sel:modelPackageArnList:BatchDescribeModelPackage' :: BatchDescribeModelPackage -> NonEmpty Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf NonEmpty Text
modelPackageArnList

instance Data.ToHeaders BatchDescribeModelPackage where
  toHeaders :: BatchDescribeModelPackage -> 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
"SageMaker.BatchDescribeModelPackage" ::
                          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 BatchDescribeModelPackage where
  toJSON :: BatchDescribeModelPackage -> Value
toJSON BatchDescribeModelPackage' {NonEmpty Text
modelPackageArnList :: NonEmpty Text
$sel:modelPackageArnList:BatchDescribeModelPackage' :: BatchDescribeModelPackage -> NonEmpty Text
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ forall a. a -> Maybe a
Prelude.Just
              (Key
"ModelPackageArnList" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= NonEmpty Text
modelPackageArnList)
          ]
      )

instance Data.ToPath BatchDescribeModelPackage where
  toPath :: BatchDescribeModelPackage -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance Data.ToQuery BatchDescribeModelPackage where
  toQuery :: BatchDescribeModelPackage -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newBatchDescribeModelPackageResponse' smart constructor.
data BatchDescribeModelPackageResponse = BatchDescribeModelPackageResponse'
  { -- | A map of the resource and BatchDescribeModelPackageError objects
    -- reporting the error associated with describing the model package.
    BatchDescribeModelPackageResponse
-> Maybe (HashMap Text BatchDescribeModelPackageError)
batchDescribeModelPackageErrorMap :: Prelude.Maybe (Prelude.HashMap Prelude.Text BatchDescribeModelPackageError),
    -- | The summaries for the model package versions
    BatchDescribeModelPackageResponse
-> Maybe (HashMap Text BatchDescribeModelPackageSummary)
modelPackageSummaries :: Prelude.Maybe (Prelude.HashMap Prelude.Text BatchDescribeModelPackageSummary),
    -- | The response's http status code.
    BatchDescribeModelPackageResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (BatchDescribeModelPackageResponse
-> BatchDescribeModelPackageResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BatchDescribeModelPackageResponse
-> BatchDescribeModelPackageResponse -> Bool
$c/= :: BatchDescribeModelPackageResponse
-> BatchDescribeModelPackageResponse -> Bool
== :: BatchDescribeModelPackageResponse
-> BatchDescribeModelPackageResponse -> Bool
$c== :: BatchDescribeModelPackageResponse
-> BatchDescribeModelPackageResponse -> Bool
Prelude.Eq, ReadPrec [BatchDescribeModelPackageResponse]
ReadPrec BatchDescribeModelPackageResponse
Int -> ReadS BatchDescribeModelPackageResponse
ReadS [BatchDescribeModelPackageResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [BatchDescribeModelPackageResponse]
$creadListPrec :: ReadPrec [BatchDescribeModelPackageResponse]
readPrec :: ReadPrec BatchDescribeModelPackageResponse
$creadPrec :: ReadPrec BatchDescribeModelPackageResponse
readList :: ReadS [BatchDescribeModelPackageResponse]
$creadList :: ReadS [BatchDescribeModelPackageResponse]
readsPrec :: Int -> ReadS BatchDescribeModelPackageResponse
$creadsPrec :: Int -> ReadS BatchDescribeModelPackageResponse
Prelude.Read, Int -> BatchDescribeModelPackageResponse -> ShowS
[BatchDescribeModelPackageResponse] -> ShowS
BatchDescribeModelPackageResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BatchDescribeModelPackageResponse] -> ShowS
$cshowList :: [BatchDescribeModelPackageResponse] -> ShowS
show :: BatchDescribeModelPackageResponse -> String
$cshow :: BatchDescribeModelPackageResponse -> String
showsPrec :: Int -> BatchDescribeModelPackageResponse -> ShowS
$cshowsPrec :: Int -> BatchDescribeModelPackageResponse -> ShowS
Prelude.Show, forall x.
Rep BatchDescribeModelPackageResponse x
-> BatchDescribeModelPackageResponse
forall x.
BatchDescribeModelPackageResponse
-> Rep BatchDescribeModelPackageResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep BatchDescribeModelPackageResponse x
-> BatchDescribeModelPackageResponse
$cfrom :: forall x.
BatchDescribeModelPackageResponse
-> Rep BatchDescribeModelPackageResponse x
Prelude.Generic)

-- |
-- Create a value of 'BatchDescribeModelPackageResponse' 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:
--
-- 'batchDescribeModelPackageErrorMap', 'batchDescribeModelPackageResponse_batchDescribeModelPackageErrorMap' - A map of the resource and BatchDescribeModelPackageError objects
-- reporting the error associated with describing the model package.
--
-- 'modelPackageSummaries', 'batchDescribeModelPackageResponse_modelPackageSummaries' - The summaries for the model package versions
--
-- 'httpStatus', 'batchDescribeModelPackageResponse_httpStatus' - The response's http status code.
newBatchDescribeModelPackageResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  BatchDescribeModelPackageResponse
newBatchDescribeModelPackageResponse :: Int -> BatchDescribeModelPackageResponse
newBatchDescribeModelPackageResponse Int
pHttpStatus_ =
  BatchDescribeModelPackageResponse'
    { $sel:batchDescribeModelPackageErrorMap:BatchDescribeModelPackageResponse' :: Maybe (HashMap Text BatchDescribeModelPackageError)
batchDescribeModelPackageErrorMap =
        forall a. Maybe a
Prelude.Nothing,
      $sel:modelPackageSummaries:BatchDescribeModelPackageResponse' :: Maybe (HashMap Text BatchDescribeModelPackageSummary)
modelPackageSummaries = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:BatchDescribeModelPackageResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | A map of the resource and BatchDescribeModelPackageError objects
-- reporting the error associated with describing the model package.
batchDescribeModelPackageResponse_batchDescribeModelPackageErrorMap :: Lens.Lens' BatchDescribeModelPackageResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text BatchDescribeModelPackageError))
batchDescribeModelPackageResponse_batchDescribeModelPackageErrorMap :: Lens'
  BatchDescribeModelPackageResponse
  (Maybe (HashMap Text BatchDescribeModelPackageError))
batchDescribeModelPackageResponse_batchDescribeModelPackageErrorMap = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchDescribeModelPackageResponse' {Maybe (HashMap Text BatchDescribeModelPackageError)
batchDescribeModelPackageErrorMap :: Maybe (HashMap Text BatchDescribeModelPackageError)
$sel:batchDescribeModelPackageErrorMap:BatchDescribeModelPackageResponse' :: BatchDescribeModelPackageResponse
-> Maybe (HashMap Text BatchDescribeModelPackageError)
batchDescribeModelPackageErrorMap} -> Maybe (HashMap Text BatchDescribeModelPackageError)
batchDescribeModelPackageErrorMap) (\s :: BatchDescribeModelPackageResponse
s@BatchDescribeModelPackageResponse' {} Maybe (HashMap Text BatchDescribeModelPackageError)
a -> BatchDescribeModelPackageResponse
s {$sel:batchDescribeModelPackageErrorMap:BatchDescribeModelPackageResponse' :: Maybe (HashMap Text BatchDescribeModelPackageError)
batchDescribeModelPackageErrorMap = Maybe (HashMap Text BatchDescribeModelPackageError)
a} :: BatchDescribeModelPackageResponse) 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 summaries for the model package versions
batchDescribeModelPackageResponse_modelPackageSummaries :: Lens.Lens' BatchDescribeModelPackageResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text BatchDescribeModelPackageSummary))
batchDescribeModelPackageResponse_modelPackageSummaries :: Lens'
  BatchDescribeModelPackageResponse
  (Maybe (HashMap Text BatchDescribeModelPackageSummary))
batchDescribeModelPackageResponse_modelPackageSummaries = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchDescribeModelPackageResponse' {Maybe (HashMap Text BatchDescribeModelPackageSummary)
modelPackageSummaries :: Maybe (HashMap Text BatchDescribeModelPackageSummary)
$sel:modelPackageSummaries:BatchDescribeModelPackageResponse' :: BatchDescribeModelPackageResponse
-> Maybe (HashMap Text BatchDescribeModelPackageSummary)
modelPackageSummaries} -> Maybe (HashMap Text BatchDescribeModelPackageSummary)
modelPackageSummaries) (\s :: BatchDescribeModelPackageResponse
s@BatchDescribeModelPackageResponse' {} Maybe (HashMap Text BatchDescribeModelPackageSummary)
a -> BatchDescribeModelPackageResponse
s {$sel:modelPackageSummaries:BatchDescribeModelPackageResponse' :: Maybe (HashMap Text BatchDescribeModelPackageSummary)
modelPackageSummaries = Maybe (HashMap Text BatchDescribeModelPackageSummary)
a} :: BatchDescribeModelPackageResponse) 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 response's http status code.
batchDescribeModelPackageResponse_httpStatus :: Lens.Lens' BatchDescribeModelPackageResponse Prelude.Int
batchDescribeModelPackageResponse_httpStatus :: Lens' BatchDescribeModelPackageResponse Int
batchDescribeModelPackageResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchDescribeModelPackageResponse' {Int
httpStatus :: Int
$sel:httpStatus:BatchDescribeModelPackageResponse' :: BatchDescribeModelPackageResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: BatchDescribeModelPackageResponse
s@BatchDescribeModelPackageResponse' {} Int
a -> BatchDescribeModelPackageResponse
s {$sel:httpStatus:BatchDescribeModelPackageResponse' :: Int
httpStatus = Int
a} :: BatchDescribeModelPackageResponse)

instance
  Prelude.NFData
    BatchDescribeModelPackageResponse
  where
  rnf :: BatchDescribeModelPackageResponse -> ()
rnf BatchDescribeModelPackageResponse' {Int
Maybe (HashMap Text BatchDescribeModelPackageError)
Maybe (HashMap Text BatchDescribeModelPackageSummary)
httpStatus :: Int
modelPackageSummaries :: Maybe (HashMap Text BatchDescribeModelPackageSummary)
batchDescribeModelPackageErrorMap :: Maybe (HashMap Text BatchDescribeModelPackageError)
$sel:httpStatus:BatchDescribeModelPackageResponse' :: BatchDescribeModelPackageResponse -> Int
$sel:modelPackageSummaries:BatchDescribeModelPackageResponse' :: BatchDescribeModelPackageResponse
-> Maybe (HashMap Text BatchDescribeModelPackageSummary)
$sel:batchDescribeModelPackageErrorMap:BatchDescribeModelPackageResponse' :: BatchDescribeModelPackageResponse
-> Maybe (HashMap Text BatchDescribeModelPackageError)
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text BatchDescribeModelPackageError)
batchDescribeModelPackageErrorMap
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text BatchDescribeModelPackageSummary)
modelPackageSummaries
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus