{-# 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.SageMaker.DescribeLineageGroup
(
DescribeLineageGroup (..),
newDescribeLineageGroup,
describeLineageGroup_lineageGroupName,
DescribeLineageGroupResponse (..),
newDescribeLineageGroupResponse,
describeLineageGroupResponse_createdBy,
describeLineageGroupResponse_creationTime,
describeLineageGroupResponse_description,
describeLineageGroupResponse_displayName,
describeLineageGroupResponse_lastModifiedBy,
describeLineageGroupResponse_lastModifiedTime,
describeLineageGroupResponse_lineageGroupArn,
describeLineageGroupResponse_lineageGroupName,
describeLineageGroupResponse_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
data DescribeLineageGroup = DescribeLineageGroup'
{
DescribeLineageGroup -> Text
lineageGroupName :: Prelude.Text
}
deriving (DescribeLineageGroup -> DescribeLineageGroup -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeLineageGroup -> DescribeLineageGroup -> Bool
$c/= :: DescribeLineageGroup -> DescribeLineageGroup -> Bool
== :: DescribeLineageGroup -> DescribeLineageGroup -> Bool
$c== :: DescribeLineageGroup -> DescribeLineageGroup -> Bool
Prelude.Eq, ReadPrec [DescribeLineageGroup]
ReadPrec DescribeLineageGroup
Int -> ReadS DescribeLineageGroup
ReadS [DescribeLineageGroup]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeLineageGroup]
$creadListPrec :: ReadPrec [DescribeLineageGroup]
readPrec :: ReadPrec DescribeLineageGroup
$creadPrec :: ReadPrec DescribeLineageGroup
readList :: ReadS [DescribeLineageGroup]
$creadList :: ReadS [DescribeLineageGroup]
readsPrec :: Int -> ReadS DescribeLineageGroup
$creadsPrec :: Int -> ReadS DescribeLineageGroup
Prelude.Read, Int -> DescribeLineageGroup -> ShowS
[DescribeLineageGroup] -> ShowS
DescribeLineageGroup -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeLineageGroup] -> ShowS
$cshowList :: [DescribeLineageGroup] -> ShowS
show :: DescribeLineageGroup -> String
$cshow :: DescribeLineageGroup -> String
showsPrec :: Int -> DescribeLineageGroup -> ShowS
$cshowsPrec :: Int -> DescribeLineageGroup -> ShowS
Prelude.Show, forall x. Rep DescribeLineageGroup x -> DescribeLineageGroup
forall x. DescribeLineageGroup -> Rep DescribeLineageGroup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeLineageGroup x -> DescribeLineageGroup
$cfrom :: forall x. DescribeLineageGroup -> Rep DescribeLineageGroup x
Prelude.Generic)
newDescribeLineageGroup ::
Prelude.Text ->
DescribeLineageGroup
newDescribeLineageGroup :: Text -> DescribeLineageGroup
newDescribeLineageGroup Text
pLineageGroupName_ =
DescribeLineageGroup'
{ $sel:lineageGroupName:DescribeLineageGroup' :: Text
lineageGroupName =
Text
pLineageGroupName_
}
describeLineageGroup_lineageGroupName :: Lens.Lens' DescribeLineageGroup Prelude.Text
describeLineageGroup_lineageGroupName :: Lens' DescribeLineageGroup Text
describeLineageGroup_lineageGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroup' {Text
lineageGroupName :: Text
$sel:lineageGroupName:DescribeLineageGroup' :: DescribeLineageGroup -> Text
lineageGroupName} -> Text
lineageGroupName) (\s :: DescribeLineageGroup
s@DescribeLineageGroup' {} Text
a -> DescribeLineageGroup
s {$sel:lineageGroupName:DescribeLineageGroup' :: Text
lineageGroupName = Text
a} :: DescribeLineageGroup)
instance Core.AWSRequest DescribeLineageGroup where
type
AWSResponse DescribeLineageGroup =
DescribeLineageGroupResponse
request :: (Service -> Service)
-> DescribeLineageGroup -> Request DescribeLineageGroup
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 DescribeLineageGroup
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeLineageGroup)))
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 UserContext
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe UserContext
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Int
-> DescribeLineageGroupResponse
DescribeLineageGroupResponse'
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
"CreatedBy")
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
"CreationTime")
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
"Description")
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
"DisplayName")
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
"LastModifiedBy")
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
"LastModifiedTime")
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
"LineageGroupArn")
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
"LineageGroupName")
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 DescribeLineageGroup where
hashWithSalt :: Int -> DescribeLineageGroup -> Int
hashWithSalt Int
_salt DescribeLineageGroup' {Text
lineageGroupName :: Text
$sel:lineageGroupName:DescribeLineageGroup' :: DescribeLineageGroup -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
lineageGroupName
instance Prelude.NFData DescribeLineageGroup where
rnf :: DescribeLineageGroup -> ()
rnf DescribeLineageGroup' {Text
lineageGroupName :: Text
$sel:lineageGroupName:DescribeLineageGroup' :: DescribeLineageGroup -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
lineageGroupName
instance Data.ToHeaders DescribeLineageGroup where
toHeaders :: DescribeLineageGroup -> 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.DescribeLineageGroup" ::
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 DescribeLineageGroup where
toJSON :: DescribeLineageGroup -> Value
toJSON DescribeLineageGroup' {Text
lineageGroupName :: Text
$sel:lineageGroupName:DescribeLineageGroup' :: DescribeLineageGroup -> Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ forall a. a -> Maybe a
Prelude.Just
(Key
"LineageGroupName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
lineageGroupName)
]
)
instance Data.ToPath DescribeLineageGroup where
toPath :: DescribeLineageGroup -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeLineageGroup where
toQuery :: DescribeLineageGroup -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeLineageGroupResponse = DescribeLineageGroupResponse'
{ DescribeLineageGroupResponse -> Maybe UserContext
createdBy :: Prelude.Maybe UserContext,
DescribeLineageGroupResponse -> Maybe POSIX
creationTime :: Prelude.Maybe Data.POSIX,
DescribeLineageGroupResponse -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
DescribeLineageGroupResponse -> Maybe Text
displayName :: Prelude.Maybe Prelude.Text,
DescribeLineageGroupResponse -> Maybe UserContext
lastModifiedBy :: Prelude.Maybe UserContext,
DescribeLineageGroupResponse -> Maybe POSIX
lastModifiedTime :: Prelude.Maybe Data.POSIX,
DescribeLineageGroupResponse -> Maybe Text
lineageGroupArn :: Prelude.Maybe Prelude.Text,
DescribeLineageGroupResponse -> Maybe Text
lineageGroupName :: Prelude.Maybe Prelude.Text,
DescribeLineageGroupResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeLineageGroupResponse
-> DescribeLineageGroupResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeLineageGroupResponse
-> DescribeLineageGroupResponse -> Bool
$c/= :: DescribeLineageGroupResponse
-> DescribeLineageGroupResponse -> Bool
== :: DescribeLineageGroupResponse
-> DescribeLineageGroupResponse -> Bool
$c== :: DescribeLineageGroupResponse
-> DescribeLineageGroupResponse -> Bool
Prelude.Eq, ReadPrec [DescribeLineageGroupResponse]
ReadPrec DescribeLineageGroupResponse
Int -> ReadS DescribeLineageGroupResponse
ReadS [DescribeLineageGroupResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeLineageGroupResponse]
$creadListPrec :: ReadPrec [DescribeLineageGroupResponse]
readPrec :: ReadPrec DescribeLineageGroupResponse
$creadPrec :: ReadPrec DescribeLineageGroupResponse
readList :: ReadS [DescribeLineageGroupResponse]
$creadList :: ReadS [DescribeLineageGroupResponse]
readsPrec :: Int -> ReadS DescribeLineageGroupResponse
$creadsPrec :: Int -> ReadS DescribeLineageGroupResponse
Prelude.Read, Int -> DescribeLineageGroupResponse -> ShowS
[DescribeLineageGroupResponse] -> ShowS
DescribeLineageGroupResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeLineageGroupResponse] -> ShowS
$cshowList :: [DescribeLineageGroupResponse] -> ShowS
show :: DescribeLineageGroupResponse -> String
$cshow :: DescribeLineageGroupResponse -> String
showsPrec :: Int -> DescribeLineageGroupResponse -> ShowS
$cshowsPrec :: Int -> DescribeLineageGroupResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeLineageGroupResponse x -> DescribeLineageGroupResponse
forall x.
DescribeLineageGroupResponse -> Rep DescribeLineageGroupResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeLineageGroupResponse x -> DescribeLineageGroupResponse
$cfrom :: forall x.
DescribeLineageGroupResponse -> Rep DescribeLineageGroupResponse x
Prelude.Generic)
newDescribeLineageGroupResponse ::
Prelude.Int ->
DescribeLineageGroupResponse
newDescribeLineageGroupResponse :: Int -> DescribeLineageGroupResponse
newDescribeLineageGroupResponse Int
pHttpStatus_ =
DescribeLineageGroupResponse'
{ $sel:createdBy:DescribeLineageGroupResponse' :: Maybe UserContext
createdBy =
forall a. Maybe a
Prelude.Nothing,
$sel:creationTime:DescribeLineageGroupResponse' :: Maybe POSIX
creationTime = forall a. Maybe a
Prelude.Nothing,
$sel:description:DescribeLineageGroupResponse' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:displayName:DescribeLineageGroupResponse' :: Maybe Text
displayName = forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedBy:DescribeLineageGroupResponse' :: Maybe UserContext
lastModifiedBy = forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedTime:DescribeLineageGroupResponse' :: Maybe POSIX
lastModifiedTime = forall a. Maybe a
Prelude.Nothing,
$sel:lineageGroupArn:DescribeLineageGroupResponse' :: Maybe Text
lineageGroupArn = forall a. Maybe a
Prelude.Nothing,
$sel:lineageGroupName:DescribeLineageGroupResponse' :: Maybe Text
lineageGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeLineageGroupResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeLineageGroupResponse_createdBy :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe UserContext)
describeLineageGroupResponse_createdBy :: Lens' DescribeLineageGroupResponse (Maybe UserContext)
describeLineageGroupResponse_createdBy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe UserContext
createdBy :: Maybe UserContext
$sel:createdBy:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe UserContext
createdBy} -> Maybe UserContext
createdBy) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe UserContext
a -> DescribeLineageGroupResponse
s {$sel:createdBy:DescribeLineageGroupResponse' :: Maybe UserContext
createdBy = Maybe UserContext
a} :: DescribeLineageGroupResponse)
describeLineageGroupResponse_creationTime :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe Prelude.UTCTime)
describeLineageGroupResponse_creationTime :: Lens' DescribeLineageGroupResponse (Maybe UTCTime)
describeLineageGroupResponse_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe POSIX
creationTime :: Maybe POSIX
$sel:creationTime:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe POSIX
creationTime} -> Maybe POSIX
creationTime) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe POSIX
a -> DescribeLineageGroupResponse
s {$sel:creationTime:DescribeLineageGroupResponse' :: Maybe POSIX
creationTime = Maybe POSIX
a} :: DescribeLineageGroupResponse) 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 (a :: Format). Iso' (Time a) UTCTime
Data._Time
describeLineageGroupResponse_description :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe Prelude.Text)
describeLineageGroupResponse_description :: Lens' DescribeLineageGroupResponse (Maybe Text)
describeLineageGroupResponse_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe Text
description :: Maybe Text
$sel:description:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
description} -> Maybe Text
description) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe Text
a -> DescribeLineageGroupResponse
s {$sel:description:DescribeLineageGroupResponse' :: Maybe Text
description = Maybe Text
a} :: DescribeLineageGroupResponse)
describeLineageGroupResponse_displayName :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe Prelude.Text)
describeLineageGroupResponse_displayName :: Lens' DescribeLineageGroupResponse (Maybe Text)
describeLineageGroupResponse_displayName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe Text
displayName :: Maybe Text
$sel:displayName:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
displayName} -> Maybe Text
displayName) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe Text
a -> DescribeLineageGroupResponse
s {$sel:displayName:DescribeLineageGroupResponse' :: Maybe Text
displayName = Maybe Text
a} :: DescribeLineageGroupResponse)
describeLineageGroupResponse_lastModifiedBy :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe UserContext)
describeLineageGroupResponse_lastModifiedBy :: Lens' DescribeLineageGroupResponse (Maybe UserContext)
describeLineageGroupResponse_lastModifiedBy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe UserContext
lastModifiedBy :: Maybe UserContext
$sel:lastModifiedBy:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe UserContext
lastModifiedBy} -> Maybe UserContext
lastModifiedBy) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe UserContext
a -> DescribeLineageGroupResponse
s {$sel:lastModifiedBy:DescribeLineageGroupResponse' :: Maybe UserContext
lastModifiedBy = Maybe UserContext
a} :: DescribeLineageGroupResponse)
describeLineageGroupResponse_lastModifiedTime :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe Prelude.UTCTime)
describeLineageGroupResponse_lastModifiedTime :: Lens' DescribeLineageGroupResponse (Maybe UTCTime)
describeLineageGroupResponse_lastModifiedTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe POSIX
lastModifiedTime :: Maybe POSIX
$sel:lastModifiedTime:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe POSIX
lastModifiedTime} -> Maybe POSIX
lastModifiedTime) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe POSIX
a -> DescribeLineageGroupResponse
s {$sel:lastModifiedTime:DescribeLineageGroupResponse' :: Maybe POSIX
lastModifiedTime = Maybe POSIX
a} :: DescribeLineageGroupResponse) 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 (a :: Format). Iso' (Time a) UTCTime
Data._Time
describeLineageGroupResponse_lineageGroupArn :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe Prelude.Text)
describeLineageGroupResponse_lineageGroupArn :: Lens' DescribeLineageGroupResponse (Maybe Text)
describeLineageGroupResponse_lineageGroupArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe Text
lineageGroupArn :: Maybe Text
$sel:lineageGroupArn:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
lineageGroupArn} -> Maybe Text
lineageGroupArn) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe Text
a -> DescribeLineageGroupResponse
s {$sel:lineageGroupArn:DescribeLineageGroupResponse' :: Maybe Text
lineageGroupArn = Maybe Text
a} :: DescribeLineageGroupResponse)
describeLineageGroupResponse_lineageGroupName :: Lens.Lens' DescribeLineageGroupResponse (Prelude.Maybe Prelude.Text)
describeLineageGroupResponse_lineageGroupName :: Lens' DescribeLineageGroupResponse (Maybe Text)
describeLineageGroupResponse_lineageGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Maybe Text
lineageGroupName :: Maybe Text
$sel:lineageGroupName:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
lineageGroupName} -> Maybe Text
lineageGroupName) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Maybe Text
a -> DescribeLineageGroupResponse
s {$sel:lineageGroupName:DescribeLineageGroupResponse' :: Maybe Text
lineageGroupName = Maybe Text
a} :: DescribeLineageGroupResponse)
describeLineageGroupResponse_httpStatus :: Lens.Lens' DescribeLineageGroupResponse Prelude.Int
describeLineageGroupResponse_httpStatus :: Lens' DescribeLineageGroupResponse Int
describeLineageGroupResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeLineageGroupResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeLineageGroupResponse
s@DescribeLineageGroupResponse' {} Int
a -> DescribeLineageGroupResponse
s {$sel:httpStatus:DescribeLineageGroupResponse' :: Int
httpStatus = Int
a} :: DescribeLineageGroupResponse)
instance Prelude.NFData DescribeLineageGroupResponse where
rnf :: DescribeLineageGroupResponse -> ()
rnf DescribeLineageGroupResponse' {Int
Maybe Text
Maybe POSIX
Maybe UserContext
httpStatus :: Int
lineageGroupName :: Maybe Text
lineageGroupArn :: Maybe Text
lastModifiedTime :: Maybe POSIX
lastModifiedBy :: Maybe UserContext
displayName :: Maybe Text
description :: Maybe Text
creationTime :: Maybe POSIX
createdBy :: Maybe UserContext
$sel:httpStatus:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Int
$sel:lineageGroupName:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
$sel:lineageGroupArn:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
$sel:lastModifiedTime:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe POSIX
$sel:lastModifiedBy:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe UserContext
$sel:displayName:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
$sel:description:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe Text
$sel:creationTime:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe POSIX
$sel:createdBy:DescribeLineageGroupResponse' :: DescribeLineageGroupResponse -> Maybe UserContext
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe UserContext
createdBy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
creationTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
displayName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe UserContext
lastModifiedBy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastModifiedTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
lineageGroupArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
lineageGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus