{-# 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.IoTSiteWise.ListAssetProperties
(
ListAssetProperties (..),
newListAssetProperties,
listAssetProperties_filter,
listAssetProperties_maxResults,
listAssetProperties_nextToken,
listAssetProperties_assetId,
ListAssetPropertiesResponse (..),
newListAssetPropertiesResponse,
listAssetPropertiesResponse_nextToken,
listAssetPropertiesResponse_httpStatus,
listAssetPropertiesResponse_assetPropertySummaries,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoTSiteWise.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListAssetProperties = ListAssetProperties'
{
ListAssetProperties -> Maybe ListAssetPropertiesFilter
filter' :: Prelude.Maybe ListAssetPropertiesFilter,
ListAssetProperties -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListAssetProperties -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListAssetProperties -> Text
assetId :: Prelude.Text
}
deriving (ListAssetProperties -> ListAssetProperties -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListAssetProperties -> ListAssetProperties -> Bool
$c/= :: ListAssetProperties -> ListAssetProperties -> Bool
== :: ListAssetProperties -> ListAssetProperties -> Bool
$c== :: ListAssetProperties -> ListAssetProperties -> Bool
Prelude.Eq, ReadPrec [ListAssetProperties]
ReadPrec ListAssetProperties
Int -> ReadS ListAssetProperties
ReadS [ListAssetProperties]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListAssetProperties]
$creadListPrec :: ReadPrec [ListAssetProperties]
readPrec :: ReadPrec ListAssetProperties
$creadPrec :: ReadPrec ListAssetProperties
readList :: ReadS [ListAssetProperties]
$creadList :: ReadS [ListAssetProperties]
readsPrec :: Int -> ReadS ListAssetProperties
$creadsPrec :: Int -> ReadS ListAssetProperties
Prelude.Read, Int -> ListAssetProperties -> ShowS
[ListAssetProperties] -> ShowS
ListAssetProperties -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListAssetProperties] -> ShowS
$cshowList :: [ListAssetProperties] -> ShowS
show :: ListAssetProperties -> String
$cshow :: ListAssetProperties -> String
showsPrec :: Int -> ListAssetProperties -> ShowS
$cshowsPrec :: Int -> ListAssetProperties -> ShowS
Prelude.Show, forall x. Rep ListAssetProperties x -> ListAssetProperties
forall x. ListAssetProperties -> Rep ListAssetProperties x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListAssetProperties x -> ListAssetProperties
$cfrom :: forall x. ListAssetProperties -> Rep ListAssetProperties x
Prelude.Generic)
newListAssetProperties ::
Prelude.Text ->
ListAssetProperties
newListAssetProperties :: Text -> ListAssetProperties
newListAssetProperties Text
pAssetId_ =
ListAssetProperties'
{ $sel:filter':ListAssetProperties' :: Maybe ListAssetPropertiesFilter
filter' = forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListAssetProperties' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListAssetProperties' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:assetId:ListAssetProperties' :: Text
assetId = Text
pAssetId_
}
listAssetProperties_filter :: Lens.Lens' ListAssetProperties (Prelude.Maybe ListAssetPropertiesFilter)
listAssetProperties_filter :: Lens' ListAssetProperties (Maybe ListAssetPropertiesFilter)
listAssetProperties_filter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAssetProperties' {Maybe ListAssetPropertiesFilter
filter' :: Maybe ListAssetPropertiesFilter
$sel:filter':ListAssetProperties' :: ListAssetProperties -> Maybe ListAssetPropertiesFilter
filter'} -> Maybe ListAssetPropertiesFilter
filter') (\s :: ListAssetProperties
s@ListAssetProperties' {} Maybe ListAssetPropertiesFilter
a -> ListAssetProperties
s {$sel:filter':ListAssetProperties' :: Maybe ListAssetPropertiesFilter
filter' = Maybe ListAssetPropertiesFilter
a} :: ListAssetProperties)
listAssetProperties_maxResults :: Lens.Lens' ListAssetProperties (Prelude.Maybe Prelude.Natural)
listAssetProperties_maxResults :: Lens' ListAssetProperties (Maybe Natural)
listAssetProperties_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAssetProperties' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListAssetProperties' :: ListAssetProperties -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListAssetProperties
s@ListAssetProperties' {} Maybe Natural
a -> ListAssetProperties
s {$sel:maxResults:ListAssetProperties' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListAssetProperties)
listAssetProperties_nextToken :: Lens.Lens' ListAssetProperties (Prelude.Maybe Prelude.Text)
listAssetProperties_nextToken :: Lens' ListAssetProperties (Maybe Text)
listAssetProperties_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAssetProperties' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListAssetProperties' :: ListAssetProperties -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListAssetProperties
s@ListAssetProperties' {} Maybe Text
a -> ListAssetProperties
s {$sel:nextToken:ListAssetProperties' :: Maybe Text
nextToken = Maybe Text
a} :: ListAssetProperties)
listAssetProperties_assetId :: Lens.Lens' ListAssetProperties Prelude.Text
listAssetProperties_assetId :: Lens' ListAssetProperties Text
listAssetProperties_assetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAssetProperties' {Text
assetId :: Text
$sel:assetId:ListAssetProperties' :: ListAssetProperties -> Text
assetId} -> Text
assetId) (\s :: ListAssetProperties
s@ListAssetProperties' {} Text
a -> ListAssetProperties
s {$sel:assetId:ListAssetProperties' :: Text
assetId = Text
a} :: ListAssetProperties)
instance Core.AWSPager ListAssetProperties where
page :: ListAssetProperties
-> AWSResponse ListAssetProperties -> Maybe ListAssetProperties
page ListAssetProperties
rq AWSResponse ListAssetProperties
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListAssetProperties
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListAssetPropertiesResponse (Maybe Text)
listAssetPropertiesResponse_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 ListAssetProperties
rs
forall s a. s -> Getting a s a -> a
Lens.^. Lens' ListAssetPropertiesResponse [AssetPropertySummary]
listAssetPropertiesResponse_assetPropertySummaries
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ ListAssetProperties
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListAssetProperties (Maybe Text)
listAssetProperties_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListAssetProperties
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListAssetPropertiesResponse (Maybe Text)
listAssetPropertiesResponse_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 ListAssetProperties where
type
AWSResponse ListAssetProperties =
ListAssetPropertiesResponse
request :: (Service -> Service)
-> ListAssetProperties -> Request ListAssetProperties
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 ListAssetProperties
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListAssetProperties)))
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
-> Int -> [AssetPropertySummary] -> ListAssetPropertiesResponse
ListAssetPropertiesResponse'
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.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
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
"assetPropertySummaries"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
)
instance Prelude.Hashable ListAssetProperties where
hashWithSalt :: Int -> ListAssetProperties -> Int
hashWithSalt Int
_salt ListAssetProperties' {Maybe Natural
Maybe Text
Maybe ListAssetPropertiesFilter
Text
assetId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe ListAssetPropertiesFilter
$sel:assetId:ListAssetProperties' :: ListAssetProperties -> Text
$sel:nextToken:ListAssetProperties' :: ListAssetProperties -> Maybe Text
$sel:maxResults:ListAssetProperties' :: ListAssetProperties -> Maybe Natural
$sel:filter':ListAssetProperties' :: ListAssetProperties -> Maybe ListAssetPropertiesFilter
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ListAssetPropertiesFilter
filter'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
assetId
instance Prelude.NFData ListAssetProperties where
rnf :: ListAssetProperties -> ()
rnf ListAssetProperties' {Maybe Natural
Maybe Text
Maybe ListAssetPropertiesFilter
Text
assetId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe ListAssetPropertiesFilter
$sel:assetId:ListAssetProperties' :: ListAssetProperties -> Text
$sel:nextToken:ListAssetProperties' :: ListAssetProperties -> Maybe Text
$sel:maxResults:ListAssetProperties' :: ListAssetProperties -> Maybe Natural
$sel:filter':ListAssetProperties' :: ListAssetProperties -> Maybe ListAssetPropertiesFilter
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ListAssetPropertiesFilter
filter'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
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
assetId
instance Data.ToHeaders ListAssetProperties where
toHeaders :: ListAssetProperties -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToPath ListAssetProperties where
toPath :: ListAssetProperties -> ByteString
toPath ListAssetProperties' {Maybe Natural
Maybe Text
Maybe ListAssetPropertiesFilter
Text
assetId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe ListAssetPropertiesFilter
$sel:assetId:ListAssetProperties' :: ListAssetProperties -> Text
$sel:nextToken:ListAssetProperties' :: ListAssetProperties -> Maybe Text
$sel:maxResults:ListAssetProperties' :: ListAssetProperties -> Maybe Natural
$sel:filter':ListAssetProperties' :: ListAssetProperties -> Maybe ListAssetPropertiesFilter
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/assets/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
assetId, ByteString
"/properties"]
instance Data.ToQuery ListAssetProperties where
toQuery :: ListAssetProperties -> QueryString
toQuery ListAssetProperties' {Maybe Natural
Maybe Text
Maybe ListAssetPropertiesFilter
Text
assetId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe ListAssetPropertiesFilter
$sel:assetId:ListAssetProperties' :: ListAssetProperties -> Text
$sel:nextToken:ListAssetProperties' :: ListAssetProperties -> Maybe Text
$sel:maxResults:ListAssetProperties' :: ListAssetProperties -> Maybe Natural
$sel:filter':ListAssetProperties' :: ListAssetProperties -> Maybe ListAssetPropertiesFilter
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"filter" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ListAssetPropertiesFilter
filter',
ByteString
"maxResults" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"nextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken
]
data ListAssetPropertiesResponse = ListAssetPropertiesResponse'
{
ListAssetPropertiesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListAssetPropertiesResponse -> Int
httpStatus :: Prelude.Int,
ListAssetPropertiesResponse -> [AssetPropertySummary]
assetPropertySummaries :: [AssetPropertySummary]
}
deriving (ListAssetPropertiesResponse -> ListAssetPropertiesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListAssetPropertiesResponse -> ListAssetPropertiesResponse -> Bool
$c/= :: ListAssetPropertiesResponse -> ListAssetPropertiesResponse -> Bool
== :: ListAssetPropertiesResponse -> ListAssetPropertiesResponse -> Bool
$c== :: ListAssetPropertiesResponse -> ListAssetPropertiesResponse -> Bool
Prelude.Eq, ReadPrec [ListAssetPropertiesResponse]
ReadPrec ListAssetPropertiesResponse
Int -> ReadS ListAssetPropertiesResponse
ReadS [ListAssetPropertiesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListAssetPropertiesResponse]
$creadListPrec :: ReadPrec [ListAssetPropertiesResponse]
readPrec :: ReadPrec ListAssetPropertiesResponse
$creadPrec :: ReadPrec ListAssetPropertiesResponse
readList :: ReadS [ListAssetPropertiesResponse]
$creadList :: ReadS [ListAssetPropertiesResponse]
readsPrec :: Int -> ReadS ListAssetPropertiesResponse
$creadsPrec :: Int -> ReadS ListAssetPropertiesResponse
Prelude.Read, Int -> ListAssetPropertiesResponse -> ShowS
[ListAssetPropertiesResponse] -> ShowS
ListAssetPropertiesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListAssetPropertiesResponse] -> ShowS
$cshowList :: [ListAssetPropertiesResponse] -> ShowS
show :: ListAssetPropertiesResponse -> String
$cshow :: ListAssetPropertiesResponse -> String
showsPrec :: Int -> ListAssetPropertiesResponse -> ShowS
$cshowsPrec :: Int -> ListAssetPropertiesResponse -> ShowS
Prelude.Show, forall x.
Rep ListAssetPropertiesResponse x -> ListAssetPropertiesResponse
forall x.
ListAssetPropertiesResponse -> Rep ListAssetPropertiesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListAssetPropertiesResponse x -> ListAssetPropertiesResponse
$cfrom :: forall x.
ListAssetPropertiesResponse -> Rep ListAssetPropertiesResponse x
Prelude.Generic)
newListAssetPropertiesResponse ::
Prelude.Int ->
ListAssetPropertiesResponse
newListAssetPropertiesResponse :: Int -> ListAssetPropertiesResponse
newListAssetPropertiesResponse Int
pHttpStatus_ =
ListAssetPropertiesResponse'
{ $sel:nextToken:ListAssetPropertiesResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListAssetPropertiesResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:assetPropertySummaries:ListAssetPropertiesResponse' :: [AssetPropertySummary]
assetPropertySummaries = forall a. Monoid a => a
Prelude.mempty
}
listAssetPropertiesResponse_nextToken :: Lens.Lens' ListAssetPropertiesResponse (Prelude.Maybe Prelude.Text)
listAssetPropertiesResponse_nextToken :: Lens' ListAssetPropertiesResponse (Maybe Text)
listAssetPropertiesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAssetPropertiesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListAssetPropertiesResponse' :: ListAssetPropertiesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListAssetPropertiesResponse
s@ListAssetPropertiesResponse' {} Maybe Text
a -> ListAssetPropertiesResponse
s {$sel:nextToken:ListAssetPropertiesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListAssetPropertiesResponse)
listAssetPropertiesResponse_httpStatus :: Lens.Lens' ListAssetPropertiesResponse Prelude.Int
listAssetPropertiesResponse_httpStatus :: Lens' ListAssetPropertiesResponse Int
listAssetPropertiesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAssetPropertiesResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListAssetPropertiesResponse' :: ListAssetPropertiesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListAssetPropertiesResponse
s@ListAssetPropertiesResponse' {} Int
a -> ListAssetPropertiesResponse
s {$sel:httpStatus:ListAssetPropertiesResponse' :: Int
httpStatus = Int
a} :: ListAssetPropertiesResponse)
listAssetPropertiesResponse_assetPropertySummaries :: Lens.Lens' ListAssetPropertiesResponse [AssetPropertySummary]
listAssetPropertiesResponse_assetPropertySummaries :: Lens' ListAssetPropertiesResponse [AssetPropertySummary]
listAssetPropertiesResponse_assetPropertySummaries = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAssetPropertiesResponse' {[AssetPropertySummary]
assetPropertySummaries :: [AssetPropertySummary]
$sel:assetPropertySummaries:ListAssetPropertiesResponse' :: ListAssetPropertiesResponse -> [AssetPropertySummary]
assetPropertySummaries} -> [AssetPropertySummary]
assetPropertySummaries) (\s :: ListAssetPropertiesResponse
s@ListAssetPropertiesResponse' {} [AssetPropertySummary]
a -> ListAssetPropertiesResponse
s {$sel:assetPropertySummaries:ListAssetPropertiesResponse' :: [AssetPropertySummary]
assetPropertySummaries = [AssetPropertySummary]
a} :: ListAssetPropertiesResponse) 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 Prelude.NFData ListAssetPropertiesResponse where
rnf :: ListAssetPropertiesResponse -> ()
rnf ListAssetPropertiesResponse' {Int
[AssetPropertySummary]
Maybe Text
assetPropertySummaries :: [AssetPropertySummary]
httpStatus :: Int
nextToken :: Maybe Text
$sel:assetPropertySummaries:ListAssetPropertiesResponse' :: ListAssetPropertiesResponse -> [AssetPropertySummary]
$sel:httpStatus:ListAssetPropertiesResponse' :: ListAssetPropertiesResponse -> Int
$sel:nextToken:ListAssetPropertiesResponse' :: ListAssetPropertiesResponse -> 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 Int
httpStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf [AssetPropertySummary]
assetPropertySummaries