{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Omics.Types.ReadSetListItem where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Omics.Types.FileType
import Amazonka.Omics.Types.ReadSetStatus
import Amazonka.Omics.Types.SequenceInformation
import qualified Amazonka.Prelude as Prelude
data ReadSetListItem = ReadSetListItem'
{
ReadSetListItem -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
ReadSetListItem -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
ReadSetListItem -> Maybe Text
referenceArn :: Prelude.Maybe Prelude.Text,
ReadSetListItem -> Maybe Text
sampleId :: Prelude.Maybe Prelude.Text,
ReadSetListItem -> Maybe SequenceInformation
sequenceInformation :: Prelude.Maybe SequenceInformation,
ReadSetListItem -> Maybe Text
subjectId :: Prelude.Maybe Prelude.Text,
ReadSetListItem -> Text
arn :: Prelude.Text,
ReadSetListItem -> ISO8601
creationTime :: Data.ISO8601,
ReadSetListItem -> FileType
fileType :: FileType,
ReadSetListItem -> Text
id :: Prelude.Text,
ReadSetListItem -> Text
sequenceStoreId :: Prelude.Text,
ReadSetListItem -> ReadSetStatus
status :: ReadSetStatus
}
deriving (ReadSetListItem -> ReadSetListItem -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ReadSetListItem -> ReadSetListItem -> Bool
$c/= :: ReadSetListItem -> ReadSetListItem -> Bool
== :: ReadSetListItem -> ReadSetListItem -> Bool
$c== :: ReadSetListItem -> ReadSetListItem -> Bool
Prelude.Eq, ReadPrec [ReadSetListItem]
ReadPrec ReadSetListItem
Int -> ReadS ReadSetListItem
ReadS [ReadSetListItem]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ReadSetListItem]
$creadListPrec :: ReadPrec [ReadSetListItem]
readPrec :: ReadPrec ReadSetListItem
$creadPrec :: ReadPrec ReadSetListItem
readList :: ReadS [ReadSetListItem]
$creadList :: ReadS [ReadSetListItem]
readsPrec :: Int -> ReadS ReadSetListItem
$creadsPrec :: Int -> ReadS ReadSetListItem
Prelude.Read, Int -> ReadSetListItem -> ShowS
[ReadSetListItem] -> ShowS
ReadSetListItem -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ReadSetListItem] -> ShowS
$cshowList :: [ReadSetListItem] -> ShowS
show :: ReadSetListItem -> String
$cshow :: ReadSetListItem -> String
showsPrec :: Int -> ReadSetListItem -> ShowS
$cshowsPrec :: Int -> ReadSetListItem -> ShowS
Prelude.Show, forall x. Rep ReadSetListItem x -> ReadSetListItem
forall x. ReadSetListItem -> Rep ReadSetListItem x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ReadSetListItem x -> ReadSetListItem
$cfrom :: forall x. ReadSetListItem -> Rep ReadSetListItem x
Prelude.Generic)
newReadSetListItem ::
Prelude.Text ->
Prelude.UTCTime ->
FileType ->
Prelude.Text ->
Prelude.Text ->
ReadSetStatus ->
ReadSetListItem
newReadSetListItem :: Text
-> UTCTime
-> FileType
-> Text
-> Text
-> ReadSetStatus
-> ReadSetListItem
newReadSetListItem
Text
pArn_
UTCTime
pCreationTime_
FileType
pFileType_
Text
pId_
Text
pSequenceStoreId_
ReadSetStatus
pStatus_ =
ReadSetListItem'
{ $sel:description:ReadSetListItem' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:name:ReadSetListItem' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:referenceArn:ReadSetListItem' :: Maybe Text
referenceArn = forall a. Maybe a
Prelude.Nothing,
$sel:sampleId:ReadSetListItem' :: Maybe Text
sampleId = forall a. Maybe a
Prelude.Nothing,
$sel:sequenceInformation:ReadSetListItem' :: Maybe SequenceInformation
sequenceInformation = forall a. Maybe a
Prelude.Nothing,
$sel:subjectId:ReadSetListItem' :: Maybe Text
subjectId = forall a. Maybe a
Prelude.Nothing,
$sel:arn:ReadSetListItem' :: Text
arn = Text
pArn_,
$sel:creationTime:ReadSetListItem' :: ISO8601
creationTime = forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pCreationTime_,
$sel:fileType:ReadSetListItem' :: FileType
fileType = FileType
pFileType_,
$sel:id:ReadSetListItem' :: Text
id = Text
pId_,
$sel:sequenceStoreId:ReadSetListItem' :: Text
sequenceStoreId = Text
pSequenceStoreId_,
$sel:status:ReadSetListItem' :: ReadSetStatus
status = ReadSetStatus
pStatus_
}
readSetListItem_description :: Lens.Lens' ReadSetListItem (Prelude.Maybe Prelude.Text)
readSetListItem_description :: Lens' ReadSetListItem (Maybe Text)
readSetListItem_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Maybe Text
description :: Maybe Text
$sel:description:ReadSetListItem' :: ReadSetListItem -> Maybe Text
description} -> Maybe Text
description) (\s :: ReadSetListItem
s@ReadSetListItem' {} Maybe Text
a -> ReadSetListItem
s {$sel:description:ReadSetListItem' :: Maybe Text
description = Maybe Text
a} :: ReadSetListItem)
readSetListItem_name :: Lens.Lens' ReadSetListItem (Prelude.Maybe Prelude.Text)
readSetListItem_name :: Lens' ReadSetListItem (Maybe Text)
readSetListItem_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Maybe Text
name :: Maybe Text
$sel:name:ReadSetListItem' :: ReadSetListItem -> Maybe Text
name} -> Maybe Text
name) (\s :: ReadSetListItem
s@ReadSetListItem' {} Maybe Text
a -> ReadSetListItem
s {$sel:name:ReadSetListItem' :: Maybe Text
name = Maybe Text
a} :: ReadSetListItem)
readSetListItem_referenceArn :: Lens.Lens' ReadSetListItem (Prelude.Maybe Prelude.Text)
readSetListItem_referenceArn :: Lens' ReadSetListItem (Maybe Text)
readSetListItem_referenceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Maybe Text
referenceArn :: Maybe Text
$sel:referenceArn:ReadSetListItem' :: ReadSetListItem -> Maybe Text
referenceArn} -> Maybe Text
referenceArn) (\s :: ReadSetListItem
s@ReadSetListItem' {} Maybe Text
a -> ReadSetListItem
s {$sel:referenceArn:ReadSetListItem' :: Maybe Text
referenceArn = Maybe Text
a} :: ReadSetListItem)
readSetListItem_sampleId :: Lens.Lens' ReadSetListItem (Prelude.Maybe Prelude.Text)
readSetListItem_sampleId :: Lens' ReadSetListItem (Maybe Text)
readSetListItem_sampleId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Maybe Text
sampleId :: Maybe Text
$sel:sampleId:ReadSetListItem' :: ReadSetListItem -> Maybe Text
sampleId} -> Maybe Text
sampleId) (\s :: ReadSetListItem
s@ReadSetListItem' {} Maybe Text
a -> ReadSetListItem
s {$sel:sampleId:ReadSetListItem' :: Maybe Text
sampleId = Maybe Text
a} :: ReadSetListItem)
readSetListItem_sequenceInformation :: Lens.Lens' ReadSetListItem (Prelude.Maybe SequenceInformation)
readSetListItem_sequenceInformation :: Lens' ReadSetListItem (Maybe SequenceInformation)
readSetListItem_sequenceInformation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Maybe SequenceInformation
sequenceInformation :: Maybe SequenceInformation
$sel:sequenceInformation:ReadSetListItem' :: ReadSetListItem -> Maybe SequenceInformation
sequenceInformation} -> Maybe SequenceInformation
sequenceInformation) (\s :: ReadSetListItem
s@ReadSetListItem' {} Maybe SequenceInformation
a -> ReadSetListItem
s {$sel:sequenceInformation:ReadSetListItem' :: Maybe SequenceInformation
sequenceInformation = Maybe SequenceInformation
a} :: ReadSetListItem)
readSetListItem_subjectId :: Lens.Lens' ReadSetListItem (Prelude.Maybe Prelude.Text)
readSetListItem_subjectId :: Lens' ReadSetListItem (Maybe Text)
readSetListItem_subjectId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Maybe Text
subjectId :: Maybe Text
$sel:subjectId:ReadSetListItem' :: ReadSetListItem -> Maybe Text
subjectId} -> Maybe Text
subjectId) (\s :: ReadSetListItem
s@ReadSetListItem' {} Maybe Text
a -> ReadSetListItem
s {$sel:subjectId:ReadSetListItem' :: Maybe Text
subjectId = Maybe Text
a} :: ReadSetListItem)
readSetListItem_arn :: Lens.Lens' ReadSetListItem Prelude.Text
readSetListItem_arn :: Lens' ReadSetListItem Text
readSetListItem_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Text
arn :: Text
$sel:arn:ReadSetListItem' :: ReadSetListItem -> Text
arn} -> Text
arn) (\s :: ReadSetListItem
s@ReadSetListItem' {} Text
a -> ReadSetListItem
s {$sel:arn:ReadSetListItem' :: Text
arn = Text
a} :: ReadSetListItem)
readSetListItem_creationTime :: Lens.Lens' ReadSetListItem Prelude.UTCTime
readSetListItem_creationTime :: Lens' ReadSetListItem UTCTime
readSetListItem_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {ISO8601
creationTime :: ISO8601
$sel:creationTime:ReadSetListItem' :: ReadSetListItem -> ISO8601
creationTime} -> ISO8601
creationTime) (\s :: ReadSetListItem
s@ReadSetListItem' {} ISO8601
a -> ReadSetListItem
s {$sel:creationTime:ReadSetListItem' :: ISO8601
creationTime = ISO8601
a} :: ReadSetListItem) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
readSetListItem_fileType :: Lens.Lens' ReadSetListItem FileType
readSetListItem_fileType :: Lens' ReadSetListItem FileType
readSetListItem_fileType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {FileType
fileType :: FileType
$sel:fileType:ReadSetListItem' :: ReadSetListItem -> FileType
fileType} -> FileType
fileType) (\s :: ReadSetListItem
s@ReadSetListItem' {} FileType
a -> ReadSetListItem
s {$sel:fileType:ReadSetListItem' :: FileType
fileType = FileType
a} :: ReadSetListItem)
readSetListItem_id :: Lens.Lens' ReadSetListItem Prelude.Text
readSetListItem_id :: Lens' ReadSetListItem Text
readSetListItem_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Text
id :: Text
$sel:id:ReadSetListItem' :: ReadSetListItem -> Text
id} -> Text
id) (\s :: ReadSetListItem
s@ReadSetListItem' {} Text
a -> ReadSetListItem
s {$sel:id:ReadSetListItem' :: Text
id = Text
a} :: ReadSetListItem)
readSetListItem_sequenceStoreId :: Lens.Lens' ReadSetListItem Prelude.Text
readSetListItem_sequenceStoreId :: Lens' ReadSetListItem Text
readSetListItem_sequenceStoreId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {Text
sequenceStoreId :: Text
$sel:sequenceStoreId:ReadSetListItem' :: ReadSetListItem -> Text
sequenceStoreId} -> Text
sequenceStoreId) (\s :: ReadSetListItem
s@ReadSetListItem' {} Text
a -> ReadSetListItem
s {$sel:sequenceStoreId:ReadSetListItem' :: Text
sequenceStoreId = Text
a} :: ReadSetListItem)
readSetListItem_status :: Lens.Lens' ReadSetListItem ReadSetStatus
readSetListItem_status :: Lens' ReadSetListItem ReadSetStatus
readSetListItem_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReadSetListItem' {ReadSetStatus
status :: ReadSetStatus
$sel:status:ReadSetListItem' :: ReadSetListItem -> ReadSetStatus
status} -> ReadSetStatus
status) (\s :: ReadSetListItem
s@ReadSetListItem' {} ReadSetStatus
a -> ReadSetListItem
s {$sel:status:ReadSetListItem' :: ReadSetStatus
status = ReadSetStatus
a} :: ReadSetListItem)
instance Data.FromJSON ReadSetListItem where
parseJSON :: Value -> Parser ReadSetListItem
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"ReadSetListItem"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe SequenceInformation
-> Maybe Text
-> Text
-> ISO8601
-> FileType
-> Text
-> Text
-> ReadSetStatus
-> ReadSetListItem
ReadSetListItem'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (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 -> Parser (Maybe a)
Data..:? Key
"name")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"referenceArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"sampleId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"sequenceInformation")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"subjectId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"arn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser 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 -> Parser a
Data..: Key
"fileType")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"id")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"sequenceStoreId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"status")
)
instance Prelude.Hashable ReadSetListItem where
hashWithSalt :: Int -> ReadSetListItem -> Int
hashWithSalt Int
_salt ReadSetListItem' {Maybe Text
Maybe SequenceInformation
Text
ISO8601
FileType
ReadSetStatus
status :: ReadSetStatus
sequenceStoreId :: Text
id :: Text
fileType :: FileType
creationTime :: ISO8601
arn :: Text
subjectId :: Maybe Text
sequenceInformation :: Maybe SequenceInformation
sampleId :: Maybe Text
referenceArn :: Maybe Text
name :: Maybe Text
description :: Maybe Text
$sel:status:ReadSetListItem' :: ReadSetListItem -> ReadSetStatus
$sel:sequenceStoreId:ReadSetListItem' :: ReadSetListItem -> Text
$sel:id:ReadSetListItem' :: ReadSetListItem -> Text
$sel:fileType:ReadSetListItem' :: ReadSetListItem -> FileType
$sel:creationTime:ReadSetListItem' :: ReadSetListItem -> ISO8601
$sel:arn:ReadSetListItem' :: ReadSetListItem -> Text
$sel:subjectId:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:sequenceInformation:ReadSetListItem' :: ReadSetListItem -> Maybe SequenceInformation
$sel:sampleId:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:referenceArn:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:name:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:description:ReadSetListItem' :: ReadSetListItem -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
name
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
referenceArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
sampleId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SequenceInformation
sequenceInformation
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
subjectId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
arn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ISO8601
creationTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` FileType
fileType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
id
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
sequenceStoreId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ReadSetStatus
status
instance Prelude.NFData ReadSetListItem where
rnf :: ReadSetListItem -> ()
rnf ReadSetListItem' {Maybe Text
Maybe SequenceInformation
Text
ISO8601
FileType
ReadSetStatus
status :: ReadSetStatus
sequenceStoreId :: Text
id :: Text
fileType :: FileType
creationTime :: ISO8601
arn :: Text
subjectId :: Maybe Text
sequenceInformation :: Maybe SequenceInformation
sampleId :: Maybe Text
referenceArn :: Maybe Text
name :: Maybe Text
description :: Maybe Text
$sel:status:ReadSetListItem' :: ReadSetListItem -> ReadSetStatus
$sel:sequenceStoreId:ReadSetListItem' :: ReadSetListItem -> Text
$sel:id:ReadSetListItem' :: ReadSetListItem -> Text
$sel:fileType:ReadSetListItem' :: ReadSetListItem -> FileType
$sel:creationTime:ReadSetListItem' :: ReadSetListItem -> ISO8601
$sel:arn:ReadSetListItem' :: ReadSetListItem -> Text
$sel:subjectId:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:sequenceInformation:ReadSetListItem' :: ReadSetListItem -> Maybe SequenceInformation
$sel:sampleId:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:referenceArn:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:name:ReadSetListItem' :: ReadSetListItem -> Maybe Text
$sel:description:ReadSetListItem' :: ReadSetListItem -> Maybe Text
..} =
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
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
referenceArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
sampleId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SequenceInformation
sequenceInformation
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
subjectId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
arn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ISO8601
creationTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf FileType
fileType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
id
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
sequenceStoreId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ReadSetStatus
status