@@ -20,112 +20,8 @@ module Network.Google.Genomics.Types.Product where
20import Network.Google.Genomics.Types.Sum
20import Network.Google.Genomics.Types.Sum
21import Network.Google.Prelude
21import Network.Google.Prelude
23−--
23+-- | A map of additional read alignment information. This must be of the form
24−-- /See:/ 'fastqMetadata' smart constructor.
24+-- map (string key mapping to a list of string values).
25−data FastqMetadata = FastqMetadata
26− { _fmPlatformUnit :: !(Maybe Text)
27− , _fmReadGroupName :: !(Maybe Text)
28− , _fmLibraryName :: !(Maybe Text)
29− , _fmPlatformName :: !(Maybe Text)
30− , _fmSampleName :: !(Maybe Text)
31− } deriving (Eq,Show,Data,Typeable,Generic)
33−-- | Creates a value of 'FastqMetadata' with the minimum fields required to make a request.
35−-- Use one of the following lenses to modify other fields as desired:
39−-- * 'fmReadGroupName'
50− { _fmPlatformUnit = Nothing
51− , _fmReadGroupName = Nothing
52− , _fmLibraryName = Nothing
53− , _fmPlatformName = Nothing
54− , _fmSampleName = Nothing
57−-- | Optionally specifies the platform unit for alignment from FASTQ. For
58−-- example: flowcell-barcode.lane for Illumina or slide for SOLID.
59−fmPlatformUnit :: Lens' FastqMetadata (Maybe Text)
61− = lens _fmPlatformUnit
62− (\ s a -> s{_fmPlatformUnit = a})
64−-- | Optionally specifies the read group name for alignment from FASTQ.
65−fmReadGroupName :: Lens' FastqMetadata (Maybe Text)
67− = lens _fmReadGroupName
68− (\ s a -> s{_fmReadGroupName = a})
70−-- | Optionally specifies the library name for alignment from FASTQ.
71−fmLibraryName :: Lens' FastqMetadata (Maybe Text)
73− = lens _fmLibraryName
74− (\ s a -> s{_fmLibraryName = a})
76−-- | Optionally specifies the platform name for alignment from FASTQ. For
77−-- example: CAPILLARY, LS454, ILLUMINA, SOLID, HELICOS, IONTORRENT, PACBIO.
78−fmPlatformName :: Lens' FastqMetadata (Maybe Text)
80− = lens _fmPlatformName
81− (\ s a -> s{_fmPlatformName = a})
83−-- | Optionally specifies the sample name for alignment from FASTQ.
84−fmSampleName :: Lens' FastqMetadata (Maybe Text)
86− = lens _fmSampleName (\ s a -> s{_fmSampleName = a})
88−instance FromJSON FastqMetadata where
90− = withObject "FastqMetadata"
93− (o .:? "platformUnit") <*> (o .:? "readGroupName")
94− <*> (o .:? "libraryName")
95− <*> (o .:? "platformName")
96− <*> (o .:? "sampleName"))
98−instance ToJSON FastqMetadata where
99− toJSON FastqMetadata{..}
102− [("platformUnit" .=) <$> _fmPlatformUnit,
103− ("readGroupName" .=) <$> _fmReadGroupName,
104− ("libraryName" .=) <$> _fmLibraryName,
105− ("platformName" .=) <$> _fmPlatformName,
106− ("sampleName" .=) <$> _fmSampleName])
108−-- | A string which maps to an array of values.
110−-- /See:/ 'callInfo' smart constructor.
113− deriving (Eq,Show,Data,Typeable,Generic)
115−-- | Creates a value of 'CallInfo' with the minimum fields required to make a request.
121−instance FromJSON CallInfo where
123− = withObject "CallInfo" (\ o -> pure CallInfo)
125−instance ToJSON CallInfo where
126− toJSON = const emptyObject
128−-- | A string which maps to an array of values.
130-- /See:/ 'readInfo' smart constructor.
26-- /See:/ 'readInfo' smart constructor.
131data ReadInfo =
27data ReadInfo =
@@ -145,127 +41,122 @@ instance FromJSON ReadInfo where
145instance ToJSON ReadInfo where
41instance ToJSON ReadInfo where
146 toJSON = const emptyObject
42 toJSON = const emptyObject
148−--
44+-- | The \`Status\` type defines a logical error model that is suitable for
45+-- different programming environments, including REST APIs and RPC APIs. It
46+-- is used by [gRPC](https:\/\/github.com\/grpc). The error model is
47+-- designed to be: - Simple to use and understand for most users - Flexible
48+-- enough to meet unexpected needs # Overview The \`Status\` message
49+-- contains three pieces of data: error code, error message, and error
50+-- details. The error code should be an enum value of google.rpc.Code, but
51+-- it may accept additional error codes if needed. The error message should
52+-- be a developer-facing English message that helps developers *understand*
53+-- and *resolve* the error. If a localized user-facing error message is
54+-- needed, put the localized message in the error details or localize it in
55+-- the client. The optional error details may contain arbitrary information
56+-- about the error. There is a predefined set of error detail types in the
57+-- package \`google.rpc\` which can be used for common error conditions. #
58+-- Language mapping The \`Status\` message is the logical representation of
59+-- the error model, but it is not necessarily the actual wire format. When
60+-- the \`Status\` message is exposed in different client libraries and
61+-- different wire protocols, it can be mapped differently. For example, it
62+-- will likely be mapped to some exceptions in Java, but more likely mapped
63+-- to some error codes in C. # Other uses The error model and the
64+-- \`Status\` message can be used in a variety of environments, either with
65+-- or without APIs, to provide a consistent developer experience across
66+-- different environments. Example uses of this error model include: -
67+-- Partial errors. If a service needs to return partial errors to the
68+-- client, it may embed the \`Status\` in the normal response to indicate
69+-- the partial errors. - Workflow errors. A typical workflow has multiple
70+-- steps. Each step may have a \`Status\` message for error reporting
71+-- purpose. - Batch operations. If a client uses batch request and batch
72+-- response, the \`Status\` message should be used directly inside batch
73+-- response, one for each error sub-response. - Asynchronous operations. If
74+-- an API call embeds asynchronous operation results in its response, the
75+-- status of those operations should be represented directly using the
76+-- \`Status\` message. - Logging. If some API errors are stored in logs,
77+-- the message \`Status\` could be used directly after any stripping needed
78+-- for security\/privacy reasons.
149−-- /See:/ 'readGroupExperiment' smart constructor.
80+-- /See:/ 'status' smart constructor.
150−data ReadGroupExperiment = ReadGroupExperiment
81+data Status = Status
151− { _rgeInstrumentModel :: !(Maybe Text)
82+ { _sDetails :: !(Maybe [StatusDetailsItem])
152− , _rgePlatformUnit :: !(Maybe Text)
83+ , _sCode :: !(Maybe Int32)
153− , _rgeSequencingCenter :: !(Maybe Text)
154− , _rgeLibraryId :: !(Maybe Text)
84+ , _sMessage :: !(Maybe Text)
155 } deriving (Eq,Show,Data,Typeable,Generic)
85 } deriving (Eq,Show,Data,Typeable,Generic)
157−-- | Creates a value of 'ReadGroupExperiment' with the minimum fields required to make a request.
87+-- | Creates a value of 'Status' with the minimum fields required to make a request.
159-- Use one of the following lenses to modify other fields as desired:
89-- Use one of the following lenses to modify other fields as desired:
161−-- * 'rgeInstrumentModel'
91+-- * 'sDetails'
163−-- * 'rgePlatformUnit'
165−-- * 'rgeSequencingCenter'
93+-- * 'sCode'
167−-- * 'rgeLibraryId'
95+-- * 'sMessage'
168−readGroupExperiment
96+status
169− :: ReadGroupExperiment
97+ :: Status
170−readGroupExperiment =
98+status =
171− ReadGroupExperiment
99+ Status
172− { _rgeInstrumentModel = Nothing
100+ { _sDetails = Nothing
173− , _rgePlatformUnit = Nothing
101+ , _sCode = Nothing
174− , _rgeSequencingCenter = Nothing
102+ , _sMessage = Nothing
175− , _rgeLibraryId = Nothing
178−-- | The instrument model used as part of this experiment. This maps to
105+-- | A list of messages that carry the error details. There will be a common
179−-- sequencing technology in BAM.
106+-- set of message types for APIs to use.
180−rgeInstrumentModel :: Lens' ReadGroupExperiment (Maybe Text)
107+sDetails :: Lens' Status [StatusDetailsItem]
181−rgeInstrumentModel
108+sDetails
182− = lens _rgeInstrumentModel
109+ = lens _sDetails (\ s a -> s{_sDetails = a}) .
183− (\ s a -> s{_rgeInstrumentModel = a})
110+ _Default
185−-- | The platform unit used as part of this experiment e.g.
186−-- flowcell-barcode.lane for Illumina or slide for SOLiD. Corresponds to
188−rgePlatformUnit :: Lens' ReadGroupExperiment (Maybe Text)
190− = lens _rgePlatformUnit
191− (\ s a -> s{_rgePlatformUnit = a})
193−-- | The sequencing center used as part of this experiment.
113+-- | The status code, which should be an enum value of google.rpc.Code.
194−rgeSequencingCenter :: Lens' ReadGroupExperiment (Maybe Text)
114+sCode :: Lens' Status (Maybe Int32)
195−rgeSequencingCenter
115+sCode = lens _sCode (\ s a -> s{_sCode = a})
196− = lens _rgeSequencingCenter
197− (\ s a -> s{_rgeSequencingCenter = a})
199−-- | The library used as part of this experiment. Note: This is not an actual
117+-- | A developer-facing error message, which should be in English. Any
200−-- ID within this repository, but rather an identifier for a library which
118+-- user-facing error message should be localized and sent in the
201−-- may be meaningful to some external system.
119+-- google.rpc.Status.details field, or localized by the client.
202−rgeLibraryId :: Lens' ReadGroupExperiment (Maybe Text)
120+sMessage :: Lens' Status (Maybe Text)
203−rgeLibraryId
121+sMessage = lens _sMessage (\ s a -> s{_sMessage = a})
204− = lens _rgeLibraryId (\ s a -> s{_rgeLibraryId = a})
206−instance FromJSON ReadGroupExperiment where
123+instance FromJSON Status where
207 parseJSON
124 parseJSON
208− = withObject "ReadGroupExperiment"
125+ = withObject "Status"
210− ReadGroupExperiment <$>
127+ Status <$>
211− (o .:? "instrumentModel") <*> (o .:? "platformUnit")
128+ (o .:? "details" .!= mempty) <*> (o .:? "code") <*>
212− <*> (o .:? "sequencingCenter")
129+ (o .:? "message"))
213− <*> (o .:? "libraryId"))
215−instance ToJSON ReadGroupExperiment where
131+instance ToJSON Status where
216− toJSON ReadGroupExperiment{..}
132+ toJSON Status{..}
218 (catMaybes
134 (catMaybes
219− [("instrumentModel" .=) <$> _rgeInstrumentModel,
135+ [("details" .=) <$> _sDetails,
220− ("platformUnit" .=) <$> _rgePlatformUnit,
136+ ("code" .=) <$> _sCode,
221− ("sequencingCenter" .=) <$> _rgeSequencingCenter,
137+ ("message" .=) <$> _sMessage])
222− ("libraryId" .=) <$> _rgeLibraryId])
224−-- | Used to hold basic key value information.
139+-- | An OperationMetadata object. This will always be returned with the
226−-- /See:/ 'keyValue' smart constructor.
142+-- /See:/ 'operationSchema' smart constructor.
227−data KeyValue = KeyValue
143+data OperationSchema =
228− { _kvValue :: !(Maybe [Text])
144+ OperationSchema
229− , _kvKey :: !(Maybe Text)
230− } deriving (Eq,Show,Data,Typeable,Generic)
145+ deriving (Eq,Show,Data,Typeable,Generic)
232−-- | Creates a value of 'KeyValue' with the minimum fields required to make a request.
147+-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.
234−-- Use one of the following lenses to modify other fields as desired:
149+operationSchema
235−--
150+ :: OperationSchema
236−-- * 'kvValue'
151+operationSchema = OperationSchema
243− { _kvValue = Nothing
247−-- | The string values.
248−kvValue :: Lens' KeyValue [Text]
250− = lens _kvValue (\ s a -> s{_kvValue = a}) . _Default
253−-- | A string which maps to an array of values.
254−kvKey :: Lens' KeyValue (Maybe Text)
255−kvKey = lens _kvKey (\ s a -> s{_kvKey = a})
257−instance FromJSON KeyValue where
153+instance FromJSON OperationSchema where
258 parseJSON
154 parseJSON
259− = withObject "KeyValue"
155+ = withObject "OperationSchema"
260− (\ o ->
156+ (\ o -> pure OperationSchema)
262− (o .:? "value" .!= mempty) <*> (o .:? "key"))
264−instance ToJSON KeyValue where
158+instance ToJSON OperationSchema where
265− toJSON KeyValue{..}
159+ toJSON = const emptyObject
268− [("value" .=) <$> _kvValue, ("key" .=) <$> _kvKey])
270-- | A variant represents a change in DNA sequence relative to a reference
161-- | A variant represents a change in DNA sequence relative to a reference
271-- sequence. For example, a variant could represent a SNP or an insertion.
162-- sequence. For example, a variant could represent a SNP or an insertion.
@@ -289,7 +180,7 @@ data Variant = Variant
289 , _vQuality :: !(Maybe Double)
180 , _vQuality :: !(Maybe Double)
290 , _vFilter :: !(Maybe [Text])
181 , _vFilter :: !(Maybe [Text])
291 , _vInfo :: !(Maybe VariantInfo)
182 , _vInfo :: !(Maybe VariantInfo)
292− , _vCalls :: !(Maybe [Call])
183+ , _vCalls :: !(Maybe [VariantCall])
293 } deriving (Eq,Show,Data,Typeable,Generic)
184 } deriving (Eq,Show,Data,Typeable,Generic)
295-- | Creates a value of 'Variant' with the minimum fields required to make a request.
186-- | Creates a value of 'Variant' with the minimum fields required to make a request.
@@ -363,7 +254,7 @@ vAlternateBases
363 . _Default
254 . _Default
364 . _Coerce
255 . _Coerce
366−-- | The reference on which this variant occurs. (such as chr20 or X)
257+-- | The reference on which this variant occurs. (such as \`chr20\` or \`X\`)
367vReferenceName :: Lens' Variant (Maybe Text)
258vReferenceName :: Lens' Variant (Maybe Text)
368vReferenceName
259vReferenceName
369 = lens _vReferenceName
260 = lens _vReferenceName
@@ -389,7 +280,7 @@ vReferenceBases
389 = lens _vReferenceBases
280 = lens _vReferenceBases
390 (\ s a -> s{_vReferenceBases = a})
281 (\ s a -> s{_vReferenceBases = a})
392−-- | The Google generated ID of the variant, immutable.
283+-- | The server-generated variant ID, unique across all variants.
393vId :: Lens' Variant (Maybe Text)
284vId :: Lens' Variant (Maybe Text)
394vId = lens _vId (\ s a -> s{_vId = a})
285vId = lens _vId (\ s a -> s{_vId = a})
@@ -399,19 +290,20 @@ vQuality :: Lens' Variant (Maybe Double)
399vQuality = lens _vQuality (\ s a -> s{_vQuality = a})
290vQuality = lens _vQuality (\ s a -> s{_vQuality = a})
401-- | A list of filters (normally quality filters) this variant has failed.
292-- | A list of filters (normally quality filters) this variant has failed.
402−-- PASS indicates this variant has passed all filters.
293+-- \`PASS\` indicates this variant has passed all filters.
403vFilter :: Lens' Variant [Text]
294vFilter :: Lens' Variant [Text]
405 = lens _vFilter (\ s a -> s{_vFilter = a}) . _Default
296 = lens _vFilter (\ s a -> s{_vFilter = a}) . _Default
406 . _Coerce
297 . _Coerce
299+-- | A map of additional variant information. This must be of the form map
408−-- | A string which maps to an array of values.
300+-- (string key mapping to a list of string values).
409vInfo :: Lens' Variant (Maybe VariantInfo)
301vInfo :: Lens' Variant (Maybe VariantInfo)
410vInfo = lens _vInfo (\ s a -> s{_vInfo = a})
302vInfo = lens _vInfo (\ s a -> s{_vInfo = a})
412-- | The variant calls for this particular variant. Each one represents the
304-- | The variant calls for this particular variant. Each one represents the
413-- determination of genotype with respect to this variant.
305-- determination of genotype with respect to this variant.
414−vCalls :: Lens' Variant [Call]
306+vCalls :: Lens' Variant [VariantCall]
416 = lens _vCalls (\ s a -> s{_vCalls = a}) . _Default .
308 = lens _vCalls (\ s a -> s{_vCalls = a}) . _Default .
@@ -449,297 +341,6 @@ instance ToJSON Variant where
449 ("filter" .=) <$> _vFilter, ("info" .=) <$> _vInfo,
341 ("filter" .=) <$> _vFilter, ("info" .=) <$> _vInfo,
450 ("calls" .=) <$> _vCalls])
342 ("calls" .=) <$> _vCalls])
452−-- | An annotation describes a region of reference genome. The value of an
453−-- annotation may be one of several canonical types, supplemented by
454−-- arbitrary info tags. A variant annotation is represented by one or more
455−-- of these canonical types. An annotation is not inherently associated
456−-- with a specific sample or individual (though a client could choose to
457−-- use annotations in this way). Example canonical annotation types are
458−-- \'Gene\' and \'Variant\'.
460−-- /See:/ 'annotation' smart constructor.
461−data Annotation = Annotation
462− { _aVariant :: !(Maybe VariantAnnotation)
463− , _aAnnotationSetId :: !(Maybe Text)
464− , _aName :: !(Maybe Text)
465− , _aId :: !(Maybe Text)
466− , _aType :: !(Maybe AnnotationType)
467− , _aTranscript :: !(Maybe Transcript)
468− , _aInfo :: !(Maybe AnnotationInfo)
469− , _aPosition :: !(Maybe RangePosition)
470− } deriving (Eq,Show,Data,Typeable,Generic)
472−-- | Creates a value of 'Annotation' with the minimum fields required to make a request.
474−-- Use one of the following lenses to modify other fields as desired:
478−-- * 'aAnnotationSetId'
495− { _aVariant = Nothing
496− , _aAnnotationSetId = Nothing
500− , _aTranscript = Nothing
502− , _aPosition = Nothing
505−-- | A variant annotation, which describes the effect of a variant on the
506−-- genome, the coding sequence, and\/or higher level consequences at the
507−-- organism level e.g. pathogenicity. This field is only set for
508−-- annotations of type VARIANT.
509−aVariant :: Lens' Annotation (Maybe VariantAnnotation)
510−aVariant = lens _aVariant (\ s a -> s{_aVariant = a})
512−-- | The ID of the containing annotation set.
513−aAnnotationSetId :: Lens' Annotation (Maybe Text)
515− = lens _aAnnotationSetId
516− (\ s a -> s{_aAnnotationSetId = a})
518−-- | The display name of this annotation.
519−aName :: Lens' Annotation (Maybe Text)
520−aName = lens _aName (\ s a -> s{_aName = a})
522−-- | The generated unique ID for this annotation.
523−aId :: Lens' Annotation (Maybe Text)
524−aId = lens _aId (\ s a -> s{_aId = a})
526−-- | The data type for this annotation. Must match the containing annotation
528−aType :: Lens' Annotation (Maybe AnnotationType)
529−aType = lens _aType (\ s a -> s{_aType = a})
531−-- | A transcript value represents the assertion that a particular region of
532−-- the reference genome may be transcribed as RNA. An alternative splicing
533−-- pattern would be represented as a separate transcript object. This field
534−-- is only set for annotations of type TRANSCRIPT.
535−aTranscript :: Lens' Annotation (Maybe Transcript)
537− = lens _aTranscript (\ s a -> s{_aTranscript = a})
539−-- | A string which maps to an array of values.
540−aInfo :: Lens' Annotation (Maybe AnnotationInfo)
541−aInfo = lens _aInfo (\ s a -> s{_aInfo = a})
543−-- | The position of this annotation on the reference sequence.
544−aPosition :: Lens' Annotation (Maybe RangePosition)
546− = lens _aPosition (\ s a -> s{_aPosition = a})
548−instance FromJSON Annotation where
550− = withObject "Annotation"
553− (o .:? "variant") <*> (o .:? "annotationSetId") <*>
557− <*> (o .:? "transcript")
559− <*> (o .:? "position"))
561−instance ToJSON Annotation where
562− toJSON Annotation{..}
565− [("variant" .=) <$> _aVariant,
566− ("annotationSetId" .=) <$> _aAnnotationSetId,
567− ("name" .=) <$> _aName, ("id" .=) <$> _aId,
568− ("type" .=) <$> _aType,
569− ("transcript" .=) <$> _aTranscript,
570− ("info" .=) <$> _aInfo,
571− ("position" .=) <$> _aPosition])
573−-- | Describes an interleaved FASTQ file source for alignment.
575−-- /See:/ 'interleavedFastqSource' smart constructor.
576−data InterleavedFastqSource = InterleavedFastqSource
577− { _ifsMetadata :: !(Maybe FastqMetadata)
578− , _ifsSourceURIs :: !(Maybe [Text])
579− } deriving (Eq,Show,Data,Typeable,Generic)
581−-- | Creates a value of 'InterleavedFastqSource' with the minimum fields required to make a request.
583−-- Use one of the following lenses to modify other fields as desired:
588−interleavedFastqSource
589− :: InterleavedFastqSource
590−interleavedFastqSource =
591− InterleavedFastqSource
592− { _ifsMetadata = Nothing
593− , _ifsSourceURIs = Nothing
596−-- | Optionally specifies the metadata to be associated with the final
597−-- aligned read group set.
598−ifsMetadata :: Lens' InterleavedFastqSource (Maybe FastqMetadata)
600− = lens _ifsMetadata (\ s a -> s{_ifsMetadata = a})
602−-- | A list of URIs pointing at interleaved FASTQ files in Google Cloud
603−-- Storage which will be aligned. The caller must have READ permissions for
605−ifsSourceURIs :: Lens' InterleavedFastqSource [Text]
607− = lens _ifsSourceURIs
608− (\ s a -> s{_ifsSourceURIs = a})
612−instance FromJSON InterleavedFastqSource where
614− = withObject "InterleavedFastqSource"
616− InterleavedFastqSource <$>
617− (o .:? "metadata") <*>
618− (o .:? "sourceUris" .!= mempty))
620−instance ToJSON InterleavedFastqSource where
621− toJSON InterleavedFastqSource{..}
624− [("metadata" .=) <$> _ifsMetadata,
625− ("sourceUris" .=) <$> _ifsSourceURIs])
627−-- | The read group set call request.
629−-- /See:/ 'callReadGroupSetsRequest' smart constructor.
630−data CallReadGroupSetsRequest = CallReadGroupSetsRequest
631− { _crgsrReadGroupSetId :: !(Maybe Text)
632− , _crgsrDatasetId :: !(Maybe Text)
633− , _crgsrSourceURIs :: !(Maybe [Text])
634− } deriving (Eq,Show,Data,Typeable,Generic)
636−-- | Creates a value of 'CallReadGroupSetsRequest' with the minimum fields required to make a request.
638−-- Use one of the following lenses to modify other fields as desired:
640−-- * 'crgsrReadGroupSetId'
642−-- * 'crgsrDatasetId'
644−-- * 'crgsrSourceURIs'
645−callReadGroupSetsRequest
646− :: CallReadGroupSetsRequest
647−callReadGroupSetsRequest =
648− CallReadGroupSetsRequest
649− { _crgsrReadGroupSetId = Nothing
650− , _crgsrDatasetId = Nothing
651− , _crgsrSourceURIs = Nothing
654−-- | The IDs of the read group sets which will be called. The caller must
655−-- have READ permissions for these read group sets. One of readGroupSetId
656−-- or sourceUris must be provided.
657−crgsrReadGroupSetId :: Lens' CallReadGroupSetsRequest (Maybe Text)
659− = lens _crgsrReadGroupSetId
660− (\ s a -> s{_crgsrReadGroupSetId = a})
662−-- | Required. The ID of the dataset the called variants will belong to. The
663−-- caller must have WRITE permissions to this dataset.
664−crgsrDatasetId :: Lens' CallReadGroupSetsRequest (Maybe Text)
666− = lens _crgsrDatasetId
667− (\ s a -> s{_crgsrDatasetId = a})
669−-- | A list of URIs pointing at BAM files in Google Cloud Storage which will
670−-- be called. FASTQ files are not allowed. The caller must have READ
671−-- permissions for these files. One of readGroupSetId or sourceUris must be
673−crgsrSourceURIs :: Lens' CallReadGroupSetsRequest [Text]
675− = lens _crgsrSourceURIs
676− (\ s a -> s{_crgsrSourceURIs = a})
680−instance FromJSON CallReadGroupSetsRequest where
682− = withObject "CallReadGroupSetsRequest"
684− CallReadGroupSetsRequest <$>
685− (o .:? "readGroupSetId") <*> (o .:? "datasetId") <*>
686− (o .:? "sourceUris" .!= mempty))
688−instance ToJSON CallReadGroupSetsRequest where
689− toJSON CallReadGroupSetsRequest{..}
692− [("readGroupSetId" .=) <$> _crgsrReadGroupSetId,
693− ("datasetId" .=) <$> _crgsrDatasetId,
694− ("sourceUris" .=) <$> _crgsrSourceURIs])
697−-- /See:/ 'batchAnnotationsResponseEntry' smart constructor.
698−data BatchAnnotationsResponseEntry = BatchAnnotationsResponseEntry
699− { _bareStatus :: !(Maybe BatchAnnotationsResponseEntryStatus)
700− , _bareAnnotation :: !(Maybe Annotation)
701− } deriving (Eq,Show,Data,Typeable,Generic)
703−-- | Creates a value of 'BatchAnnotationsResponseEntry' with the minimum fields required to make a request.
705−-- Use one of the following lenses to modify other fields as desired:
709−-- * 'bareAnnotation'
710−batchAnnotationsResponseEntry
711− :: BatchAnnotationsResponseEntry
712−batchAnnotationsResponseEntry =
713− BatchAnnotationsResponseEntry
714− { _bareStatus = Nothing
715− , _bareAnnotation = Nothing
718−-- | The resulting status for this annotation operation.
719−bareStatus :: Lens' BatchAnnotationsResponseEntry (Maybe BatchAnnotationsResponseEntryStatus)
721− = lens _bareStatus (\ s a -> s{_bareStatus = a})
723−-- | The annotation, if any.
724−bareAnnotation :: Lens' BatchAnnotationsResponseEntry (Maybe Annotation)
726− = lens _bareAnnotation
727− (\ s a -> s{_bareAnnotation = a})
729−instance FromJSON BatchAnnotationsResponseEntry where
731− = withObject "BatchAnnotationsResponseEntry"
733− BatchAnnotationsResponseEntry <$>
734− (o .:? "status") <*> (o .:? "annotation"))
736−instance ToJSON BatchAnnotationsResponseEntry where
737− toJSON BatchAnnotationsResponseEntry{..}
740− [("status" .=) <$> _bareStatus,
741− ("annotation" .=) <$> _bareAnnotation])
744-- /See:/ 'listBasesResponse' smart constructor.
345-- /See:/ 'listBasesResponse' smart constructor.
745data ListBasesResponse = ListBasesResponse
346data ListBasesResponse = ListBasesResponse
@@ -775,9 +376,9 @@ lbrNextPageToken
775 = lens _lbrNextPageToken
376 = lens _lbrNextPageToken
776 (\ s a -> s{_lbrNextPageToken = a})
377 (\ s a -> s{_lbrNextPageToken = a})
778−-- | The offset position (0-based) of the given sequence from the start of
379+-- | The offset position (0-based) of the given \`sequence\` from the start
779−-- this Reference. This value will differ for each page in a paginated
380+-- of this \`Reference\`. This value will differ for each page in a
780−-- request.
381+-- paginated request.
781lbrOffset :: Lens' ListBasesResponse (Maybe Int64)
382lbrOffset :: Lens' ListBasesResponse (Maybe Int64)
783 = lens _lbrOffset (\ s a -> s{_lbrOffset = a})
384 = lens _lbrOffset (\ s a -> s{_lbrOffset = a})
@@ -803,64 +404,146 @@ instance ToJSON ListBasesResponse where
803 ("offset" .=) <$> _lbrOffset,
404 ("offset" .=) <$> _lbrOffset,
804 ("sequence" .=) <$> _lbrSequence])
405 ("sequence" .=) <$> _lbrSequence])
407+-- | The response message for Operations.ListOperations.
409+-- /See:/ 'listOperationsResponse' smart constructor.
410+data ListOperationsResponse = ListOperationsResponse
411+ { _lorNextPageToken :: !(Maybe Text)
412+ , _lorOperations :: !(Maybe [Operation])
413+ } deriving (Eq,Show,Data,Typeable,Generic)
415+-- | Creates a value of 'ListOperationsResponse' with the minimum fields required to make a request.
417+-- Use one of the following lenses to modify other fields as desired:
419+-- * 'lorNextPageToken'
422+listOperationsResponse
423+ :: ListOperationsResponse
424+listOperationsResponse =
425+ ListOperationsResponse
426+ { _lorNextPageToken = Nothing
427+ , _lorOperations = Nothing
430+-- | The standard List next-page token.
431+lorNextPageToken :: Lens' ListOperationsResponse (Maybe Text)
433+ = lens _lorNextPageToken
434+ (\ s a -> s{_lorNextPageToken = a})
436+-- | A list of operations that matches the specified filter in the request.
437+lorOperations :: Lens' ListOperationsResponse [Operation]
439+ = lens _lorOperations
440+ (\ s a -> s{_lorOperations = a})
444+instance FromJSON ListOperationsResponse where
446+ = withObject "ListOperationsResponse"
448+ ListOperationsResponse <$>
449+ (o .:? "nextPageToken") <*>
450+ (o .:? "operations" .!= mempty))
452+instance ToJSON ListOperationsResponse where
453+ toJSON ListOperationsResponse{..}
456+ [("nextPageToken" .=) <$> _lorNextPageToken,
457+ ("operations" .=) <$> _lorOperations])
459+-- | Request message for \`GetIamPolicy\` method.
461+-- /See:/ 'getIAMPolicyRequest' smart constructor.
462+data GetIAMPolicyRequest =
464+ deriving (Eq,Show,Data,Typeable,Generic)
466+-- | Creates a value of 'GetIAMPolicyRequest' with the minimum fields required to make a request.
469+ :: GetIAMPolicyRequest
470+getIAMPolicyRequest = GetIAMPolicyRequest
472+instance FromJSON GetIAMPolicyRequest where
474+ = withObject "GetIAMPolicyRequest"
475+ (\ o -> pure GetIAMPolicyRequest)
477+instance ToJSON GetIAMPolicyRequest where
478+ toJSON = const emptyObject
480+-- | The request message for Operations.CancelOperation.
482+-- /See:/ 'cancelOperationRequest' smart constructor.
483+data CancelOperationRequest =
484+ CancelOperationRequest
485+ deriving (Eq,Show,Data,Typeable,Generic)
487+-- | Creates a value of 'CancelOperationRequest' with the minimum fields required to make a request.
489+cancelOperationRequest
490+ :: CancelOperationRequest
491+cancelOperationRequest = CancelOperationRequest
493+instance FromJSON CancelOperationRequest where
495+ = withObject "CancelOperationRequest"
496+ (\ o -> pure CancelOperationRequest)
498+instance ToJSON CancelOperationRequest where
499+ toJSON = const emptyObject
806-- | A Dataset is a collection of genomic data.
501-- | A Dataset is a collection of genomic data.
808-- /See:/ 'dataset' smart constructor.
503-- /See:/ 'dataset' smart constructor.
809data Dataset = Dataset
504data Dataset = Dataset
810− { _dIsPublic :: !(Maybe Bool)
811− , _dProjectNumber :: !(Maybe Int64)
812− , _dName :: !(Maybe Text)
505+ { _dName :: !(Maybe Text)
506+ , _dId :: !(Maybe Text)
813− , _dId :: !(Maybe Text)
507+ , _dProjectId :: !(Maybe Text)
814− , _dCreateTime :: !(Maybe Int64)
508+ , _dCreateTime :: !(Maybe Text)
815 } deriving (Eq,Show,Data,Typeable,Generic)
509 } deriving (Eq,Show,Data,Typeable,Generic)
817-- | Creates a value of 'Dataset' with the minimum fields required to make a request.
511-- | Creates a value of 'Dataset' with the minimum fields required to make a request.
819-- Use one of the following lenses to modify other fields as desired:
513-- Use one of the following lenses to modify other fields as desired:
823−-- * 'dProjectNumber'
825-- * 'dName'
515-- * 'dName'
827-- * 'dId'
517-- * 'dId'
829-- * 'dCreateTime'
521-- * 'dCreateTime'
831 :: Dataset
523 :: Dataset
834− { _dIsPublic = Nothing
835− , _dProjectNumber = Nothing
836− , _dName = Nothing
526+ { _dName = Nothing
837 , _dId = Nothing
527 , _dId = Nothing
528+ , _dProjectId = Nothing
838 , _dCreateTime = Nothing
529 , _dCreateTime = Nothing
841−-- | Flag indicating whether or not a dataset is publicly viewable. If a
842−-- dataset is not public, it inherits viewing permissions from its project.
843−dIsPublic :: Lens' Dataset (Maybe Bool)
845− = lens _dIsPublic (\ s a -> s{_dIsPublic = a})
847−-- | The Google Developers Console project number that this dataset belongs
849−dProjectNumber :: Lens' Dataset (Maybe Int64)
851− = lens _dProjectNumber
852− (\ s a -> s{_dProjectNumber = a})
854-- | The dataset name.
532-- | The dataset name.
855dName :: Lens' Dataset (Maybe Text)
533dName :: Lens' Dataset (Maybe Text)
856dName = lens _dName (\ s a -> s{_dName = a})
534dName = lens _dName (\ s a -> s{_dName = a})
858−-- | The Google generated ID of the dataset, immutable.
536+-- | The server-generated dataset ID, unique across all datasets.
859dId :: Lens' Dataset (Maybe Text)
537dId :: Lens' Dataset (Maybe Text)
860dId = lens _dId (\ s a -> s{_dId = a})
538dId = lens _dId (\ s a -> s{_dId = a})
540+-- | The Google Developers Console project ID that this dataset belongs to.
541+dProjectId :: Lens' Dataset (Maybe Text)
543+ = lens _dProjectId (\ s a -> s{_dProjectId = a})
862-- | The time this dataset was created, in seconds from the epoch.
545-- | The time this dataset was created, in seconds from the epoch.
863−dCreateTime :: Lens' Dataset (Maybe Int64)
546+dCreateTime :: Lens' Dataset (Maybe Text)
864dCreateTime
547dCreateTime
865 = lens _dCreateTime (\ s a -> s{_dCreateTime = a})
548 = lens _dCreateTime (\ s a -> s{_dCreateTime = a})
@@ -869,25 +552,23 @@ instance FromJSON Dataset where
869 = withObject "Dataset"
552 = withObject "Dataset"
871 Dataset <$>
554 Dataset <$>
872− (o .:? "isPublic") <*> (o .:? "projectNumber") <*>
873− (o .:? "name")
555+ (o .:? "name") <*> (o .:? "id") <*>
874− <*> (o .:? "id")
556+ (o .:? "projectId")
875 <*> (o .:? "createTime"))
557 <*> (o .:? "createTime"))
877instance ToJSON Dataset where
559instance ToJSON Dataset where
878 toJSON Dataset{..}
560 toJSON Dataset{..}
880 (catMaybes
562 (catMaybes
881− [("isPublic" .=) <$> _dIsPublic,
882− ("projectNumber" .=) <$> _dProjectNumber,
883− ("name" .=) <$> _dName, ("id" .=) <$> _dId,
563+ [("name" .=) <$> _dName, ("id" .=) <$> _dId,
564+ ("projectId" .=) <$> _dProjectId,
884 ("createTime" .=) <$> _dCreateTime])
565 ("createTime" .=) <$> _dCreateTime])
886-- | A read alignment describes a linear alignment of a string of DNA to a
567-- | A read alignment describes a linear alignment of a string of DNA to a
887-- reference sequence, in addition to metadata about the fragment (the
568-- reference sequence, in addition to metadata about the fragment (the
888-- molecule of DNA sequenced) and the read (the bases which were read by
569-- molecule of DNA sequenced) and the read (the bases which were read by
889-- the sequencer). A read is equivalent to a line in a SAM file. A read
570-- the sequencer). A read is equivalent to a line in a SAM file. A read
890−-- belongs to exactly one read group and exactly one read group set.
571+-- belongs to exactly one read group and exactly one read group set. ###
891-- Generating a reference-aligned sequence string When interacting with
572-- Generating a reference-aligned sequence string When interacting with
892-- mapped reads, it\'s often useful to produce a string representing the
573-- mapped reads, it\'s often useful to produce a string representing the
893-- local alignment of the read to reference. The following pseudocode
574-- local alignment of the read to reference. The following pseudocode
@@ -899,10 +580,10 @@ instance ToJSON Dataset where
899-- c.operationLength break case \"PAD\": out += repeat(\"*\",
580-- c.operationLength break case \"PAD\": out += repeat(\"*\",
900-- c.operationLength) break case \"DELETE\": out += repeat(\"-\",
581-- c.operationLength) break case \"DELETE\": out += repeat(\"-\",
901-- c.operationLength) break case \"SKIP\": out += repeat(\" \",
582-- c.operationLength) break case \"SKIP\": out += repeat(\" \",
902−-- c.operationLength) break case \"CLIP_HARD\": break } } return out
583+-- c.operationLength) break case \"CLIP_HARD\": break } } return out ###
903-- Converting to SAM\'s CIGAR string The following pseudocode generates a
584-- Converting to SAM\'s CIGAR string The following pseudocode generates a
904−-- SAM CIGAR string from the cigar field. Note that this is a lossy
585+-- SAM CIGAR string from the \`cigar\` field. Note that this is a lossy
905−-- conversion (cigar.referenceSequence is lost). cigarMap = {
586+-- conversion (\`cigar.referenceSequence\` is lost). cigarMap = {
906-- \"ALIGNMENT_MATCH\": \"M\", \"INSERT\": \"I\", \"DELETE\": \"D\",
587-- \"ALIGNMENT_MATCH\": \"M\", \"INSERT\": \"I\", \"DELETE\": \"D\",
907-- \"SKIP\": \"N\", \"CLIP_SOFT\": \"S\", \"CLIP_HARD\": \"H\", \"PAD\":
588-- \"SKIP\": \"N\", \"CLIP_SOFT\": \"S\", \"CLIP_HARD\": \"H\", \"PAD\":
908-- \"P\", \"SEQUENCE_MATCH\": \"=\", \"SEQUENCE_MISMATCH\": \"X\", }
589-- \"P\", \"SEQUENCE_MATCH\": \"=\", \"SEQUENCE_MISMATCH\": \"X\", }
@@ -1009,10 +690,9 @@ rReadGroupSetId
1009 = lens _rReadGroupSetId
690 = lens _rReadGroupSetId
1010 (\ s a -> s{_rReadGroupSetId = a})
691 (\ s a -> s{_rReadGroupSetId = a})
1012−-- | The position of the primary alignment of the (readNumber+1)%numberReads
693+-- | The mapping of the primary alignment of the
694+-- \`(readNumber+1)%numberReads\` read in the fragment. It replaces mate
1013−-- read in the fragment. It replaces mate position and mate strand in SAM.
695+-- position and mate strand in SAM.
1014−-- This field will be unset if that read is unmapped or if the fragment
1015−-- only has a single read.
1016rNextMatePosition :: Lens' Read' (Maybe Position)
696rNextMatePosition :: Lens' Read' (Maybe Position)
1017rNextMatePosition
697rNextMatePosition
1018 = lens _rNextMatePosition
698 = lens _rNextMatePosition
@@ -1024,7 +704,7 @@ rFailedVendorQualityChecks
1024 = lens _rFailedVendorQualityChecks
704 = lens _rFailedVendorQualityChecks
1025 (\ s a -> s{_rFailedVendorQualityChecks = a})
705 (\ s a -> s{_rFailedVendorQualityChecks = a})
1027−-- | The linear alignment for this alignment record. This field will be unset
707+-- | The linear alignment for this alignment record. This field will be null
1028-- if the read is unmapped.
708-- if the read is unmapped.
1029rAlignment :: Lens' Read' (Maybe LinearAlignment)
709rAlignment :: Lens' Read' (Maybe LinearAlignment)
1030rAlignment
710rAlignment
@@ -1041,8 +721,8 @@ rNumberReads :: Lens' Read' (Maybe Int32)
1041rNumberReads
721rNumberReads
1042 = lens _rNumberReads (\ s a -> s{_rNumberReads = a})
722 = lens _rNumberReads (\ s a -> s{_rNumberReads = a})
1044−-- | The unique ID for this read. This is a generated unique ID, not to be
724+-- | The server-generated read ID, unique across all reads. This is different
1045−-- confused with fragmentName.
725+-- from the \`fragmentName\`.
1046rId :: Lens' Read' (Maybe Text)
726rId :: Lens' Read' (Maybe Text)
1047rId = lens _rId (\ s a -> s{_rId = a})
727rId = lens _rId (\ s a -> s{_rId = a})
@@ -1050,8 +730,8 @@ rId = lens _rId (\ s a -> s{_rId = a})
1050-- secondary alignment represents an alternative to the primary alignment
730-- secondary alignment represents an alternative to the primary alignment
1051-- for this read. Aligners may return secondary alignments if a read can
731-- for this read. Aligners may return secondary alignments if a read can
1052-- map ambiguously to multiple coordinates in the genome. By convention,
732-- map ambiguously to multiple coordinates in the genome. By convention,
1053−-- each read has one and only one alignment where both secondaryAlignment
733+-- each read has one and only one alignment where both
1054−-- and supplementaryAlignment are false.
734+-- \`secondaryAlignment\` and \`supplementaryAlignment\` are false.
1055rSecondaryAlignment :: Lens' Read' (Maybe Bool)
735rSecondaryAlignment :: Lens' Read' (Maybe Bool)
1056rSecondaryAlignment
736rSecondaryAlignment
1057 = lens _rSecondaryAlignment
737 = lens _rSecondaryAlignment
@@ -1071,21 +751,21 @@ rReadGroupId
1071-- alignment; the remaining linear alignments will be designated as
751-- alignment; the remaining linear alignments will be designated as
1072-- supplementary alignments. These alignments may have different mapping
752-- supplementary alignments. These alignments may have different mapping
1073-- quality scores. In each linear alignment in a chimeric alignment, the
753-- quality scores. In each linear alignment in a chimeric alignment, the
1074−-- read will be hard clipped. The alignedSequence and alignedQuality fields
754+-- read will be hard clipped. The \`alignedSequence\` and
1075−-- in the alignment record will only represent the bases for its respective
755+-- \`alignedQuality\` fields in the alignment record will only represent
1076−-- linear alignment.
756+-- the bases for its respective linear alignment.
1077rSupplementaryAlignment :: Lens' Read' (Maybe Bool)
757rSupplementaryAlignment :: Lens' Read' (Maybe Bool)
1078rSupplementaryAlignment
758rSupplementaryAlignment
1079 = lens _rSupplementaryAlignment
759 = lens _rSupplementaryAlignment
1080 (\ s a -> s{_rSupplementaryAlignment = a})
760 (\ s a -> s{_rSupplementaryAlignment = a})
1082-- | The bases of the read sequence contained in this alignment record,
762-- | The bases of the read sequence contained in this alignment record,
1083−-- without CIGAR operations applied. alignedSequence and alignedQuality may
763+-- *without CIGAR operations applied*. \`alignedSequence\` and
1084−-- be shorter than the full read sequence and quality. This will occur if
764+-- \`alignedQuality\` may be shorter than the full read sequence and
1085−-- the alignment is part of a chimeric alignment, or if the read was
765+-- quality. This will occur if the alignment is part of a chimeric
1086−-- trimmed. When this occurs, the CIGAR for this read will begin\/end with
766+-- alignment, or if the read was trimmed. When this occurs, the CIGAR for
1087−-- a hard clip operator that will indicate the length of the excised
767+-- this read will begin\/end with a hard clip operator that will indicate
1088−-- sequence.
768+-- the length of the excised sequence.
1089rAlignedSequence :: Lens' Read' (Maybe Text)
769rAlignedSequence :: Lens' Read' (Maybe Text)
1090rAlignedSequence
770rAlignedSequence
1091 = lens _rAlignedSequence
771 = lens _rAlignedSequence
@@ -1098,7 +778,8 @@ rProperPlacement
1098 = lens _rProperPlacement
778 = lens _rProperPlacement
1099 (\ s a -> s{_rProperPlacement = a})
779 (\ s a -> s{_rProperPlacement = a})
781+-- | A map of additional read alignment information. This must be of the form
1101−-- | A string which maps to an array of values.
782+-- map (string key mapping to a list of string values).
1102rInfo :: Lens' Read' (Maybe ReadInfo)
783rInfo :: Lens' Read' (Maybe ReadInfo)
1103rInfo = lens _rInfo (\ s a -> s{_rInfo = a})
784rInfo = lens _rInfo (\ s a -> s{_rInfo = a})
@@ -1109,8 +790,8 @@ rReadNumber
1109 = lens _rReadNumber (\ s a -> s{_rReadNumber = a})
790 = lens _rReadNumber (\ s a -> s{_rReadNumber = a})
1111-- | The quality of the read sequence contained in this alignment record.
792-- | The quality of the read sequence contained in this alignment record.
1112−-- alignedSequence and alignedQuality may be shorter than the full read
793+-- \`alignedSequence\` and \`alignedQuality\` may be shorter than the full
1113−-- sequence and quality. This will occur if the alignment is part of a
794+-- read sequence and quality. This will occur if the alignment is part of a
1114-- chimeric alignment, or if the read was trimmed. When this occurs, the
795-- chimeric alignment, or if the read was trimmed. When this occurs, the
1115-- CIGAR for this read will begin\/end with a hard clip operator that will
796-- CIGAR for this read will begin\/end with a hard clip operator that will
1116-- indicate the length of the excised sequence.
797-- indicate the length of the excised sequence.
@@ -1168,112 +849,47 @@ instance ToJSON Read' where
1168 ("readNumber" .=) <$> _rReadNumber,
849 ("readNumber" .=) <$> _rReadNumber,
1169 ("alignedQuality" .=) <$> _rAlignedQuality])
850 ("alignedQuality" .=) <$> _rAlignedQuality])
1172−-- /See:/ 'transcriptExon' smart constructor.
1173−data TranscriptExon = TranscriptExon
1174− { _teStart :: !(Maybe Int64)
1175− , _teEnd :: !(Maybe Int64)
1176− , _teFrame :: !(Maybe Int32Value)
1177− } deriving (Eq,Show,Data,Typeable,Generic)
1179−-- | Creates a value of 'TranscriptExon' with the minimum fields required to make a request.
1181−-- Use one of the following lenses to modify other fields as desired:
1192− { _teStart = Nothing
1194− , _teFrame = Nothing
1197−-- | The start position of the exon on this annotation\'s reference sequence,
1198−-- 0-based inclusive. Note that this is relative to the reference start,
1199−-- and not the containing annotation start.
1200−teStart :: Lens' TranscriptExon (Maybe Int64)
1201−teStart = lens _teStart (\ s a -> s{_teStart = a})
1203−-- | The end position of the exon on this annotation\'s reference sequence,
1204−-- 0-based exclusive. Note that this is relative to the reference start,
1205−-- and not the containing annotation start.
1206−teEnd :: Lens' TranscriptExon (Maybe Int64)
1207−teEnd = lens _teEnd (\ s a -> s{_teEnd = a})
1209−-- | The frame of this exon. Contains a value of 0, 1, or 2, which indicates
1210−-- the offset of the first coding base of the exon within the reading frame
1211−-- of the coding DNA sequence, if any. This field is dependent on the
1212−-- strandedness of this annotation (see Annotation.position.reverseStrand).
1213−-- For forward stranded annotations, this offset is relative to the
1214−-- exon.start. For reverse strand annotations, this offset is relative to
1215−-- the exon.end-1. Unset if this exon does not intersect the coding
1216−-- sequence. Upon creation of a transcript, the frame must be populated for
1217−-- all or none of the coding exons.
1218−teFrame :: Lens' TranscriptExon (Maybe Int32Value)
1219−teFrame = lens _teFrame (\ s a -> s{_teFrame = a})
1221−instance FromJSON TranscriptExon where
1223− = withObject "TranscriptExon"
1226− (o .:? "start") <*> (o .:? "end") <*>
1229−instance ToJSON TranscriptExon where
1230− toJSON TranscriptExon{..}
1233− [("start" .=) <$> _teStart, ("end" .=) <$> _teEnd,
1234− ("frame" .=) <$> _teFrame])
1236-- | A call represents the determination of genotype with respect to a
852-- | A call represents the determination of genotype with respect to a
1237-- particular variant. It may include associated information such as
853-- particular variant. It may include associated information such as
1238-- quality and phasing. For example, a call might assign a probability of
854-- quality and phasing. For example, a call might assign a probability of
1239-- 0.32 to the occurrence of a SNP named rs1234 in a call set with the name
855-- 0.32 to the occurrence of a SNP named rs1234 in a call set with the name
1240-- NA12345.
856-- NA12345.
1242−-- /See:/ 'call' smart constructor.
858+-- /See:/ 'variantCall' smart constructor.
1243−data Call = Call
859+data VariantCall = VariantCall
1244− { _cGenotypeLikelihood :: !(Maybe [Double])
860+ { _vcGenotypeLikelihood :: !(Maybe [Double])
1245− , _cCallSetName :: !(Maybe Text)
861+ , _vcCallSetName :: !(Maybe Text)
1246− , _cPhaseset :: !(Maybe Text)
862+ , _vcPhaseset :: !(Maybe Text)
1247− , _cCallSetId :: !(Maybe Text)
863+ , _vcCallSetId :: !(Maybe Text)
1248− , _cGenotype :: !(Maybe [Int32])
864+ , _vcGenotype :: !(Maybe [Int32])
1249− , _cInfo :: !(Maybe CallInfo)
865+ , _vcInfo :: !(Maybe VariantCallInfo)
1250 } deriving (Eq,Show,Data,Typeable,Generic)
866 } deriving (Eq,Show,Data,Typeable,Generic)
1252−-- | Creates a value of 'Call' with the minimum fields required to make a request.
868+-- | Creates a value of 'VariantCall' with the minimum fields required to make a request.
1254-- Use one of the following lenses to modify other fields as desired:
870-- Use one of the following lenses to modify other fields as desired:
1256−-- * 'cGenotypeLikelihood'
872+-- * 'vcGenotypeLikelihood'
1258−-- * 'cCallSetName'
874+-- * 'vcCallSetName'
1260−-- * 'cPhaseset'
876+-- * 'vcPhaseset'
1262−-- * 'cCallSetId'
878+-- * 'vcCallSetId'
1264−-- * 'cGenotype'
880+-- * 'vcGenotype'
1266−-- * 'cInfo'
882+-- * 'vcInfo'
1268− :: Call
884+ :: VariantCall
1269−call =
885+variantCall =
1270− Call
886+ VariantCall
1271− { _cGenotypeLikelihood = Nothing
887+ { _vcGenotypeLikelihood = Nothing
1272− , _cCallSetName = Nothing
888+ , _vcCallSetName = Nothing
1273− , _cPhaseset = Nothing
889+ , _vcPhaseset = Nothing
1274− , _cCallSetId = Nothing
890+ , _vcCallSetId = Nothing
1275− , _cGenotype = Nothing
891+ , _vcGenotype = Nothing
1276− , _cInfo = Nothing
892+ , _vcInfo = Nothing
1279-- | The genotype likelihoods for this variant call. Each array entry
895-- | The genotype likelihoods for this variant call. Each array entry
@@ -1281,57 +897,60 @@ call =
1281-- ordering is defined by the GL tag in the VCF spec. If Phred-scaled
897-- ordering is defined by the GL tag in the VCF spec. If Phred-scaled
1282-- genotype likelihood scores (PL) are available and log10(P) genotype
898-- genotype likelihood scores (PL) are available and log10(P) genotype
1283-- likelihood scores (GL) are not, PL scores are converted to GL scores. If
899-- likelihood scores (GL) are not, PL scores are converted to GL scores. If
1284−-- both are available, PL scores are stored in info.
900+-- both are available, PL scores are stored in \`info\`.
1285−cGenotypeLikelihood :: Lens' Call [Double]
901+vcGenotypeLikelihood :: Lens' VariantCall [Double]
1286−cGenotypeLikelihood
902+vcGenotypeLikelihood
1287− = lens _cGenotypeLikelihood
903+ = lens _vcGenotypeLikelihood
1288− (\ s a -> s{_cGenotypeLikelihood = a})
904+ (\ s a -> s{_vcGenotypeLikelihood = a})
1289 . _Default
905 . _Default
1290 . _Coerce
906 . _Coerce
1292-- | The name of the call set this variant call belongs to.
908-- | The name of the call set this variant call belongs to.
1293−cCallSetName :: Lens' Call (Maybe Text)
909+vcCallSetName :: Lens' VariantCall (Maybe Text)
1294−cCallSetName
910+vcCallSetName
1295− = lens _cCallSetName (\ s a -> s{_cCallSetName = a})
911+ = lens _vcCallSetName
912+ (\ s a -> s{_vcCallSetName = a})
1297-- | If this field is present, this variant call\'s genotype ordering implies
914-- | If this field is present, this variant call\'s genotype ordering implies
1298-- the phase of the bases and is consistent with any other variant calls in
915-- the phase of the bases and is consistent with any other variant calls in
1299-- the same reference sequence which have the same phaseset value. When
916-- the same reference sequence which have the same phaseset value. When
1300-- importing data from VCF, if the genotype data was phased but no phase
917-- importing data from VCF, if the genotype data was phased but no phase
1301−-- set was specified this field will be set to *.
918+-- set was specified this field will be set to \`*\`.
1302−cPhaseset :: Lens' Call (Maybe Text)
919+vcPhaseset :: Lens' VariantCall (Maybe Text)
1303−cPhaseset
920+vcPhaseset
1304− = lens _cPhaseset (\ s a -> s{_cPhaseset = a})
921+ = lens _vcPhaseset (\ s a -> s{_vcPhaseset = a})
1306-- | The ID of the call set this variant call belongs to.
923-- | The ID of the call set this variant call belongs to.
1307−cCallSetId :: Lens' Call (Maybe Text)
924+vcCallSetId :: Lens' VariantCall (Maybe Text)
1308−cCallSetId
925+vcCallSetId
1309− = lens _cCallSetId (\ s a -> s{_cCallSetId = a})
926+ = lens _vcCallSetId (\ s a -> s{_vcCallSetId = a})
1311-- | The genotype of this variant call. Each value represents either the
928-- | The genotype of this variant call. Each value represents either the
1312−-- value of the referenceBases field or a 1-based index into
929+-- value of the \`referenceBases\` field or a 1-based index into
1313−-- alternateBases. If a variant had a referenceBases value of T and an
930+-- \`alternateBases\`. If a variant had a \`referenceBases\` value of \`T\`
1314−-- alternateBases value of [\"A\", \"C\"], and the genotype was [2, 1],
931+-- and an \`alternateBases\` value of \`[\"A\", \"C\"]\`, and the
1315−-- that would mean the call represented the heterozygous value CA for this
932+-- \`genotype\` was \`[2, 1]\`, that would mean the call represented the
933+-- heterozygous value \`CA\` for this variant. If the \`genotype\` was
1316−-- variant. If the genotype was instead [0, 1], the represented value would
934+-- instead \`[0, 1]\`, the represented value would be \`TA\`. Ordering of
1317−-- be TA. Ordering of the genotype values is important if the phaseset is
935+-- the genotype values is important if the \`phaseset\` is present. If a
1318−-- present. If a genotype is not called (that is, a . is present in the GT
936+-- genotype is not called (that is, a \`.\` is present in the GT string) -1
1319−-- string) -1 is returned.
937+-- is returned.
1320−cGenotype :: Lens' Call [Int32]
938+vcGenotype :: Lens' VariantCall [Int32]
1321−cGenotype
939+vcGenotype
1322− = lens _cGenotype (\ s a -> s{_cGenotype = a}) .
940+ = lens _vcGenotype (\ s a -> s{_vcGenotype = a}) .
1323 _Default
941 _Default
1324 . _Coerce
942 . _Coerce
944+-- | A map of additional variant call information. This must be of the form
1326−-- | A string which maps to an array of values.
945+-- map (string key mapping to a list of string values).
1327−cInfo :: Lens' Call (Maybe CallInfo)
946+vcInfo :: Lens' VariantCall (Maybe VariantCallInfo)
1328−cInfo = lens _cInfo (\ s a -> s{_cInfo = a})
947+vcInfo = lens _vcInfo (\ s a -> s{_vcInfo = a})
1330−instance FromJSON Call where
949+instance FromJSON VariantCall where
1331 parseJSON
950 parseJSON
1332− = withObject "Call"
951+ = withObject "VariantCall"
1334− Call <$>
953+ VariantCall <$>
1335 (o .:? "genotypeLikelihood" .!= mempty) <*>
954 (o .:? "genotypeLikelihood" .!= mempty) <*>
1336 (o .:? "callSetName")
955 (o .:? "callSetName")
1337 <*> (o .:? "phaseset")
956 <*> (o .:? "phaseset")
@@ -1339,168 +958,16 @@ instance FromJSON Call where
1339 <*> (o .:? "genotype" .!= mempty)
958 <*> (o .:? "genotype" .!= mempty)
1340 <*> (o .:? "info"))
959 <*> (o .:? "info"))
1342−instance ToJSON Call where
961+instance ToJSON VariantCall where
1343− toJSON Call{..}
962+ toJSON VariantCall{..}
1346− [("genotypeLikelihood" .=) <$> _cGenotypeLikelihood,
1347− ("callSetName" .=) <$> _cCallSetName,
1348− ("phaseset" .=) <$> _cPhaseset,
1349− ("callSetId" .=) <$> _cCallSetId,
1350− ("genotype" .=) <$> _cGenotype,
1351− ("info" .=) <$> _cInfo])
1353−-- | A 0-based half-open genomic coordinate range for search requests.
1355−-- /See:/ 'queryRange' smart constructor.
1356−data QueryRange = QueryRange
1357− { _qrStart :: !(Maybe Int64)
1358− , _qrReferenceId :: !(Maybe Text)
1359− , _qrReferenceName :: !(Maybe Text)
1360− , _qrEnd :: !(Maybe Int64)
1361− } deriving (Eq,Show,Data,Typeable,Generic)
1363−-- | Creates a value of 'QueryRange' with the minimum fields required to make a request.
1365−-- Use one of the following lenses to modify other fields as desired:
1369−-- * 'qrReferenceId'
1371−-- * 'qrReferenceName'
1378− { _qrStart = Nothing
1379− , _qrReferenceId = Nothing
1380− , _qrReferenceName = Nothing
1384−-- | The start position of the range on the reference, 0-based inclusive. If
1385−-- specified, referenceId or referenceName must also be specified. Defaults
1387−qrStart :: Lens' QueryRange (Maybe Int64)
1388−qrStart = lens _qrStart (\ s a -> s{_qrStart = a})
1390−-- | The ID of the reference to query. At most one of referenceId and
1391−-- referenceName should be specified.
1392−qrReferenceId :: Lens' QueryRange (Maybe Text)
1394− = lens _qrReferenceId
1395− (\ s a -> s{_qrReferenceId = a})
1397−-- | The name of the reference to query, within the reference set associated
1398−-- with this query. At most one of referenceId and referenceName pshould be
1400−qrReferenceName :: Lens' QueryRange (Maybe Text)
1402− = lens _qrReferenceName
1403− (\ s a -> s{_qrReferenceName = a})
1405−-- | The end position of the range on the reference, 0-based exclusive. If
1406−-- specified, referenceId or referenceName must also be specified. If unset
1407−-- or 0, defaults to the length of the reference.
1408−qrEnd :: Lens' QueryRange (Maybe Int64)
1409−qrEnd = lens _qrEnd (\ s a -> s{_qrEnd = a})
1411−instance FromJSON QueryRange where
1413− = withObject "QueryRange"
1416− (o .:? "start") <*> (o .:? "referenceId") <*>
1417− (o .:? "referenceName")
1420−instance ToJSON QueryRange where
1421− toJSON QueryRange{..}
1422 = object
963 = object
1423 (catMaybes
964 (catMaybes
1424− [("start" .=) <$> _qrStart,
965+ [("genotypeLikelihood" .=) <$> _vcGenotypeLikelihood,
1425− ("referenceId" .=) <$> _qrReferenceId,
966+ ("callSetName" .=) <$> _vcCallSetName,
1426− ("referenceName" .=) <$> _qrReferenceName,
967+ ("phaseset" .=) <$> _vcPhaseset,
1427− ("end" .=) <$> _qrEnd])
968+ ("callSetId" .=) <$> _vcCallSetId,
1428−
969+ ("genotype" .=) <$> _vcGenotype,
1429−--
970+ ("info" .=) <$> _vcInfo])
1430−-- /See:/ 'batchCreateAnnotationsRequest' smart constructor.
1431−newtype BatchCreateAnnotationsRequest = BatchCreateAnnotationsRequest
1432− { _bcarAnnotations :: Maybe [Annotation]
1433− } deriving (Eq,Show,Data,Typeable,Generic)
1435−-- | Creates a value of 'BatchCreateAnnotationsRequest' with the minimum fields required to make a request.
1437−-- Use one of the following lenses to modify other fields as desired:
1439−-- * 'bcarAnnotations'
1440−batchCreateAnnotationsRequest
1441− :: BatchCreateAnnotationsRequest
1442−batchCreateAnnotationsRequest =
1443− BatchCreateAnnotationsRequest
1444− { _bcarAnnotations = Nothing
1447−-- | The annotations to be created. At most 4096 can be specified in a single
1449−bcarAnnotations :: Lens' BatchCreateAnnotationsRequest [Annotation]
1451− = lens _bcarAnnotations
1452− (\ s a -> s{_bcarAnnotations = a})
1456−instance FromJSON BatchCreateAnnotationsRequest where
1458− = withObject "BatchCreateAnnotationsRequest"
1460− BatchCreateAnnotationsRequest <$>
1461− (o .:? "annotations" .!= mempty))
1463−instance ToJSON BatchCreateAnnotationsRequest where
1464− toJSON BatchCreateAnnotationsRequest{..}
1466− (catMaybes [("annotations" .=) <$> _bcarAnnotations])
1469−-- /See:/ 'mergeVariantsRequest' smart constructor.
1470−newtype MergeVariantsRequest = MergeVariantsRequest
1471− { _mvrVariants :: Maybe [Variant]
1472− } deriving (Eq,Show,Data,Typeable,Generic)
1474−-- | Creates a value of 'MergeVariantsRequest' with the minimum fields required to make a request.
1476−-- Use one of the following lenses to modify other fields as desired:
1479−mergeVariantsRequest
1480− :: MergeVariantsRequest
1481−mergeVariantsRequest =
1482− MergeVariantsRequest
1483− { _mvrVariants = Nothing
1486−-- | The variants to be merged with existing variants.
1487−mvrVariants :: Lens' MergeVariantsRequest [Variant]
1489− = lens _mvrVariants (\ s a -> s{_mvrVariants = a}) .
1493−instance FromJSON MergeVariantsRequest where
1495− = withObject "MergeVariantsRequest"
1497− MergeVariantsRequest <$>
1498− (o .:? "variants" .!= mempty))
1500−instance ToJSON MergeVariantsRequest where
1501− toJSON MergeVariantsRequest{..}
1503− (catMaybes [("variants" .=) <$> _mvrVariants])
1505-- | A read group is all the data that\'s processed the same way by the
972-- | A read group is all the data that\'s processed the same way by the
1506-- sequencer.
973-- sequencer.
@@ -1508,8 +975,8 @@ instance ToJSON MergeVariantsRequest where
1508-- /See:/ 'readGroup' smart constructor.
975-- /See:/ 'readGroup' smart constructor.
1509data ReadGroup = ReadGroup
976data ReadGroup = ReadGroup
1510 { _rgReferenceSetId :: !(Maybe Text)
977 { _rgReferenceSetId :: !(Maybe Text)
1511− , _rgPrograms :: !(Maybe [ReadGroupProgram])
978+ , _rgPrograms :: !(Maybe [Program])
1512− , _rgExperiment :: !(Maybe ReadGroupExperiment)
979+ , _rgExperiment :: !(Maybe Experiment)
1513 , _rgName :: !(Maybe Text)
980 , _rgName :: !(Maybe Text)
1514 , _rgDatasetId :: !(Maybe Text)
981 , _rgDatasetId :: !(Maybe Text)
1515 , _rgId :: !(Maybe Text)
982 , _rgId :: !(Maybe Text)
@@ -1569,14 +1036,14 @@ rgReferenceSetId
1569-- identical for all read groups within a read group set. For this reason,
1036-- identical for all read groups within a read group set. For this reason,
1570-- only the first read group in a returned set will have this field
1037-- only the first read group in a returned set will have this field
1571-- populated.
1038-- populated.
1572−rgPrograms :: Lens' ReadGroup [ReadGroupProgram]
1039+rgPrograms :: Lens' ReadGroup [Program]
1573rgPrograms
1040rgPrograms
1574 = lens _rgPrograms (\ s a -> s{_rgPrograms = a}) .
1041 = lens _rgPrograms (\ s a -> s{_rgPrograms = a}) .
1575 _Default
1042 _Default
1576 . _Coerce
1043 . _Coerce
1578-- | The experiment used to generate this read group.
1045-- | The experiment used to generate this read group.
1579−rgExperiment :: Lens' ReadGroup (Maybe ReadGroupExperiment)
1046+rgExperiment :: Lens' ReadGroup (Maybe Experiment)
1580rgExperiment
1047rgExperiment
1581 = lens _rgExperiment (\ s a -> s{_rgExperiment = a})
1048 = lens _rgExperiment (\ s a -> s{_rgExperiment = a})
@@ -1590,8 +1057,9 @@ rgDatasetId :: Lens' ReadGroup (Maybe Text)
1590rgDatasetId
1057rgDatasetId
1591 = lens _rgDatasetId (\ s a -> s{_rgDatasetId = a})
1058 = lens _rgDatasetId (\ s a -> s{_rgDatasetId = a})
1593−-- | The generated unique read group ID. Note: This is different than the
1060+-- | The server-generated read group ID, unique for all read groups. Note:
1061+-- This is different than the \`\'RG ID\` field in the SAM spec. For that
1594−-- \'RG ID field in the SAM spec. For that value, see the name field.
1062+-- value, see the \`name\` field.
1595rgId :: Lens' ReadGroup (Maybe Text)
1063rgId :: Lens' ReadGroup (Maybe Text)
1596rgId = lens _rgId (\ s a -> s{_rgId = a})
1064rgId = lens _rgId (\ s a -> s{_rgId = a})
@@ -1616,7 +1084,8 @@ rgDescription
1616 = lens _rgDescription
1084 = lens _rgDescription
1617 (\ s a -> s{_rgDescription = a})
1085 (\ s a -> s{_rgDescription = a})
1087+-- | A map of additional read group information. This must be of the form map
1619−-- | A string which maps to an array of values.
1088+-- (string key mapping to a list of string values).
1620rgInfo :: Lens' ReadGroup (Maybe ReadGroupInfo)
1089rgInfo :: Lens' ReadGroup (Maybe ReadGroupInfo)
1621rgInfo = lens _rgInfo (\ s a -> s{_rgInfo = a})
1090rgInfo = lens _rgInfo (\ s a -> s{_rgInfo = a})
@@ -1651,24 +1120,107 @@ instance ToJSON ReadGroup where
1651 ("description" .=) <$> _rgDescription,
1120 ("description" .=) <$> _rgDescription,
1652 ("info" .=) <$> _rgInfo])
1121 ("info" .=) <$> _rgInfo])
1654−-- |
1123+-- | This resource represents a long-running operation that is the result of
1124+-- a network API call.
1656−-- /See:/ 'searchReferenceSetsRequest' smart constructor.
1126+-- /See:/ 'operation' smart constructor.
1657−data SearchReferenceSetsRequest = SearchReferenceSetsRequest
1127+data Operation = Operation
1658− { _srsrMD5checksums :: !(Maybe [Text])
1128+ { _oDone :: !(Maybe Bool)
1659− , _srsrAccessions :: !(Maybe [Text])
1129+ , _oError :: !(Maybe Status)
1660− , _srsrPageToken :: !(Maybe Text)
1130+ , _oResponse :: !(Maybe OperationResponse)
1661− , _srsrAssemblyId :: !(Maybe Text)
1131+ , _oName :: !(Maybe Text)
1662− , _srsrPageSize :: !(Maybe Int32)
1132+ , _oMetadata :: !(Maybe OperationSchema)
1663 } deriving (Eq,Show,Data,Typeable,Generic)
1133 } deriving (Eq,Show,Data,Typeable,Generic)
1665−-- | Creates a value of 'SearchReferenceSetsRequest' with the minimum fields required to make a request.
1135+-- | Creates a value of 'Operation' with the minimum fields required to make a request.
1667-- Use one of the following lenses to modify other fields as desired:
1137-- Use one of the following lenses to modify other fields as desired:
1669−-- * 'srsrMD5checksums'
1139+-- * 'oDone'
1153+ , _oError = Nothing
1154+ , _oResponse = Nothing
1156+ , _oMetadata = Nothing
1159+-- | If the value is \`false\`, it means the operation is still in progress.
1160+-- If true, the operation is completed, and either \`error\` or
1161+-- \`response\` is available.
1162+oDone :: Lens' Operation (Maybe Bool)
1163+oDone = lens _oDone (\ s a -> s{_oDone = a})
1165+-- | The error result of the operation in case of failure.
1166+oError :: Lens' Operation (Maybe Status)
1167+oError = lens _oError (\ s a -> s{_oError = a})
1169+-- | If importing ReadGroupSets, an ImportReadGroupSetsResponse is returned.
1170+-- If importing Variants, an ImportVariantsResponse is returned. For
1171+-- exports, an empty response is returned.
1172+oResponse :: Lens' Operation (Maybe OperationResponse)
1174+ = lens _oResponse (\ s a -> s{_oResponse = a})
1176+-- | The server-assigned name, which is only unique within the same service
1177+-- that originally returns it. For example:
1178+-- \`operations\/CJHU7Oi_ChDrveSpBRjfuL-qzoWAgEw\`
1179+oName :: Lens' Operation (Maybe Text)
1180+oName = lens _oName (\ s a -> s{_oName = a})
1182+-- | An OperationMetadata object. This will always be returned with the
1184+oMetadata :: Lens' Operation (Maybe OperationSchema)
1186+ = lens _oMetadata (\ s a -> s{_oMetadata = a})
1188+instance FromJSON Operation where
1190+ = withObject "Operation"
1193+ (o .:? "done") <*> (o .:? "error") <*>
1196+ <*> (o .:? "metadata"))
1198+instance ToJSON Operation where
1199+ toJSON Operation{..}
1202+ [("done" .=) <$> _oDone, ("error" .=) <$> _oError,
1203+ ("response" .=) <$> _oResponse,
1204+ ("name" .=) <$> _oName,
1205+ ("metadata" .=) <$> _oMetadata])
1208+-- /See:/ 'searchReferenceSetsRequest' smart constructor.
1209+data SearchReferenceSetsRequest = SearchReferenceSetsRequest
1210+ { _srsrMD5checksums :: !(Maybe [Text])
1211+ , _srsrAccessions :: !(Maybe [Text])
1212+ , _srsrPageToken :: !(Maybe Text)
1213+ , _srsrAssemblyId :: !(Maybe Text)
1214+ , _srsrPageSize :: !(Maybe Int32)
1215+ } deriving (Eq,Show,Data,Typeable,Generic)
1217+-- | Creates a value of 'SearchReferenceSetsRequest' with the minimum fields required to make a request.
1219+-- Use one of the following lenses to modify other fields as desired:
1221+-- * 'srsrMD5checksums'
1671−-- * 'srsrAccessions'
1223+-- * 'srsrAccessions'
1673-- * 'srsrPageToken'
1225-- * 'srsrPageToken'
@@ -1686,8 +1238,8 @@ searchReferenceSetsRequest =
1686 , _srsrPageSize = Nothing
1238 , _srsrPageSize = Nothing
1689−-- | If present, return references for which the md5checksum matches. See
1241+-- | If present, return references for which the \`md5checksum\` matches. See
1690−-- ReferenceSet.md5checksum for details.
1242+-- \`ReferenceSet.md5checksum\` for details.
1691srsrMD5checksums :: Lens' SearchReferenceSetsRequest [Text]
1243srsrMD5checksums :: Lens' SearchReferenceSetsRequest [Text]
1692srsrMD5checksums
1244srsrMD5checksums
1693 = lens _srsrMD5checksums
1245 = lens _srsrMD5checksums
@@ -1697,9 +1249,9 @@ srsrMD5checksums
1698-- | If present, return references for which the accession matches any of
1250-- | If present, return references for which the accession matches any of
1699-- these strings. Best to give a version number, for example
1251-- these strings. Best to give a version number, for example
1700−-- GCF_000001405.26. If only the main accession number is given then all
1252+-- \`GCF_000001405.26\`. If only the main accession number is given then
1701−-- records with that main accession will be returned, whichever version.
1253+-- all records with that main accession will be returned, whichever
1702−-- Note that different versions will have different sequences.
1254+-- version. Note that different versions will have different sequences.
1703srsrAccessions :: Lens' SearchReferenceSetsRequest [Text]
1255srsrAccessions :: Lens' SearchReferenceSetsRequest [Text]
1704srsrAccessions
1256srsrAccessions
1705 = lens _srsrAccessions
1257 = lens _srsrAccessions
@@ -1709,14 +1261,14 @@ srsrAccessions
1710-- | The continuation token, which is used to page through large result sets.
1262-- | The continuation token, which is used to page through large result sets.
1711-- To get the next page of results, set this parameter to the value of
1263-- To get the next page of results, set this parameter to the value of
1712−-- nextPageToken from the previous response.
1264+-- \`nextPageToken\` from the previous response.
1713srsrPageToken :: Lens' SearchReferenceSetsRequest (Maybe Text)
1265srsrPageToken :: Lens' SearchReferenceSetsRequest (Maybe Text)
1714srsrPageToken
1266srsrPageToken
1715 = lens _srsrPageToken
1267 = lens _srsrPageToken
1716 (\ s a -> s{_srsrPageToken = a})
1268 (\ s a -> s{_srsrPageToken = a})
1718-- | If present, return reference sets for which a substring of their
1270-- | If present, return reference sets for which a substring of their
1719−-- assemblyId matches this string (case insensitive).
1271+-- \`assemblyId\` matches this string (case insensitive).
1720srsrAssemblyId :: Lens' SearchReferenceSetsRequest (Maybe Text)
1272srsrAssemblyId :: Lens' SearchReferenceSetsRequest (Maybe Text)
1721srsrAssemblyId
1273srsrAssemblyId
1722 = lens _srsrAssemblyId
1274 = lens _srsrAssemblyId
@@ -1748,6 +1300,29 @@ instance ToJSON SearchReferenceSetsRequest where
1748 ("assemblyId" .=) <$> _srsrAssemblyId,
1300 ("assemblyId" .=) <$> _srsrAssemblyId,
1749 ("pageSize" .=) <$> _srsrPageSize])
1301 ("pageSize" .=) <$> _srsrPageSize])
1303+-- | A generic empty message that you can re-use to avoid defining duplicated
1304+-- empty messages in your APIs. A typical example is to use it as the
1305+-- request or the response type of an API method. For instance: service Foo
1306+-- { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); } The
1307+-- JSON representation for \`Empty\` is empty JSON object \`{}\`.
1309+-- /See:/ 'empty' smart constructor.
1312+ deriving (Eq,Show,Data,Typeable,Generic)
1314+-- | Creates a value of 'Empty' with the minimum fields required to make a request.
1320+instance FromJSON Empty where
1321+ parseJSON = withObject "Empty" (\ o -> pure Empty)
1323+instance ToJSON Empty where
1324+ toJSON = const emptyObject
1752-- /See:/ 'searchReferencesResponse' smart constructor.
1327-- /See:/ 'searchReferencesResponse' smart constructor.
1753data SearchReferencesResponse = SearchReferencesResponse
1328data SearchReferencesResponse = SearchReferencesResponse
@@ -1802,6 +1377,108 @@ instance ToJSON SearchReferencesResponse where
1802 [("nextPageToken" .=) <$> _srrNextPageToken,
1377 [("nextPageToken" .=) <$> _srrNextPageToken,
1803 ("references" .=) <$> _srrReferences])
1378 ("references" .=) <$> _srrReferences])
1380+-- | Metadata describes a single piece of variant call metadata. These data
1381+-- include a top level key and either a single value string (value) or a
1382+-- list of key-value pairs (info.) Value and info are mutually exclusive.
1384+-- /See:/ 'variantSetMetadata' smart constructor.
1385+data VariantSetMetadata = VariantSetMetadata
1386+ { _vsmValue :: !(Maybe Text)
1387+ , _vsmKey :: !(Maybe Text)
1388+ , _vsmId :: !(Maybe Text)
1389+ , _vsmType :: !(Maybe Text)
1390+ , _vsmNumber :: !(Maybe Text)
1391+ , _vsmDescription :: !(Maybe Text)
1392+ , _vsmInfo :: !(Maybe VariantSetMetadataInfo)
1393+ } deriving (Eq,Show,Data,Typeable,Generic)
1395+-- | Creates a value of 'VariantSetMetadata' with the minimum fields required to make a request.
1397+-- Use one of the following lenses to modify other fields as desired:
1409+-- * 'vsmDescription'
1413+ :: VariantSetMetadata
1414+variantSetMetadata =
1416+ { _vsmValue = Nothing
1417+ , _vsmKey = Nothing
1419+ , _vsmType = Nothing
1420+ , _vsmNumber = Nothing
1421+ , _vsmDescription = Nothing
1422+ , _vsmInfo = Nothing
1425+-- | The value field for simple metadata
1426+vsmValue :: Lens' VariantSetMetadata (Maybe Text)
1427+vsmValue = lens _vsmValue (\ s a -> s{_vsmValue = a})
1429+-- | The top-level key.
1430+vsmKey :: Lens' VariantSetMetadata (Maybe Text)
1431+vsmKey = lens _vsmKey (\ s a -> s{_vsmKey = a})
1433+-- | User-provided ID field, not enforced by this API. Two or more pieces of
1434+-- structured metadata with identical id and key fields are considered
1436+vsmId :: Lens' VariantSetMetadata (Maybe Text)
1437+vsmId = lens _vsmId (\ s a -> s{_vsmId = a})
1439+-- | The type of data. Possible types include: Integer, Float, Flag,
1440+-- Character, and String.
1441+vsmType :: Lens' VariantSetMetadata (Maybe Text)
1442+vsmType = lens _vsmType (\ s a -> s{_vsmType = a})
1444+-- | The number of values that can be included in a field described by this
1446+vsmNumber :: Lens' VariantSetMetadata (Maybe Text)
1448+ = lens _vsmNumber (\ s a -> s{_vsmNumber = a})
1450+-- | A textual description of this metadata.
1451+vsmDescription :: Lens' VariantSetMetadata (Maybe Text)
1453+ = lens _vsmDescription
1454+ (\ s a -> s{_vsmDescription = a})
1456+-- | Remaining structured metadata key-value pairs. This must be of the form
1457+-- map (string key mapping to a list of string values).
1458+vsmInfo :: Lens' VariantSetMetadata (Maybe VariantSetMetadataInfo)
1459+vsmInfo = lens _vsmInfo (\ s a -> s{_vsmInfo = a})
1461+instance FromJSON VariantSetMetadata where
1463+ = withObject "VariantSetMetadata"
1465+ VariantSetMetadata <$>
1466+ (o .:? "value") <*> (o .:? "key") <*> (o .:? "id")
1468+ <*> (o .:? "number")
1469+ <*> (o .:? "description")
1470+ <*> (o .:? "info"))
1472+instance ToJSON VariantSetMetadata where
1473+ toJSON VariantSetMetadata{..}
1476+ [("value" .=) <$> _vsmValue, ("key" .=) <$> _vsmKey,
1477+ ("id" .=) <$> _vsmId, ("type" .=) <$> _vsmType,
1478+ ("number" .=) <$> _vsmNumber,
1479+ ("description" .=) <$> _vsmDescription,
1480+ ("info" .=) <$> _vsmInfo])
1805-- | A call set is a collection of variant calls, typically for one sample.
1482-- | A call set is a collection of variant calls, typically for one sample.
1806-- It belongs to a variant set.
1483-- It belongs to a variant set.
@@ -1851,7 +1528,7 @@ csCreated
1851csName :: Lens' CallSet (Maybe Text)
1528csName :: Lens' CallSet (Maybe Text)
1852csName = lens _csName (\ s a -> s{_csName = a})
1529csName = lens _csName (\ s a -> s{_csName = a})
1854−-- | The Google generated ID of the call set, immutable.
1531+-- | The server-generated call set ID, unique across all call sets.
1855csId :: Lens' CallSet (Maybe Text)
1532csId :: Lens' CallSet (Maybe Text)
1856csId = lens _csId (\ s a -> s{_csId = a})
1533csId = lens _csId (\ s a -> s{_csId = a})
@@ -1860,7 +1537,10 @@ csSampleId :: Lens' CallSet (Maybe Text)
1860csSampleId
1537csSampleId
1861 = lens _csSampleId (\ s a -> s{_csSampleId = a})
1538 = lens _csSampleId (\ s a -> s{_csSampleId = a})
1863−-- | The IDs of the variant sets this call set belongs to.
1540+-- | The IDs of the variant sets this call set belongs to. This field must
1541+-- have exactly length one, as a call set belongs to a single variant set.
1542+-- This field is repeated for compatibility with the [GA4GH 0.5.1
1543+-- API](https:\/\/github.com\/ga4gh\/schemas\/blob\/v0.5.1\/src\/main\/resources\/avro\/variants.avdl#L76).
1864csVariantSetIds :: Lens' CallSet [Text]
1544csVariantSetIds :: Lens' CallSet [Text]
1865csVariantSetIds
1545csVariantSetIds
1866 = lens _csVariantSetIds
1546 = lens _csVariantSetIds
@@ -1868,7 +1548,8 @@ csVariantSetIds
1868 . _Default
1548 . _Default
1869 . _Coerce
1549 . _Coerce
1551+-- | A map of additional call set information. This must be of the form map
1871−-- | A string which maps to an array of values.
1552+-- (string key mapping to a list of string values).
1872csInfo :: Lens' CallSet (Maybe CallSetInfo)
1553csInfo :: Lens' CallSet (Maybe CallSetInfo)
1873csInfo = lens _csInfo (\ s a -> s{_csInfo = a})
1554csInfo = lens _csInfo (\ s a -> s{_csInfo = a})
@@ -1941,120 +1622,6 @@ instance ToJSON CoverageBucket where
1941 [("range" .=) <$> _cbRange,
1622 [("range" .=) <$> _cbRange,
1942 ("meanCoverage" .=) <$> _cbMeanCoverage])
1623 ("meanCoverage" .=) <$> _cbMeanCoverage])
1944−-- | A Variant annotation.
1946−-- /See:/ 'variantAnnotation' smart constructor.
1947−data VariantAnnotation = VariantAnnotation
1948− { _vaEffect :: !(Maybe VariantAnnotationEffect)
1949− , _vaClinicalSignificance :: !(Maybe VariantAnnotationClinicalSignificance)
1950− , _vaAlternateBases :: !(Maybe Text)
1951− , _vaGeneId :: !(Maybe Text)
1952− , _vaConditions :: !(Maybe [VariantAnnotationCondition])
1953− , _vaType :: !(Maybe VariantAnnotationType)
1954− , _vaTranscriptIds :: !(Maybe [Text])
1955− } deriving (Eq,Show,Data,Typeable,Generic)
1957−-- | Creates a value of 'VariantAnnotation' with the minimum fields required to make a request.
1959−-- Use one of the following lenses to modify other fields as desired:
1963−-- * 'vaClinicalSignificance'
1965−-- * 'vaAlternateBases'
1973−-- * 'vaTranscriptIds'
1975− :: VariantAnnotation
1978− { _vaEffect = Nothing
1979− , _vaClinicalSignificance = Nothing
1980− , _vaAlternateBases = Nothing
1981− , _vaGeneId = Nothing
1982− , _vaConditions = Nothing
1983− , _vaType = Nothing
1984− , _vaTranscriptIds = Nothing
1987−-- | Effect of the variant on the coding sequence.
1988−vaEffect :: Lens' VariantAnnotation (Maybe VariantAnnotationEffect)
1989−vaEffect = lens _vaEffect (\ s a -> s{_vaEffect = a})
1991−-- | Describes the clinical significance of a variant. It is adapted from the
1992−-- ClinVar controlled vocabulary for clinical significance described at:
1993−-- http:\/\/www.ncbi.nlm.nih.gov\/clinvar\/docs\/clinsig\/
1994−vaClinicalSignificance :: Lens' VariantAnnotation (Maybe VariantAnnotationClinicalSignificance)
1995−vaClinicalSignificance
1996− = lens _vaClinicalSignificance
1997− (\ s a -> s{_vaClinicalSignificance = a})
1999−-- | The alternate allele for this variant. If multiple alternate alleles
2000−-- exist at this location, create a separate variant for each one, as they
2001−-- may represent distinct conditions.
2002−vaAlternateBases :: Lens' VariantAnnotation (Maybe Text)
2004− = lens _vaAlternateBases
2005− (\ s a -> s{_vaAlternateBases = a})
2007−-- | Google annotation ID of the gene affected by this variant. This should
2008−-- be provided when the variant is created.
2009−vaGeneId :: Lens' VariantAnnotation (Maybe Text)
2010−vaGeneId = lens _vaGeneId (\ s a -> s{_vaGeneId = a})
2012−-- | The set of conditions associated with this variant. A condition
2013−-- describes the way a variant influences human health.
2014−vaConditions :: Lens' VariantAnnotation [VariantAnnotationCondition]
2016− = lens _vaConditions (\ s a -> s{_vaConditions = a})
2020−-- | Type has been adapted from ClinVar\'s list of variant types.
2021−vaType :: Lens' VariantAnnotation (Maybe VariantAnnotationType)
2022−vaType = lens _vaType (\ s a -> s{_vaType = a})
2024−-- | Google annotation IDs of the transcripts affected by this variant. These
2025−-- should be provided when the variant is created.
2026−vaTranscriptIds :: Lens' VariantAnnotation [Text]
2028− = lens _vaTranscriptIds
2029− (\ s a -> s{_vaTranscriptIds = a})
2033−instance FromJSON VariantAnnotation where
2035− = withObject "VariantAnnotation"
2037− VariantAnnotation <$>
2038− (o .:? "effect") <*> (o .:? "clinicalSignificance")
2039− <*> (o .:? "alternateBases")
2040− <*> (o .:? "geneId")
2041− <*> (o .:? "conditions" .!= mempty)
2043− <*> (o .:? "transcriptIds" .!= mempty))
2045−instance ToJSON VariantAnnotation where
2046− toJSON VariantAnnotation{..}
2049− [("effect" .=) <$> _vaEffect,
2050− ("clinicalSignificance" .=) <$>
2051− _vaClinicalSignificance,
2052− ("alternateBases" .=) <$> _vaAlternateBases,
2053− ("geneId" .=) <$> _vaGeneId,
2054− ("conditions" .=) <$> _vaConditions,
2055− ("type" .=) <$> _vaType,
2056− ("transcriptIds" .=) <$> _vaTranscriptIds])
2058-- | The read group set search request.
1625-- | The read group set search request.
2060-- /See:/ 'searchReadGroupSetsRequest' smart constructor.
1627-- /See:/ 'searchReadGroupSetsRequest' smart constructor.
@@ -2103,7 +1670,7 @@ srgsrName
2104-- | The continuation token, which is used to page through large result sets.
1671-- | The continuation token, which is used to page through large result sets.
2105-- To get the next page of results, set this parameter to the value of
1672-- To get the next page of results, set this parameter to the value of
2106−-- nextPageToken from the previous response.
1673+-- \`nextPageToken\` from the previous response.
2107srgsrPageToken :: Lens' SearchReadGroupSetsRequest (Maybe Text)
1674srgsrPageToken :: Lens' SearchReadGroupSetsRequest (Maybe Text)
2108srgsrPageToken
1675srgsrPageToken
2109 = lens _srgsrPageToken
1676 = lens _srgsrPageToken
@@ -2134,55 +1701,6 @@ instance ToJSON SearchReadGroupSetsRequest where
2134 ("pageToken" .=) <$> _srgsrPageToken,
1701 ("pageToken" .=) <$> _srgsrPageToken,
2135 ("pageSize" .=) <$> _srgsrPageSize])
1702 ("pageSize" .=) <$> _srgsrPageSize])
2139−-- /See:/ 'batchAnnotationsResponseEntryStatus' smart constructor.
2140−data BatchAnnotationsResponseEntryStatus = BatchAnnotationsResponseEntryStatus
2141− { _baresCode :: !(Maybe Int32)
2142− , _baresMessage :: !(Maybe Text)
2143− } deriving (Eq,Show,Data,Typeable,Generic)
2145−-- | Creates a value of 'BatchAnnotationsResponseEntryStatus' with the minimum fields required to make a request.
2147−-- Use one of the following lenses to modify other fields as desired:
2152−batchAnnotationsResponseEntryStatus
2153− :: BatchAnnotationsResponseEntryStatus
2154−batchAnnotationsResponseEntryStatus =
2155− BatchAnnotationsResponseEntryStatus
2156− { _baresCode = Nothing
2157− , _baresMessage = Nothing
2160−-- | The HTTP status code for this operation.
2161−baresCode :: Lens' BatchAnnotationsResponseEntryStatus (Maybe Int32)
2163− = lens _baresCode (\ s a -> s{_baresCode = a})
2165−-- | Error message for this status, if any.
2166−baresMessage :: Lens' BatchAnnotationsResponseEntryStatus (Maybe Text)
2168− = lens _baresMessage (\ s a -> s{_baresMessage = a})
2170−instance FromJSON BatchAnnotationsResponseEntryStatus
2173− = withObject "BatchAnnotationsResponseEntryStatus"
2175− BatchAnnotationsResponseEntryStatus <$>
2176− (o .:? "code") <*> (o .:? "message"))
2178−instance ToJSON BatchAnnotationsResponseEntryStatus
2180− toJSON BatchAnnotationsResponseEntryStatus{..}
2183− [("code" .=) <$> _baresCode,
2184− ("message" .=) <$> _baresMessage])
2186-- | A reference is a canonical assembled DNA sequence, intended to act as a
1704-- | A reference is a canonical assembled DNA sequence, intended to act as a
2187-- reference coordinate space for other genomic annotations. A single
1705-- reference coordinate space for other genomic annotations. A single
2188-- reference might represent the human chromosome 1 or mitochandrial DNA,
1706-- reference might represent the human chromosome 1 or mitochandrial DNA,
@@ -2235,7 +1753,7 @@ refLength
2235 = lens _refLength (\ s a -> s{_refLength = a})
1753 = lens _refLength (\ s a -> s{_refLength = a})
2237-- | All known corresponding accession IDs in INSDC (GenBank\/ENA\/DDBJ)
1755-- | All known corresponding accession IDs in INSDC (GenBank\/ENA\/DDBJ)
2238−-- ideally with a version number, for example GCF_000001405.26.
1756+-- ideally with a version number, for example \`GCF_000001405.26\`.
2239refSourceAccessions :: Lens' Reference [Text]
1757refSourceAccessions :: Lens' Reference [Text]
2240refSourceAccessions
1758refSourceAccessions
2241 = lens _refSourceAccessions
1759 = lens _refSourceAccessions
@@ -2251,7 +1769,7 @@ refMD5checksum
2251 = lens _refMD5checksum
1769 = lens _refMD5checksum
2252 (\ s a -> s{_refMD5checksum = a})
1770 (\ s a -> s{_refMD5checksum = a})
2254−-- | The name of this reference, for example 22.
1772+-- | The name of this reference, for example \`22\`.
2255refName :: Lens' Reference (Maybe Text)
1773refName :: Lens' Reference (Maybe Text)
2256refName = lens _refName (\ s a -> s{_refName = a})
1774refName = lens _refName (\ s a -> s{_refName = a})
@@ -2262,7 +1780,7 @@ refNcbiTaxonId
2262 = lens _refNcbiTaxonId
1780 = lens _refNcbiTaxonId
2263 (\ s a -> s{_refNcbiTaxonId = a})
1781 (\ s a -> s{_refNcbiTaxonId = a})
2265−-- | The Google generated immutable ID of the reference.
1783+-- | The server-generated reference ID, unique across all references.
2266refId :: Lens' Reference (Maybe Text)
1784refId :: Lens' Reference (Maybe Text)
2267refId = lens _refId (\ s a -> s{_refId = a})
1785refId = lens _refId (\ s a -> s{_refId = a})
@@ -2283,7 +1801,7 @@ instance FromJSON Reference where
2283 <*> (o .:? "name")
1801 <*> (o .:? "name")
2284 <*> (o .:? "ncbiTaxonId")
1802 <*> (o .:? "ncbiTaxonId")
2285 <*> (o .:? "id")
1803 <*> (o .:? "id")
2286− <*> (o .:? "sourceURI"))
1804+ <*> (o .:? "sourceUri"))
2288instance ToJSON Reference where
1806instance ToJSON Reference where
2289 toJSON Reference{..}
1807 toJSON Reference{..}
@@ -2295,46 +1813,32 @@ instance ToJSON Reference where
2295 ("name" .=) <$> _refName,
1813 ("name" .=) <$> _refName,
2296 ("ncbiTaxonId" .=) <$> _refNcbiTaxonId,
1814 ("ncbiTaxonId" .=) <$> _refNcbiTaxonId,
2297 ("id" .=) <$> _refId,
1815 ("id" .=) <$> _refId,
2298− ("sourceURI" .=) <$> _refSourceURI])
1816+ ("sourceUri" .=) <$> _refSourceURI])
1818+-- | A map of additional variant call information. This must be of the form
1819+-- map (string key mapping to a list of string values).
2301−-- /See:/ 'batchAnnotationsResponse' smart constructor.
1821+-- /See:/ 'variantCallInfo' smart constructor.
2302−newtype BatchAnnotationsResponse = BatchAnnotationsResponse
1822+data VariantCallInfo =
2303− { _barEntries :: Maybe [BatchAnnotationsResponseEntry]
1823+ VariantCallInfo
2304− } deriving (Eq,Show,Data,Typeable,Generic)
1824+ deriving (Eq,Show,Data,Typeable,Generic)
2306−-- | Creates a value of 'BatchAnnotationsResponse' with the minimum fields required to make a request.
1826+-- | Creates a value of 'VariantCallInfo' with the minimum fields required to make a request.
2308−-- Use one of the following lenses to modify other fields as desired:
2310−-- * 'barEntries'
1828+variantCallInfo
2311−batchAnnotationsResponse
1829+ :: VariantCallInfo
2312− :: BatchAnnotationsResponse
1830+variantCallInfo = VariantCallInfo
2313−batchAnnotationsResponse =
2314− BatchAnnotationsResponse
2315− { _barEntries = Nothing
2318−-- | The resulting per-annotation entries, ordered consistently with the
2319−-- original request.
2320−barEntries :: Lens' BatchAnnotationsResponse [BatchAnnotationsResponseEntry]
2322− = lens _barEntries (\ s a -> s{_barEntries = a}) .
2326−instance FromJSON BatchAnnotationsResponse where
1832+instance FromJSON VariantCallInfo where
2327 parseJSON
1833 parseJSON
2328− = withObject "BatchAnnotationsResponse"
1834+ = withObject "VariantCallInfo"
2329− (\ o ->
1835+ (\ o -> pure VariantCallInfo)
2330− BatchAnnotationsResponse <$>
2331− (o .:? "entries" .!= mempty))
2333−instance ToJSON BatchAnnotationsResponse where
1837+instance ToJSON VariantCallInfo where
2334− toJSON BatchAnnotationsResponse{..}
1838+ toJSON = const emptyObject
2335− = object (catMaybes [("entries" .=) <$> _barEntries])
1840+-- | A map of additional read group information. This must be of the form map
2337−-- | A string which maps to an array of values.
1841+-- (string key mapping to a list of string values).
2339-- /See:/ 'readGroupInfo' smart constructor.
1843-- /See:/ 'readGroupInfo' smart constructor.
2340data ReadGroupInfo =
1844data ReadGroupInfo =
@@ -2355,108 +1859,25 @@ instance FromJSON ReadGroupInfo where
2355instance ToJSON ReadGroupInfo where
1859instance ToJSON ReadGroupInfo where
2356 toJSON = const emptyObject
1860 toJSON = const emptyObject
2358−-- | The jobs search request.
2360−-- /See:/ 'searchJobsRequest' smart constructor.
1863+-- /See:/ 'statusDetailsItem' smart constructor.
2361−data SearchJobsRequest = SearchJobsRequest
1864+data StatusDetailsItem =
2362− { _sjrCreatedAfter :: !(Maybe Int64)
1865+ StatusDetailsItem
2363− , _sjrStatus :: !(Maybe [SearchJobsRequestStatusItem])
2364− , _sjrProjectNumber :: !(Maybe Int64)
2365− , _sjrPageToken :: !(Maybe Text)
2366− , _sjrPageSize :: !(Maybe Int32)
2367− , _sjrCreatedBefore :: !(Maybe Int64)
2368− } deriving (Eq,Show,Data,Typeable,Generic)
1866+ deriving (Eq,Show,Data,Typeable,Generic)
2370−-- | Creates a value of 'SearchJobsRequest' with the minimum fields required to make a request.
1868+-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
2372−-- Use one of the following lenses to modify other fields as desired:
2374−-- * 'sjrCreatedAfter'
2378−-- * 'sjrProjectNumber'
2380−-- * 'sjrPageToken'
1870+statusDetailsItem
2381−--
1871+ :: StatusDetailsItem
2382−-- * 'sjrPageSize'
1872+statusDetailsItem = StatusDetailsItem
2384−-- * 'sjrCreatedBefore'
2386− :: SearchJobsRequest
2389− { _sjrCreatedAfter = Nothing
2390− , _sjrStatus = Nothing
2391− , _sjrProjectNumber = Nothing
2392− , _sjrPageToken = Nothing
2393− , _sjrPageSize = Nothing
2394− , _sjrCreatedBefore = Nothing
2397−-- | If specified, only jobs created on or after this date, given in
2398−-- milliseconds since Unix epoch, will be returned.
2399−sjrCreatedAfter :: Lens' SearchJobsRequest (Maybe Int64)
2401− = lens _sjrCreatedAfter
2402− (\ s a -> s{_sjrCreatedAfter = a})
2404−-- | Only return jobs which have a matching status.
2405−sjrStatus :: Lens' SearchJobsRequest [SearchJobsRequestStatusItem]
2407− = lens _sjrStatus (\ s a -> s{_sjrStatus = a}) .
2411−-- | Required. Only return jobs which belong to this Google Developers
2413−sjrProjectNumber :: Lens' SearchJobsRequest (Maybe Int64)
2415− = lens _sjrProjectNumber
2416− (\ s a -> s{_sjrProjectNumber = a})
2418−-- | The continuation token which is used to page through large result sets.
2419−-- To get the next page of results, set this parameter to the value of the
2420−-- nextPageToken from the previous response.
2421−sjrPageToken :: Lens' SearchJobsRequest (Maybe Text)
2423− = lens _sjrPageToken (\ s a -> s{_sjrPageToken = a})
2425−-- | Specifies the number of results to return in a single page. Defaults to
2426−-- 128. The maximum value is 256.
2427−sjrPageSize :: Lens' SearchJobsRequest (Maybe Int32)
2429− = lens _sjrPageSize (\ s a -> s{_sjrPageSize = a})
2431−-- | If specified, only jobs created prior to this date, given in
2432−-- milliseconds since Unix epoch, will be returned.
2433−sjrCreatedBefore :: Lens' SearchJobsRequest (Maybe Int64)
2435− = lens _sjrCreatedBefore
2436− (\ s a -> s{_sjrCreatedBefore = a})
2438−instance FromJSON SearchJobsRequest where
1874+instance FromJSON StatusDetailsItem where
2439 parseJSON
1875 parseJSON
2440− = withObject "SearchJobsRequest"
1876+ = withObject "StatusDetailsItem"
2441− (\ o ->
1877+ (\ o -> pure StatusDetailsItem)
2442− SearchJobsRequest <$>
2443− (o .:? "createdAfter") <*>
2444− (o .:? "status" .!= mempty)
2445− <*> (o .:? "projectNumber")
2446− <*> (o .:? "pageToken")
2447− <*> (o .:? "pageSize")
2448− <*> (o .:? "createdBefore"))
2450−instance ToJSON SearchJobsRequest where
1879+instance ToJSON StatusDetailsItem where
2451− toJSON SearchJobsRequest{..}
1880+ toJSON = const emptyObject
2454− [("createdAfter" .=) <$> _sjrCreatedAfter,
2455− ("status" .=) <$> _sjrStatus,
2456− ("projectNumber" .=) <$> _sjrProjectNumber,
2457− ("pageToken" .=) <$> _sjrPageToken,
2458− ("pageSize" .=) <$> _sjrPageSize,
2459− ("createdBefore" .=) <$> _sjrCreatedBefore])
2461-- | The call set search response.
1882-- | The call set search response.
@@ -2512,180 +1933,41 @@ instance ToJSON SearchCallSetsResponse where
2512 [("nextPageToken" .=) <$> _scsrNextPageToken,
1933 [("nextPageToken" .=) <$> _scsrNextPageToken,
2513 ("callSets" .=) <$> _scsrCallSets])
1934 ("callSets" .=) <$> _scsrCallSets])
2515−-- | The job creation request.
1936+-- | Request message for \`SetIamPolicy\` method.
2517−-- /See:/ 'experimentalCreateJobRequest' smart constructor.
2518−data ExperimentalCreateJobRequest = ExperimentalCreateJobRequest
2519− { _ecjrGcsOutputPath :: !(Maybe Text)
2520− , _ecjrProjectNumber :: !(Maybe Int64)
2521− , _ecjrAlign :: !(Maybe Bool)
2522− , _ecjrSourceURIs :: !(Maybe [Text])
2523− , _ecjrPairedSourceURIs :: !(Maybe [Text])
2524− , _ecjrCallVariants :: !(Maybe Bool)
2525− } deriving (Eq,Show,Data,Typeable,Generic)
2527−-- | Creates a value of 'ExperimentalCreateJobRequest' with the minimum fields required to make a request.
2529−-- Use one of the following lenses to modify other fields as desired:
2531−-- * 'ecjrGcsOutputPath'
2533−-- * 'ecjrProjectNumber'
2537−-- * 'ecjrSourceURIs'
2539−-- * 'ecjrPairedSourceURIs'
2541−-- * 'ecjrCallVariants'
2542−experimentalCreateJobRequest
2543− :: ExperimentalCreateJobRequest
2544−experimentalCreateJobRequest =
2545− ExperimentalCreateJobRequest
2546− { _ecjrGcsOutputPath = Nothing
2547− , _ecjrProjectNumber = Nothing
2548− , _ecjrAlign = Nothing
2549− , _ecjrSourceURIs = Nothing
2550− , _ecjrPairedSourceURIs = Nothing
2551− , _ecjrCallVariants = Nothing
2554−-- | Specifies where to copy the results of certain pipelines. This should be
2555−-- in the form of gs:\/\/bucket\/path.
2556−ecjrGcsOutputPath :: Lens' ExperimentalCreateJobRequest (Maybe Text)
2558− = lens _ecjrGcsOutputPath
2559− (\ s a -> s{_ecjrGcsOutputPath = a})
2561−-- | Required. The Google Cloud Project ID with which to associate the
2563−ecjrProjectNumber :: Lens' ExperimentalCreateJobRequest (Maybe Int64)
2565− = lens _ecjrProjectNumber
2566− (\ s a -> s{_ecjrProjectNumber = a})
2568−-- | Specifies whether or not to run the alignment pipeline. Either align or
2569−-- callVariants must be set.
2570−ecjrAlign :: Lens' ExperimentalCreateJobRequest (Maybe Bool)
2572− = lens _ecjrAlign (\ s a -> s{_ecjrAlign = a})
2574−-- | A list of Google Cloud Storage URIs of data files to operate upon. These
2575−-- can be .bam, interleaved .fastq, or paired .fastq. If specifying paired
2576−-- .fastq files, the first of each pair of files should be listed here, and
2577−-- the second of each pair should be listed in pairedSourceUris.
2578−ecjrSourceURIs :: Lens' ExperimentalCreateJobRequest [Text]
2580− = lens _ecjrSourceURIs
2581− (\ s a -> s{_ecjrSourceURIs = a})
2585−-- | A list of Google Cloud Storage URIs of paired end .fastq files to
2586−-- operate upon. If specified, this represents the second file of each
2587−-- paired .fastq file. The first file of each pair should be specified in
2589−ecjrPairedSourceURIs :: Lens' ExperimentalCreateJobRequest [Text]
2590−ecjrPairedSourceURIs
2591− = lens _ecjrPairedSourceURIs
2592− (\ s a -> s{_ecjrPairedSourceURIs = a})
2596−-- | Specifies whether or not to run the variant calling pipeline. Either
2597−-- align or callVariants must be set.
2598−ecjrCallVariants :: Lens' ExperimentalCreateJobRequest (Maybe Bool)
2600− = lens _ecjrCallVariants
2601− (\ s a -> s{_ecjrCallVariants = a})
2603−instance FromJSON ExperimentalCreateJobRequest where
2605− = withObject "ExperimentalCreateJobRequest"
2607− ExperimentalCreateJobRequest <$>
2608− (o .:? "gcsOutputPath") <*> (o .:? "projectNumber")
2609− <*> (o .:? "align")
2610− <*> (o .:? "sourceUris" .!= mempty)
2611− <*> (o .:? "pairedSourceUris" .!= mempty)
2612− <*> (o .:? "callVariants"))
2614−instance ToJSON ExperimentalCreateJobRequest where
2615− toJSON ExperimentalCreateJobRequest{..}
2618− [("gcsOutputPath" .=) <$> _ecjrGcsOutputPath,
2619− ("projectNumber" .=) <$> _ecjrProjectNumber,
2620− ("align" .=) <$> _ecjrAlign,
2621− ("sourceUris" .=) <$> _ecjrSourceURIs,
2622− ("pairedSourceUris" .=) <$> _ecjrPairedSourceURIs,
2623− ("callVariants" .=) <$> _ecjrCallVariants])
2625−-- | A summary representation of the service request that spawned the job.
2627−-- /See:/ 'jobRequest' smart constructor.
1938+-- /See:/ 'setIAMPolicyRequest' smart constructor.
2628−data JobRequest = JobRequest
1939+newtype SetIAMPolicyRequest = SetIAMPolicyRequest
2629− { _jrDestination :: !(Maybe [Text])
1940+ { _siprPolicy :: Maybe Policy
2630− , _jrSource :: !(Maybe [Text])
2631− , _jrType :: !(Maybe JobRequestType)
2632 } deriving (Eq,Show,Data,Typeable,Generic)
1941 } deriving (Eq,Show,Data,Typeable,Generic)
2634−-- | Creates a value of 'JobRequest' with the minimum fields required to make a request.
1943+-- | Creates a value of 'SetIAMPolicyRequest' with the minimum fields required to make a request.
2636-- Use one of the following lenses to modify other fields as desired:
1945-- Use one of the following lenses to modify other fields as desired:
2638−-- * 'jrDestination'
1947+-- * 'siprPolicy'
2639−--
1948+setIAMPolicyRequest
2640−-- * 'jrSource'
1949+ :: SetIAMPolicyRequest
2641−--
1950+setIAMPolicyRequest =
2642−-- * 'jrType'
1951+ SetIAMPolicyRequest
2647− { _jrDestination = Nothing
2648− , _jrSource = Nothing
2649− , _jrType = Nothing
1952+ { _siprPolicy = Nothing
2652−-- | The data destination of the request, for example, a Google BigQuery
1955+-- | REQUIRED: The complete policy to be applied to the \`resource\`. The
2653−-- Table or Dataset ID.
1956+-- size of the policy is limited to a few 10s of KB. An empty policy is a
2654−jrDestination :: Lens' JobRequest [Text]
1957+-- valid policy but certain Cloud Platform services (such as Projects)
2655−jrDestination
1958+-- might reject them.
2656− = lens _jrDestination
1959+siprPolicy :: Lens' SetIAMPolicyRequest (Maybe Policy)
2657− (\ s a -> s{_jrDestination = a})
1960+siprPolicy
2658− . _Default
1961+ = lens _siprPolicy (\ s a -> s{_siprPolicy = a})
2661−-- | The data source of the request, for example, a Google Cloud Storage
2662−-- object path or Readset ID.
2663−jrSource :: Lens' JobRequest [Text]
2665− = lens _jrSource (\ s a -> s{_jrSource = a}) .
2669−-- | The original request type.
2670−jrType :: Lens' JobRequest (Maybe JobRequestType)
2671−jrType = lens _jrType (\ s a -> s{_jrType = a})
2673−instance FromJSON JobRequest where
1963+instance FromJSON SetIAMPolicyRequest where
2674 parseJSON
1964 parseJSON
2675− = withObject "JobRequest"
1965+ = withObject "SetIAMPolicyRequest"
2676− (\ o ->
1966+ (\ o -> SetIAMPolicyRequest <$> (o .:? "policy"))
2678− (o .:? "destination" .!= mempty) <*>
2679− (o .:? "source" .!= mempty)
2680− <*> (o .:? "type"))
2682−instance ToJSON JobRequest where
1968+instance ToJSON SetIAMPolicyRequest where
2683− toJSON JobRequest{..}
1969+ toJSON SetIAMPolicyRequest{..}
2685− (catMaybes
1970+ = object (catMaybes [("policy" .=) <$> _siprPolicy])
2686− [("destination" .=) <$> _jrDestination,
2687− ("source" .=) <$> _jrSource,
2688− ("type" .=) <$> _jrType])
2690-- | The read search request.
1972-- | The read search request.
@@ -2731,13 +2013,13 @@ searchReadsRequest =
2733-- | The start position of the range on the reference, 0-based inclusive. If
2015-- | The start position of the range on the reference, 0-based inclusive. If
2734−-- specified, referenceName must also be specified.
2016+-- specified, \`referenceName\` must also be specified.
2735srrStart :: Lens' SearchReadsRequest (Maybe Int64)
2017srrStart :: Lens' SearchReadsRequest (Maybe Int64)
2736srrStart = lens _srrStart (\ s a -> s{_srrStart = a})
2018srrStart = lens _srrStart (\ s a -> s{_srrStart = a})
2738-- | The IDs of the read groups within which to search for reads. All
2020-- | The IDs of the read groups within which to search for reads. All
2739-- specified read groups must belong to the same read group sets. Must
2021-- specified read groups must belong to the same read group sets. Must
2740−-- specify one of readGroupSetIds or readGroupIds.
2022+-- specify one of \`readGroupSetIds\` or \`readGroupIds\`.
2741srrReadGroupIds :: Lens' SearchReadsRequest [Text]
2023srrReadGroupIds :: Lens' SearchReadsRequest [Text]
2742srrReadGroupIds
2024srrReadGroupIds
2743 = lens _srrReadGroupIds
2025 = lens _srrReadGroupIds
@@ -2745,21 +2027,21 @@ srrReadGroupIds
2745 . _Default
2027 . _Default
2746 . _Coerce
2028 . _Coerce
2748−-- | The reference sequence name, for example chr1, 1, or chrX. If set to *,
2030+-- | The reference sequence name, for example \`chr1\`, \`1\`, or \`chrX\`.
2749−-- only unmapped reads are returned.
2031+-- If set to *, only unmapped reads are returned.
2750srrReferenceName :: Lens' SearchReadsRequest (Maybe Text)
2032srrReferenceName :: Lens' SearchReadsRequest (Maybe Text)
2751srrReferenceName
2033srrReferenceName
2752 = lens _srrReferenceName
2034 = lens _srrReferenceName
2753 (\ s a -> s{_srrReferenceName = a})
2035 (\ s a -> s{_srrReferenceName = a})
2755-- | The end position of the range on the reference, 0-based exclusive. If
2037-- | The end position of the range on the reference, 0-based exclusive. If
2756−-- specified, referenceName must also be specified.
2038+-- specified, \`referenceName\` must also be specified.
2757srrEnd :: Lens' SearchReadsRequest (Maybe Int64)
2039srrEnd :: Lens' SearchReadsRequest (Maybe Int64)
2758srrEnd = lens _srrEnd (\ s a -> s{_srrEnd = a})
2040srrEnd = lens _srrEnd (\ s a -> s{_srrEnd = a})
2760-- | The continuation token, which is used to page through large result sets.
2042-- | The continuation token, which is used to page through large result sets.
2761-- To get the next page of results, set this parameter to the value of
2043-- To get the next page of results, set this parameter to the value of
2762−-- nextPageToken from the previous response.
2044+-- \`nextPageToken\` from the previous response.
2763srrPageToken :: Lens' SearchReadsRequest (Maybe Text)
2045srrPageToken :: Lens' SearchReadsRequest (Maybe Text)
2764srrPageToken
2046srrPageToken
2765 = lens _srrPageToken (\ s a -> s{_srrPageToken = a})
2047 = lens _srrPageToken (\ s a -> s{_srrPageToken = a})
@@ -2773,7 +2055,7 @@ srrPageSize
2773-- | The IDs of the read groups sets within which to search for reads. All
2055-- | The IDs of the read groups sets within which to search for reads. All
2774-- specified read group sets must be aligned against a common set of
2056-- specified read group sets must be aligned against a common set of
2775-- reference sequences; this defines the genomic coordinates for the query.
2057-- reference sequences; this defines the genomic coordinates for the query.
2776−-- Must specify one of readGroupSetIds or readGroupIds.
2058+-- Must specify one of \`readGroupSetIds\` or \`readGroupIds\`.
2777srrReadGroupSetIds :: Lens' SearchReadsRequest [Text]
2059srrReadGroupSetIds :: Lens' SearchReadsRequest [Text]
2778srrReadGroupSetIds
2060srrReadGroupSetIds
2779 = lens _srrReadGroupSetIds
2061 = lens _srrReadGroupSetIds
@@ -2805,7 +2087,32 @@ instance ToJSON SearchReadsRequest where
2805 ("pageSize" .=) <$> _srrPageSize,
2087 ("pageSize" .=) <$> _srrPageSize,
2806 ("readGroupSetIds" .=) <$> _srrReadGroupSetIds])
2088 ("readGroupSetIds" .=) <$> _srrReadGroupSetIds])
2090+-- | The original request that started the operation. Note that this will be
2091+-- in current version of the API. If the operation was started with v1beta2
2092+-- API and a GetOperation is performed on v1 API, a v1 request will be
2095+-- /See:/ 'operationMetadataRequest' smart constructor.
2096+data OperationMetadataRequest =
2097+ OperationMetadataRequest
2098+ deriving (Eq,Show,Data,Typeable,Generic)
2100+-- | Creates a value of 'OperationMetadataRequest' with the minimum fields required to make a request.
2102+operationMetadataRequest
2103+ :: OperationMetadataRequest
2104+operationMetadataRequest = OperationMetadataRequest
2106+instance FromJSON OperationMetadataRequest where
2108+ = withObject "OperationMetadataRequest"
2109+ (\ o -> pure OperationMetadataRequest)
2111+instance ToJSON OperationMetadataRequest where
2112+ toJSON = const emptyObject
2114+-- | A map of additional variant information. This must be of the form map
2808−-- | A string which maps to an array of values.
2115+-- (string key mapping to a list of string values).
2810-- /See:/ 'variantInfo' smart constructor.
2117-- /See:/ 'variantInfo' smart constructor.
2811data VariantInfo =
2118data VariantInfo =
@@ -2825,6 +2132,82 @@ instance FromJSON VariantInfo where
2825instance ToJSON VariantInfo where
2132instance ToJSON VariantInfo where
2826 toJSON = const emptyObject
2133 toJSON = const emptyObject
2136+-- /See:/ 'experiment' smart constructor.
2137+data Experiment = Experiment
2138+ { _eInstrumentModel :: !(Maybe Text)
2139+ , _ePlatformUnit :: !(Maybe Text)
2140+ , _eSequencingCenter :: !(Maybe Text)
2141+ , _eLibraryId :: !(Maybe Text)
2142+ } deriving (Eq,Show,Data,Typeable,Generic)
2144+-- | Creates a value of 'Experiment' with the minimum fields required to make a request.
2146+-- Use one of the following lenses to modify other fields as desired:
2148+-- * 'eInstrumentModel'
2150+-- * 'ePlatformUnit'
2152+-- * 'eSequencingCenter'
2159+ { _eInstrumentModel = Nothing
2160+ , _ePlatformUnit = Nothing
2161+ , _eSequencingCenter = Nothing
2162+ , _eLibraryId = Nothing
2165+-- | The instrument model used as part of this experiment. This maps to
2166+-- sequencing technology in BAM.
2167+eInstrumentModel :: Lens' Experiment (Maybe Text)
2169+ = lens _eInstrumentModel
2170+ (\ s a -> s{_eInstrumentModel = a})
2172+-- | The platform unit used as part of this experiment e.g.
2173+-- flowcell-barcode.lane for Illumina or slide for SOLiD. Corresponds to
2174+-- the \'RG PU field in the SAM spec.
2175+ePlatformUnit :: Lens' Experiment (Maybe Text)
2177+ = lens _ePlatformUnit
2178+ (\ s a -> s{_ePlatformUnit = a})
2180+-- | The sequencing center used as part of this experiment.
2181+eSequencingCenter :: Lens' Experiment (Maybe Text)
2183+ = lens _eSequencingCenter
2184+ (\ s a -> s{_eSequencingCenter = a})
2186+-- | The library used as part of this experiment. Note: This is not an actual
2187+-- ID within this repository, but rather an identifier for a library which
2188+-- may be meaningful to some external system.
2189+eLibraryId :: Lens' Experiment (Maybe Text)
2191+ = lens _eLibraryId (\ s a -> s{_eLibraryId = a})
2193+instance FromJSON Experiment where
2195+ = withObject "Experiment"
2198+ (o .:? "instrumentModel") <*> (o .:? "platformUnit")
2199+ <*> (o .:? "sequencingCenter")
2200+ <*> (o .:? "libraryId"))
2202+instance ToJSON Experiment where
2203+ toJSON Experiment{..}
2206+ [("instrumentModel" .=) <$> _eInstrumentModel,
2207+ ("platformUnit" .=) <$> _ePlatformUnit,
2208+ ("sequencingCenter" .=) <$> _eSequencingCenter,
2209+ ("libraryId" .=) <$> _eLibraryId])
2828-- | The search variant sets request.
2211-- | The search variant sets request.
2830-- /See:/ 'searchVariantSetsRequest' smart constructor.
2213-- /See:/ 'searchVariantSetsRequest' smart constructor.
@@ -2863,7 +2246,7 @@ svsrDatasetIds
2864-- | The continuation token, which is used to page through large result sets.
2247-- | The continuation token, which is used to page through large result sets.
2865-- To get the next page of results, set this parameter to the value of
2248-- To get the next page of results, set this parameter to the value of
2866−-- nextPageToken from the previous response.
2249+-- \`nextPageToken\` from the previous response.
2867svsrPageToken :: Lens' SearchVariantSetsRequest (Maybe Text)
2250svsrPageToken :: Lens' SearchVariantSetsRequest (Maybe Text)
2868svsrPageToken
2251svsrPageToken
2869 = lens _svsrPageToken
2252 = lens _svsrPageToken
@@ -2891,409 +2274,35 @@ instance ToJSON SearchVariantSetsRequest where
2891 ("pageToken" .=) <$> _svsrPageToken,
2274 ("pageToken" .=) <$> _svsrPageToken,
2892 ("pageSize" .=) <$> _svsrPageSize])
2275 ("pageSize" .=) <$> _svsrPageSize])
2277+-- | The variant search response.
2895−-- /See:/ 'readGroupProgram' smart constructor.
2279+-- /See:/ 'searchVariantsResponse' smart constructor.
2896−data ReadGroupProgram = ReadGroupProgram
2280+data SearchVariantsResponse = SearchVariantsResponse
2897− { _rgpPrevProgramId :: !(Maybe Text)
2281+ { _svrVariants :: !(Maybe [Variant])
2898− , _rgpName :: !(Maybe Text)
2282+ , _svrNextPageToken :: !(Maybe Text)
2899− , _rgpVersion :: !(Maybe Text)
2900− , _rgpId :: !(Maybe Text)
2901− , _rgpCommandLine :: !(Maybe Text)
2902 } deriving (Eq,Show,Data,Typeable,Generic)
2283 } deriving (Eq,Show,Data,Typeable,Generic)
2904−-- | Creates a value of 'ReadGroupProgram' with the minimum fields required to make a request.
2285+-- | Creates a value of 'SearchVariantsResponse' with the minimum fields required to make a request.
2906-- Use one of the following lenses to modify other fields as desired:
2287-- Use one of the following lenses to modify other fields as desired:
2908−-- * 'rgpPrevProgramId'
2289+-- * 'svrVariants'
2916−-- * 'rgpCommandLine'
2291+-- * 'svrNextPageToken'
2917−readGroupProgram
2292+searchVariantsResponse
2918− :: ReadGroupProgram
2293+ :: SearchVariantsResponse
2919−readGroupProgram =
2294+searchVariantsResponse =
2920− ReadGroupProgram
2295+ SearchVariantsResponse
2921− { _rgpPrevProgramId = Nothing
2922− , _rgpName = Nothing
2923− , _rgpVersion = Nothing
2924− , _rgpId = Nothing
2296+ { _svrVariants = Nothing
2925− , _rgpCommandLine = Nothing
2297+ , _svrNextPageToken = Nothing
2928−-- | The ID of the program run before this one.
2929−rgpPrevProgramId :: Lens' ReadGroupProgram (Maybe Text)
2931− = lens _rgpPrevProgramId
2932− (\ s a -> s{_rgpPrevProgramId = a})
2934−-- | The name of the program.
2935−rgpName :: Lens' ReadGroupProgram (Maybe Text)
2936−rgpName = lens _rgpName (\ s a -> s{_rgpName = a})
2938−-- | The version of the program run.
2939−rgpVersion :: Lens' ReadGroupProgram (Maybe Text)
2941− = lens _rgpVersion (\ s a -> s{_rgpVersion = a})
2943−-- | The user specified locally unique ID of the program. Used along with
2944−-- prevProgramId to define an ordering between programs.
2945−rgpId :: Lens' ReadGroupProgram (Maybe Text)
2946−rgpId = lens _rgpId (\ s a -> s{_rgpId = a})
2948−-- | The command line used to run this program.
2949−rgpCommandLine :: Lens' ReadGroupProgram (Maybe Text)
2951− = lens _rgpCommandLine
2952− (\ s a -> s{_rgpCommandLine = a})
2954−instance FromJSON ReadGroupProgram where
2956− = withObject "ReadGroupProgram"
2958− ReadGroupProgram <$>
2959− (o .:? "prevProgramId") <*> (o .:? "name") <*>
2962− <*> (o .:? "commandLine"))
2964−instance ToJSON ReadGroupProgram where
2965− toJSON ReadGroupProgram{..}
2968− [("prevProgramId" .=) <$> _rgpPrevProgramId,
2969− ("name" .=) <$> _rgpName,
2970− ("version" .=) <$> _rgpVersion, ("id" .=) <$> _rgpId,
2971− ("commandLine" .=) <$> _rgpCommandLine])
2973−-- | Wrapper message for \`int32\`. The JSON representation for
2974−-- \`Int32Value\` is JSON number.
2976−-- /See:/ 'int32Value' smart constructor.
2977−newtype Int32Value = Int32Value
2978− { _ivValue :: Maybe Int32
2979− } deriving (Eq,Show,Data,Typeable,Generic)
2981−-- | Creates a value of 'Int32Value' with the minimum fields required to make a request.
2983−-- Use one of the following lenses to modify other fields as desired:
2990− { _ivValue = Nothing
2993−-- | The int32 value.
2994−ivValue :: Lens' Int32Value (Maybe Int32)
2995−ivValue = lens _ivValue (\ s a -> s{_ivValue = a})
2997−instance FromJSON Int32Value where
2999− = withObject "Int32Value"
3000− (\ o -> Int32Value <$> (o .:? "value"))
3002−instance ToJSON Int32Value where
3003− toJSON Int32Value{..}
3004− = object (catMaybes [("value" .=) <$> _ivValue])
3006−-- | A string which maps to an array of values.
3008−-- /See:/ 'annotationInfo' smart constructor.
3009−data AnnotationInfo =
3011− deriving (Eq,Show,Data,Typeable,Generic)
3013−-- | Creates a value of 'AnnotationInfo' with the minimum fields required to make a request.
3017−annotationInfo = AnnotationInfo
3019−instance FromJSON AnnotationInfo where
3021− = withObject "AnnotationInfo"
3022− (\ o -> pure AnnotationInfo)
3024−instance ToJSON AnnotationInfo where
3025− toJSON = const emptyObject
3027−-- | The read group set export request.
3029−-- /See:/ 'exportReadGroupSetsRequest' smart constructor.
3030−data ExportReadGroupSetsRequest = ExportReadGroupSetsRequest
3031− { _ergsrReferenceNames :: !(Maybe [Text])
3032− , _ergsrProjectNumber :: !(Maybe Int64)
3033− , _ergsrExportURI :: !(Maybe Text)
3034− , _ergsrReadGroupSetIds :: !(Maybe [Text])
3035− } deriving (Eq,Show,Data,Typeable,Generic)
3037−-- | Creates a value of 'ExportReadGroupSetsRequest' with the minimum fields required to make a request.
3039−-- Use one of the following lenses to modify other fields as desired:
3041−-- * 'ergsrReferenceNames'
3043−-- * 'ergsrProjectNumber'
3045−-- * 'ergsrExportURI'
3047−-- * 'ergsrReadGroupSetIds'
3048−exportReadGroupSetsRequest
3049− :: ExportReadGroupSetsRequest
3050−exportReadGroupSetsRequest =
3051− ExportReadGroupSetsRequest
3052− { _ergsrReferenceNames = Nothing
3053− , _ergsrProjectNumber = Nothing
3054− , _ergsrExportURI = Nothing
3055− , _ergsrReadGroupSetIds = Nothing
3058−-- | The reference names to export. If this is not specified, all reference
3059−-- sequences, including unmapped reads, are exported. Use * to export only
3061−ergsrReferenceNames :: Lens' ExportReadGroupSetsRequest [Text]
3063− = lens _ergsrReferenceNames
3064− (\ s a -> s{_ergsrReferenceNames = a})
3068−-- | Required. The Google Developers Console project number that owns this
3070−ergsrProjectNumber :: Lens' ExportReadGroupSetsRequest (Maybe Int64)
3072− = lens _ergsrProjectNumber
3073− (\ s a -> s{_ergsrProjectNumber = a})
3075−-- | Required. A Google Cloud Storage URI for the exported BAM file. The
3076−-- currently authenticated user must have write access to the new file. An
3077−-- error will be returned if the URI already contains data.
3078−ergsrExportURI :: Lens' ExportReadGroupSetsRequest (Maybe Text)
3080− = lens _ergsrExportURI
3081− (\ s a -> s{_ergsrExportURI = a})
3083−-- | Required. The IDs of the read group sets to export.
3084−ergsrReadGroupSetIds :: Lens' ExportReadGroupSetsRequest [Text]
3085−ergsrReadGroupSetIds
3086− = lens _ergsrReadGroupSetIds
3087− (\ s a -> s{_ergsrReadGroupSetIds = a})
3091−instance FromJSON ExportReadGroupSetsRequest where
3093− = withObject "ExportReadGroupSetsRequest"
3095− ExportReadGroupSetsRequest <$>
3096− (o .:? "referenceNames" .!= mempty) <*>
3097− (o .:? "projectNumber")
3098− <*> (o .:? "exportUri")
3099− <*> (o .:? "readGroupSetIds" .!= mempty))
3101−instance ToJSON ExportReadGroupSetsRequest where
3102− toJSON ExportReadGroupSetsRequest{..}
3105− [("referenceNames" .=) <$> _ergsrReferenceNames,
3106− ("projectNumber" .=) <$> _ergsrProjectNumber,
3107− ("exportUri" .=) <$> _ergsrExportURI,
3108− ("readGroupSetIds" .=) <$> _ergsrReadGroupSetIds])
3111−-- /See:/ 'searchAnnotationsResponse' smart constructor.
3112−data SearchAnnotationsResponse = SearchAnnotationsResponse
3113− { _sarAnnotations :: !(Maybe [Annotation])
3114− , _sarNextPageToken :: !(Maybe Text)
3115− } deriving (Eq,Show,Data,Typeable,Generic)
3117−-- | Creates a value of 'SearchAnnotationsResponse' with the minimum fields required to make a request.
3119−-- Use one of the following lenses to modify other fields as desired:
3121−-- * 'sarAnnotations'
3123−-- * 'sarNextPageToken'
3124−searchAnnotationsResponse
3125− :: SearchAnnotationsResponse
3126−searchAnnotationsResponse =
3127− SearchAnnotationsResponse
3128− { _sarAnnotations = Nothing
3129− , _sarNextPageToken = Nothing
3132−-- | The matching annotations.
3133−sarAnnotations :: Lens' SearchAnnotationsResponse [Annotation]
3135− = lens _sarAnnotations
3136− (\ s a -> s{_sarAnnotations = a})
3140−-- | The continuation token, which is used to page through large result sets.
3141−-- Provide this value in a subsequent request to return the next page of
3142−-- results. This field will be empty if there aren\'t any additional
3144−sarNextPageToken :: Lens' SearchAnnotationsResponse (Maybe Text)
3146− = lens _sarNextPageToken
3147− (\ s a -> s{_sarNextPageToken = a})
3149−instance FromJSON SearchAnnotationsResponse where
3151− = withObject "SearchAnnotationsResponse"
3153− SearchAnnotationsResponse <$>
3154− (o .:? "annotations" .!= mempty) <*>
3155− (o .:? "nextPageToken"))
3157−instance ToJSON SearchAnnotationsResponse where
3158− toJSON SearchAnnotationsResponse{..}
3161− [("annotations" .=) <$> _sarAnnotations,
3162− ("nextPageToken" .=) <$> _sarNextPageToken])
3165−-- /See:/ 'searchAnnotationSetsRequest' smart constructor.
3166−data SearchAnnotationSetsRequest = SearchAnnotationSetsRequest
3167− { _sasrReferenceSetId :: !(Maybe Text)
3168− , _sasrTypes :: !(Maybe [SearchAnnotationSetsRequestTypesItem])
3169− , _sasrDatasetIds :: !(Maybe [Text])
3170− , _sasrName :: !(Maybe Text)
3171− , _sasrPageToken :: !(Maybe Text)
3172− , _sasrPageSize :: !(Maybe Int32)
3173− } deriving (Eq,Show,Data,Typeable,Generic)
3175−-- | Creates a value of 'SearchAnnotationSetsRequest' with the minimum fields required to make a request.
3177−-- Use one of the following lenses to modify other fields as desired:
3179−-- * 'sasrReferenceSetId'
3183−-- * 'sasrDatasetIds'
3187−-- * 'sasrPageToken'
3190−searchAnnotationSetsRequest
3191− :: SearchAnnotationSetsRequest
3192−searchAnnotationSetsRequest =
3193− SearchAnnotationSetsRequest
3194− { _sasrReferenceSetId = Nothing
3195− , _sasrTypes = Nothing
3196− , _sasrDatasetIds = Nothing
3197− , _sasrName = Nothing
3198− , _sasrPageToken = Nothing
3199− , _sasrPageSize = Nothing
3202−-- | If specified, only annotation sets associated with the given reference
3203−-- set are returned.
3204−sasrReferenceSetId :: Lens' SearchAnnotationSetsRequest (Maybe Text)
3206− = lens _sasrReferenceSetId
3207− (\ s a -> s{_sasrReferenceSetId = a})
3209−-- | If specified, only annotation sets that have any of these types are
3211−sasrTypes :: Lens' SearchAnnotationSetsRequest [SearchAnnotationSetsRequestTypesItem]
3213− = lens _sasrTypes (\ s a -> s{_sasrTypes = a}) .
3217−-- | The dataset IDs to search within. Caller must have READ access to these
3219−sasrDatasetIds :: Lens' SearchAnnotationSetsRequest [Text]
3221− = lens _sasrDatasetIds
3222− (\ s a -> s{_sasrDatasetIds = a})
3226−-- | Only return annotations sets for which a substring of the name matches
3227−-- this string (case insensitive).
3228−sasrName :: Lens' SearchAnnotationSetsRequest (Maybe Text)
3229−sasrName = lens _sasrName (\ s a -> s{_sasrName = a})
3231−-- | The continuation token, which is used to page through large result sets.
3232−-- To get the next page of results, set this parameter to the value of
3233−-- nextPageToken from the previous response.
3234−sasrPageToken :: Lens' SearchAnnotationSetsRequest (Maybe Text)
3236− = lens _sasrPageToken
3237− (\ s a -> s{_sasrPageToken = a})
3239−-- | Specifies number of results to return in a single page. If unspecified,
3240−-- it will default to 128. The maximum value is 1024.
3241−sasrPageSize :: Lens' SearchAnnotationSetsRequest (Maybe Int32)
3243− = lens _sasrPageSize (\ s a -> s{_sasrPageSize = a})
3245−instance FromJSON SearchAnnotationSetsRequest where
3247− = withObject "SearchAnnotationSetsRequest"
3249− SearchAnnotationSetsRequest <$>
3250− (o .:? "referenceSetId") <*>
3251− (o .:? "types" .!= mempty)
3252− <*> (o .:? "datasetIds" .!= mempty)
3254− <*> (o .:? "pageToken")
3255− <*> (o .:? "pageSize"))
3257−instance ToJSON SearchAnnotationSetsRequest where
3258− toJSON SearchAnnotationSetsRequest{..}
3261− [("referenceSetId" .=) <$> _sasrReferenceSetId,
3262− ("types" .=) <$> _sasrTypes,
3263− ("datasetIds" .=) <$> _sasrDatasetIds,
3264− ("name" .=) <$> _sasrName,
3265− ("pageToken" .=) <$> _sasrPageToken,
3266− ("pageSize" .=) <$> _sasrPageSize])
3268−-- | The variant search response.
3270−-- /See:/ 'searchVariantsResponse' smart constructor.
3271−data SearchVariantsResponse = SearchVariantsResponse
3272− { _svrVariants :: !(Maybe [Variant])
3273− , _svrNextPageToken :: !(Maybe Text)
3274− } deriving (Eq,Show,Data,Typeable,Generic)
3276−-- | Creates a value of 'SearchVariantsResponse' with the minimum fields required to make a request.
3278−-- Use one of the following lenses to modify other fields as desired:
3282−-- * 'svrNextPageToken'
3283−searchVariantsResponse
3284− :: SearchVariantsResponse
3285−searchVariantsResponse =
3286− SearchVariantsResponse
3287− { _svrVariants = Nothing
3288− , _svrNextPageToken = Nothing
3291−-- | The list of matching Variants.
2300+-- | The list of matching Variants.
3292−svrVariants :: Lens' SearchVariantsResponse [Variant]
2301+svrVariants :: Lens' SearchVariantsResponse [Variant]
3293−svrVariants
2302+svrVariants
3294− = lens _svrVariants (\ s a -> s{_svrVariants = a}) .
2303+ = lens _svrVariants (\ s a -> s{_svrVariants = a}) .
3295− _Default
2304+ _Default
3296− . _Coerce
2305+ . _Coerce
3298-- | The continuation token, which is used to page through large result sets.
2307-- | The continuation token, which is used to page through large result sets.
3299-- Provide this value in a subsequent request to return the next page of
2308-- Provide this value in a subsequent request to return the next page of
@@ -3319,40 +2328,6 @@ instance ToJSON SearchVariantsResponse where
3319 [("variants" .=) <$> _svrVariants,
2328 [("variants" .=) <$> _svrVariants,
3320 ("nextPageToken" .=) <$> _svrNextPageToken])
2329 ("nextPageToken" .=) <$> _svrNextPageToken])
3322−-- | The job creation response.
3324−-- /See:/ 'experimentalCreateJobResponse' smart constructor.
3325−newtype ExperimentalCreateJobResponse = ExperimentalCreateJobResponse
3326− { _ecjrJobId :: Maybe Text
3327− } deriving (Eq,Show,Data,Typeable,Generic)
3329−-- | Creates a value of 'ExperimentalCreateJobResponse' with the minimum fields required to make a request.
3331−-- Use one of the following lenses to modify other fields as desired:
3334−experimentalCreateJobResponse
3335− :: ExperimentalCreateJobResponse
3336−experimentalCreateJobResponse =
3337− ExperimentalCreateJobResponse
3338− { _ecjrJobId = Nothing
3341−-- | A job ID that can be used to get status information.
3342−ecjrJobId :: Lens' ExperimentalCreateJobResponse (Maybe Text)
3344− = lens _ecjrJobId (\ s a -> s{_ecjrJobId = a})
3346−instance FromJSON ExperimentalCreateJobResponse where
3348− = withObject "ExperimentalCreateJobResponse"
3350− ExperimentalCreateJobResponse <$> (o .:? "jobId"))
3352−instance ToJSON ExperimentalCreateJobResponse where
3353− toJSON ExperimentalCreateJobResponse{..}
3354− = object (catMaybes [("jobId" .=) <$> _ecjrJobId])
3356-- | The call set search request.
2331-- | The call set search request.
3358-- /See:/ 'searchCallSetsRequest' smart constructor.
2333-- /See:/ 'searchCallSetsRequest' smart constructor.
@@ -3391,7 +2366,7 @@ scsrName = lens _scsrName (\ s a -> s{_scsrName = a})
3392-- | The continuation token, which is used to page through large result sets.
2367-- | The continuation token, which is used to page through large result sets.
3393-- To get the next page of results, set this parameter to the value of
2368-- To get the next page of results, set this parameter to the value of
3394−-- nextPageToken from the previous response.
2369+-- \`nextPageToken\` from the previous response.
3395scsrPageToken :: Lens' SearchCallSetsRequest (Maybe Text)
2370scsrPageToken :: Lens' SearchCallSetsRequest (Maybe Text)
3396scsrPageToken
2371scsrPageToken
3397 = lens _scsrPageToken
2372 = lens _scsrPageToken
@@ -3487,83 +2462,83 @@ instance ToJSON SearchReadsResponse where
3487 [("nextPageToken" .=) <$> _sNextPageToken,
2462 [("nextPageToken" .=) <$> _sNextPageToken,
3488 ("alignments" .=) <$> _sAlignments])
2463 ("alignments" .=) <$> _sAlignments])
3490−-- | Describes a paired-end FASTQ file source for alignment.
3492−-- /See:/ 'pairedFastqSource' smart constructor.
2466+-- /See:/ 'program' smart constructor.
3493−data PairedFastqSource = PairedFastqSource
2467+data Program = Program
2468+ { _pPrevProgramId :: !(Maybe Text)
3494− { _pfsFirstSourceURIs :: !(Maybe [Text])
2469+ , _pName :: !(Maybe Text)
3495− , _pfsMetadata :: !(Maybe FastqMetadata)
2470+ , _pVersion :: !(Maybe Text)
3496− , _pfsSecondSourceURIs :: !(Maybe [Text])
2471+ , _pId :: !(Maybe Text)
2472+ , _pCommandLine :: !(Maybe Text)
3497 } deriving (Eq,Show,Data,Typeable,Generic)
2473 } deriving (Eq,Show,Data,Typeable,Generic)
3499−-- | Creates a value of 'PairedFastqSource' with the minimum fields required to make a request.
2475+-- | Creates a value of 'Program' with the minimum fields required to make a request.
3501-- Use one of the following lenses to modify other fields as desired:
2477-- Use one of the following lenses to modify other fields as desired:
3503−-- * 'pfsFirstSourceURIs'
2479+-- * 'pPrevProgramId'
3505−-- * 'pfsMetadata'
2481+-- * 'pName'
3507−-- * 'pfsSecondSourceURIs'
2483+-- * 'pVersion'
3508−pairedFastqSource
2484+--
3509− :: PairedFastqSource
2485+-- * 'pId'
3510−pairedFastqSource =
2486+--
3511− PairedFastqSource
2487+-- * 'pCommandLine'
3512− { _pfsFirstSourceURIs = Nothing
2488+program
2492+ { _pPrevProgramId = Nothing
2494+ , _pVersion = Nothing
3513− , _pfsMetadata = Nothing
2495+ , _pId = Nothing
3514− , _pfsSecondSourceURIs = Nothing
2496+ , _pCommandLine = Nothing
3517−-- | A list of URIs pointing at paired end FASTQ files in Google Cloud
2499+-- | The ID of the program run before this one.
3518−-- Storage which will be aligned. The first of each paired file should be
2500+pPrevProgramId :: Lens' Program (Maybe Text)
3519−-- specified here, in an order that matches the second of each paired file
2501+pPrevProgramId
3520−-- specified in secondSourceUris. For example: firstSourceUris:
2502+ = lens _pPrevProgramId
3521−-- [file1_1.fq, file2_1.fq], secondSourceUris: [file1_2.fq, file2_2.fq].
2503+ (\ s a -> s{_pPrevProgramId = a})
3522−-- The caller must have READ permissions for these files.
3523−pfsFirstSourceURIs :: Lens' PairedFastqSource [Text]
3525− = lens _pfsFirstSourceURIs
3526− (\ s a -> s{_pfsFirstSourceURIs = a})
3530−-- | Optionally specifies the metadata to be associated with the final
2505+-- | The name of the program.
3531−-- aligned read group set.
2506+pName :: Lens' Program (Maybe Text)
3532−pfsMetadata :: Lens' PairedFastqSource (Maybe FastqMetadata)
2507+pName = lens _pName (\ s a -> s{_pName = a})
3534− = lens _pfsMetadata (\ s a -> s{_pfsMetadata = a})
2509+-- | The version of the program run.
3535−
2510+pVersion :: Lens' Program (Maybe Text)
3536−-- | A list of URIs pointing at paired end FASTQ files in Google Cloud
2511+pVersion = lens _pVersion (\ s a -> s{_pVersion = a})
3537−-- Storage which will be aligned. The second of each paired file should be
2512+
3538−-- specified here, in an order that matches the first of each paired file
2513+-- | The user specified locally unique ID of the program. Used along with
3539−-- specified in firstSourceUris. For example: firstSourceUris: [file1_1.fq,
2514+-- \`prevProgramId\` to define an ordering between programs.
3540−-- file2_1.fq], secondSourceUris: [file1_2.fq, file2_2.fq]. The caller must
2515+pId :: Lens' Program (Maybe Text)
3541−-- have READ permissions for these files.
2516+pId = lens _pId (\ s a -> s{_pId = a})
3542−pfsSecondSourceURIs :: Lens' PairedFastqSource [Text]
3544− = lens _pfsSecondSourceURIs
3545− (\ s a -> s{_pfsSecondSourceURIs = a})
2518+-- | The command line used to run this program.
2519+pCommandLine :: Lens' Program (Maybe Text)
2521+ = lens _pCommandLine (\ s a -> s{_pCommandLine = a})
3549−instance FromJSON PairedFastqSource where
2523+instance FromJSON Program where
3550 parseJSON
2524 parseJSON
3551− = withObject "PairedFastqSource"
2525+ = withObject "Program"
3553− PairedFastqSource <$>
2527+ Program <$>
3554− (o .:? "firstSourceUris" .!= mempty) <*>
2528+ (o .:? "prevProgramId") <*> (o .:? "name") <*>
3555− (o .:? "metadata")
2529+ (o .:? "version")
3556− <*> (o .:? "secondSourceUris" .!= mempty))
2530+ <*> (o .:? "id")
2531+ <*> (o .:? "commandLine"))
3558−instance ToJSON PairedFastqSource where
2533+instance ToJSON Program where
3559− toJSON PairedFastqSource{..}
2534+ toJSON Program{..}
3560 = object
2535 = object
3561 (catMaybes
2536 (catMaybes
3562− [("firstSourceUris" .=) <$> _pfsFirstSourceURIs,
2537+ [("prevProgramId" .=) <$> _pPrevProgramId,
3563− ("metadata" .=) <$> _pfsMetadata,
2538+ ("name" .=) <$> _pName, ("version" .=) <$> _pVersion,
3564− ("secondSourceUris" .=) <$> _pfsSecondSourceURIs])
2539+ ("id" .=) <$> _pId,
2540+ ("commandLine" .=) <$> _pCommandLine])
3568-- /See:/ 'searchReferencesRequest' smart constructor.
2543-- /See:/ 'searchReferencesRequest' smart constructor.
3569data SearchReferencesRequest = SearchReferencesRequest
2544data SearchReferencesRequest = SearchReferencesRequest
@@ -3604,8 +2579,8 @@ sReferenceSetId
3604 = lens _sReferenceSetId
2579 = lens _sReferenceSetId
3605 (\ s a -> s{_sReferenceSetId = a})
2580 (\ s a -> s{_sReferenceSetId = a})
3607−-- | If present, return references for which the md5checksum matches. See
2582+-- | If present, return references for which the \`md5checksum\` matches. See
3608−-- Reference.md5checksum for construction details.
2583+-- \`Reference.md5checksum\` for construction details.
3609sMD5checksums :: Lens' SearchReferencesRequest [Text]
2584sMD5checksums :: Lens' SearchReferencesRequest [Text]
3610sMD5checksums
2585sMD5checksums
3611 = lens _sMD5checksums
2586 = lens _sMD5checksums
@@ -3614,9 +2589,9 @@ sMD5checksums
3614 . _Coerce
2589 . _Coerce
3616-- | If present, return references for which the accession matches this
2591-- | If present, return references for which the accession matches this
3617−-- string. Best to give a version number, for example GCF_000001405.26. If
2592+-- string. Best to give a version number, for example \`GCF_000001405.26\`.
3618−-- only the main accession number is given then all records with that main
2593+-- If only the main accession number is given then all records with that
3619−-- accession will be returned, whichever version. Note that different
2594+-- main accession will be returned, whichever version. Note that different
3620-- versions will have different sequences.
2595-- versions will have different sequences.
3621sAccessions :: Lens' SearchReferencesRequest [Text]
2596sAccessions :: Lens' SearchReferencesRequest [Text]
3622sAccessions
2597sAccessions
@@ -3626,7 +2601,7 @@ sAccessions
3627-- | The continuation token, which is used to page through large result sets.
2602-- | The continuation token, which is used to page through large result sets.
3628-- To get the next page of results, set this parameter to the value of
2603-- To get the next page of results, set this parameter to the value of
3629−-- nextPageToken from the previous response.
2604+-- \`nextPageToken\` from the previous response.
3630sPageToken :: Lens' SearchReferencesRequest (Maybe Text)
2605sPageToken :: Lens' SearchReferencesRequest (Maybe Text)
3631sPageToken
2606sPageToken
3632 = lens _sPageToken (\ s a -> s{_sPageToken = a})
2607 = lens _sPageToken (\ s a -> s{_sPageToken = a})
@@ -3711,7 +2686,7 @@ instance ToJSON SearchReferenceSetsResponse where
3711 [("nextPageToken" .=) <$> _srsrNextPageToken,
2686 [("nextPageToken" .=) <$> _srsrNextPageToken,
3712 ("referenceSets" .=) <$> _srsrReferenceSets])
2687 ("referenceSets" .=) <$> _srsrReferenceSets])
3714−-- | A 0-based half-open genomic coordinate range over a reference sequence.
2689+-- | A 0-based half-open genomic coordinate range for search requests.
3716-- /See:/ 'range' smart constructor.
2691-- /See:/ 'range' smart constructor.
3717data Range = Range
2692data Range = Range
@@ -3738,19 +2713,17 @@ range =
3738 , _rEnd = Nothing
2713 , _rEnd = Nothing
3741−-- | The start position of the range on the reference, 0-based inclusive. If
2716+-- | The start position of the range on the reference, 0-based inclusive.
3742−-- specified, referenceName must also be specified.
3743rStart :: Lens' Range (Maybe Int64)
2717rStart :: Lens' Range (Maybe Int64)
3744rStart = lens _rStart (\ s a -> s{_rStart = a})
2718rStart = lens _rStart (\ s a -> s{_rStart = a})
3746−-- | The reference sequence name, for example chr1, 1, or chrX.
2720+-- | The reference sequence name, for example \`chr1\`, \`1\`, or \`chrX\`.
3747rReferenceName :: Lens' Range (Maybe Text)
2721rReferenceName :: Lens' Range (Maybe Text)
3748rReferenceName
2722rReferenceName
3749 = lens _rReferenceName
2723 = lens _rReferenceName
3750 (\ s a -> s{_rReferenceName = a})
2724 (\ s a -> s{_rReferenceName = a})
3752−-- | The end position of the range on the reference, 0-based exclusive. If
2726+-- | The end position of the range on the reference, 0-based exclusive.
3753−-- specified, referenceName must also be specified.
3754rEnd :: Lens' Range (Maybe Int64)
2727rEnd :: Lens' Range (Maybe Int64)
3755rEnd = lens _rEnd (\ s a -> s{_rEnd = a})
2728rEnd = lens _rEnd (\ s a -> s{_rEnd = a})
@@ -3773,8 +2746,8 @@ instance ToJSON Range where
3773-- | A read group set is a logical collection of read groups, which are
2746-- | A read group set is a logical collection of read groups, which are
3774-- collections of reads produced by a sequencer. A read group set typically
2747-- collections of reads produced by a sequencer. A read group set typically
3775-- models reads corresponding to one sample, sequenced one way, and aligned
2748-- models reads corresponding to one sample, sequenced one way, and aligned
3776−-- one way. - A read group set belongs to one dataset. - A read group
2749+-- one way. * A read group set belongs to one dataset. * A read group
3777−-- belongs to one read group set. - A read belongs to one read group.
2750+-- belongs to one read group set. * A read belongs to one read group.
3779-- /See:/ 'readGroupSet' smart constructor.
2752-- /See:/ 'readGroupSet' smart constructor.
3780data ReadGroupSet = ReadGroupSet
2753data ReadGroupSet = ReadGroupSet
@@ -3833,11 +2806,11 @@ rgsDatasetId :: Lens' ReadGroupSet (Maybe Text)
3833rgsDatasetId
2806rgsDatasetId
3834 = lens _rgsDatasetId (\ s a -> s{_rgsDatasetId = a})
2807 = lens _rgsDatasetId (\ s a -> s{_rgsDatasetId = a})
3836−-- | The read group set ID.
2809+-- | The server-generated read group set ID, unique for all read group sets.
3837rgsId :: Lens' ReadGroupSet (Maybe Text)
2810rgsId :: Lens' ReadGroupSet (Maybe Text)
3838rgsId = lens _rgsId (\ s a -> s{_rgsId = a})
2811rgsId = lens _rgsId (\ s a -> s{_rgsId = a})
3840−-- | A string which maps to an array of values.
2813+-- | A map of additional read group set information.
3841rgsInfo :: Lens' ReadGroupSet (Maybe ReadGroupSetInfo)
2814rgsInfo :: Lens' ReadGroupSet (Maybe ReadGroupSetInfo)
3842rgsInfo = lens _rgsInfo (\ s a -> s{_rgsInfo = a})
2815rgsInfo = lens _rgsInfo (\ s a -> s{_rgsInfo = a})
@@ -3879,232 +2852,113 @@ instance ToJSON ReadGroupSet where
3879 ("readGroups" .=) <$> _rgsReadGroups,
2852 ("readGroups" .=) <$> _rgsReadGroups,
3880 ("filename" .=) <$> _rgsFilename])
2853 ("filename" .=) <$> _rgsFilename])
3882−-- | A Job represents an ongoing process that can be monitored for status
2855+-- | The read group set export request.
3885−-- /See:/ 'job' smart constructor.
2857+-- /See:/ 'exportReadGroupSetRequest' smart constructor.
3886−data Job = Job
2858+data ExportReadGroupSetRequest = ExportReadGroupSetRequest
3887− { _jDetailedStatus :: !(Maybe Text)
2859+ { _ergsrReferenceNames :: !(Maybe [Text])
3888− , _jStatus :: !(Maybe JobStatus)
3889− , _jCreated :: !(Maybe Int64)
3890− , _jProjectNumber :: !(Maybe Int64)
3891− , _jWarnings :: !(Maybe [Text])
3892− , _jImportedIds :: !(Maybe [Text])
3893− , _jId :: !(Maybe Text)
2860+ , _ergsrExportURI :: !(Maybe Text)
3894− , _jErrors :: !(Maybe [Text])
2861+ , _ergsrProjectId :: !(Maybe Text)
3895− , _jRequest :: !(Maybe JobRequest)
3896 } deriving (Eq,Show,Data,Typeable,Generic)
2862 } deriving (Eq,Show,Data,Typeable,Generic)
3898−-- | Creates a value of 'Job' with the minimum fields required to make a request.
2864+-- | Creates a value of 'ExportReadGroupSetRequest' with the minimum fields required to make a request.
3900-- Use one of the following lenses to modify other fields as desired:
2866-- Use one of the following lenses to modify other fields as desired:
3902−-- * 'jDetailedStatus'
2868+-- * 'ergsrReferenceNames'
3908−-- * 'jProjectNumber'
3916−-- * 'jErrors'
2870+-- * 'ergsrExportURI'
3918−-- * 'jRequest'
2872+-- * 'ergsrProjectId'
3919−job
2873+exportReadGroupSetRequest
3920− :: Job
2874+ :: ExportReadGroupSetRequest
3921−job =
2875+exportReadGroupSetRequest =
3922− Job
2876+ ExportReadGroupSetRequest
3923− { _jDetailedStatus = Nothing
2877+ { _ergsrReferenceNames = Nothing
3924− , _jStatus = Nothing
2878+ , _ergsrExportURI = Nothing
3925− , _jCreated = Nothing
2879+ , _ergsrProjectId = Nothing
3926− , _jProjectNumber = Nothing
3927− , _jWarnings = Nothing
3928− , _jImportedIds = Nothing
3930− , _jErrors = Nothing
3931− , _jRequest = Nothing
3934−-- | A more detailed description of this job\'s current status.
2882+-- | The reference names to export. If this is not specified, all reference
3935−jDetailedStatus :: Lens' Job (Maybe Text)
2883+-- sequences, including unmapped reads, are exported. Use \`*\` to export
3936−jDetailedStatus
2884+-- only unmapped reads.
3937− = lens _jDetailedStatus
2885+ergsrReferenceNames :: Lens' ExportReadGroupSetRequest [Text]
3938− (\ s a -> s{_jDetailedStatus = a})
2886+ergsrReferenceNames
3939−
2887+ = lens _ergsrReferenceNames
3940−-- | The status of this job.
2888+ (\ s a -> s{_ergsrReferenceNames = a})
3941−jStatus :: Lens' Job (Maybe JobStatus)
3942−jStatus = lens _jStatus (\ s a -> s{_jStatus = a})
3944−-- | The date this job was created, in milliseconds from the epoch.
3945−jCreated :: Lens' Job (Maybe Int64)
3946−jCreated = lens _jCreated (\ s a -> s{_jCreated = a})
3948−-- | The Google Developers Console project number to which this job belongs.
3949−jProjectNumber :: Lens' Job (Maybe Int64)
3951− = lens _jProjectNumber
3952− (\ s a -> s{_jProjectNumber = a})
3954−-- | Any warnings that occurred during processing.
3955−jWarnings :: Lens' Job [Text]
3957− = lens _jWarnings (\ s a -> s{_jWarnings = a}) .
3961−-- | If this Job represents an import, this field will contain the IDs of the
3962−-- objects that were successfully imported.
3963−jImportedIds :: Lens' Job [Text]
3965− = lens _jImportedIds (\ s a -> s{_jImportedIds = a})
3966 . _Default
2889 . _Default
3967 . _Coerce
2890 . _Coerce
3969−-- | The job ID.
2892+-- | Required. A Google Cloud Storage URI for the exported BAM file. The
3970−jId :: Lens' Job (Maybe Text)
2893+-- currently authenticated user must have write access to the new file. An
3971−jId = lens _jId (\ s a -> s{_jId = a})
2894+-- error will be returned if the URI already contains data.
3972−
2895+ergsrExportURI :: Lens' ExportReadGroupSetRequest (Maybe Text)
3973−-- | Any errors that occurred during processing.
2896+ergsrExportURI
3974−jErrors :: Lens' Job [Text]
2897+ = lens _ergsrExportURI
3975−jErrors
2898+ (\ s a -> s{_ergsrExportURI = a})
3976− = lens _jErrors (\ s a -> s{_jErrors = a}) . _Default
3979−-- | A summarized representation of the original service request.
2900+-- | Required. The Google Developers Console project ID that owns this
3980−jRequest :: Lens' Job (Maybe JobRequest)
2901+-- export.
3981−jRequest = lens _jRequest (\ s a -> s{_jRequest = a})
2902+ergsrProjectId :: Lens' ExportReadGroupSetRequest (Maybe Text)
2904+ = lens _ergsrProjectId
2905+ (\ s a -> s{_ergsrProjectId = a})
3983−instance FromJSON Job where
2907+instance FromJSON ExportReadGroupSetRequest where
3984 parseJSON
2908 parseJSON
3985− = withObject "Job"
2909+ = withObject "ExportReadGroupSetRequest"
3987− Job <$>
2911+ ExportReadGroupSetRequest <$>
3988− (o .:? "detailedStatus") <*> (o .:? "status") <*>
2912+ (o .:? "referenceNames" .!= mempty) <*>
3989− (o .:? "created")
2913+ (o .:? "exportUri")
3990− <*> (o .:? "projectNumber")
2914+ <*> (o .:? "projectId"))
3991− <*> (o .:? "warnings" .!= mempty)
3992− <*> (o .:? "importedIds" .!= mempty)
3994− <*> (o .:? "errors" .!= mempty)
3995− <*> (o .:? "request"))
3997−instance ToJSON Job where
2916+instance ToJSON ExportReadGroupSetRequest where
3998− toJSON Job{..}
2917+ toJSON ExportReadGroupSetRequest{..}
3999 = object
2918 = object
4000 (catMaybes
2919 (catMaybes
4001− [("detailedStatus" .=) <$> _jDetailedStatus,
2920+ [("referenceNames" .=) <$> _ergsrReferenceNames,
4002− ("status" .=) <$> _jStatus,
2921+ ("exportUri" .=) <$> _ergsrExportURI,
4003− ("created" .=) <$> _jCreated,
2922+ ("projectId" .=) <$> _ergsrProjectId])
4004− ("projectNumber" .=) <$> _jProjectNumber,
4005− ("warnings" .=) <$> _jWarnings,
4006− ("importedIds" .=) <$> _jImportedIds,
4007− ("id" .=) <$> _jId, ("errors" .=) <$> _jErrors,
4008− ("request" .=) <$> _jRequest])
4010−-- | The variant data export response.
4012−-- /See:/ 'exportVariantSetResponse' smart constructor.
4013−newtype ExportVariantSetResponse = ExportVariantSetResponse
4014− { _evsrJobId :: Maybe Text
4015− } deriving (Eq,Show,Data,Typeable,Generic)
4017−-- | Creates a value of 'ExportVariantSetResponse' with the minimum fields required to make a request.
4019−-- Use one of the following lenses to modify other fields as desired:
4022−exportVariantSetResponse
4023− :: ExportVariantSetResponse
4024−exportVariantSetResponse =
4025− ExportVariantSetResponse
4026− { _evsrJobId = Nothing
4029−-- | A job ID that can be used to get status information.
4030−evsrJobId :: Lens' ExportVariantSetResponse (Maybe Text)
4032− = lens _evsrJobId (\ s a -> s{_evsrJobId = a})
4034−instance FromJSON ExportVariantSetResponse where
4036− = withObject "ExportVariantSetResponse"
4037− (\ o -> ExportVariantSetResponse <$> (o .:? "jobId"))
4039−instance ToJSON ExportVariantSetResponse where
4040− toJSON ExportVariantSetResponse{..}
4041− = object (catMaybes [("jobId" .=) <$> _evsrJobId])
4043−-- | The read group set align response.
4045−-- /See:/ 'alignReadGroupSetsResponse' smart constructor.
4046−newtype AlignReadGroupSetsResponse = AlignReadGroupSetsResponse
4047− { _argsrJobId :: Maybe Text
4048− } deriving (Eq,Show,Data,Typeable,Generic)
4050−-- | Creates a value of 'AlignReadGroupSetsResponse' with the minimum fields required to make a request.
4052−-- Use one of the following lenses to modify other fields as desired:
4055−alignReadGroupSetsResponse
4056− :: AlignReadGroupSetsResponse
4057−alignReadGroupSetsResponse =
4058− AlignReadGroupSetsResponse
4059− { _argsrJobId = Nothing
4062−-- | A job ID that can be used to get status information.
4063−argsrJobId :: Lens' AlignReadGroupSetsResponse (Maybe Text)
4065− = lens _argsrJobId (\ s a -> s{_argsrJobId = a})
4067−instance FromJSON AlignReadGroupSetsResponse where
4069− = withObject "AlignReadGroupSetsResponse"
4071− AlignReadGroupSetsResponse <$> (o .:? "jobId"))
4073−instance ToJSON AlignReadGroupSetsResponse where
4074− toJSON AlignReadGroupSetsResponse{..}
4075− = object (catMaybes [("jobId" .=) <$> _argsrJobId])
4077-- | The variant data import response.
2924-- | The variant data import response.
4079-- /See:/ 'importVariantsResponse' smart constructor.
2926-- /See:/ 'importVariantsResponse' smart constructor.
4080newtype ImportVariantsResponse = ImportVariantsResponse
2927newtype ImportVariantsResponse = ImportVariantsResponse
4081− { _ivrJobId :: Maybe Text
2928+ { _ivrCallSetIds :: Maybe [Text]
4082 } deriving (Eq,Show,Data,Typeable,Generic)
2929 } deriving (Eq,Show,Data,Typeable,Generic)
4084-- | Creates a value of 'ImportVariantsResponse' with the minimum fields required to make a request.
2931-- | Creates a value of 'ImportVariantsResponse' with the minimum fields required to make a request.
4086-- Use one of the following lenses to modify other fields as desired:
2933-- Use one of the following lenses to modify other fields as desired:
4088−-- * 'ivrJobId'
2935+-- * 'ivrCallSetIds'
4089importVariantsResponse
2936importVariantsResponse
4090 :: ImportVariantsResponse
2937 :: ImportVariantsResponse
4091importVariantsResponse =
2938importVariantsResponse =
4092 ImportVariantsResponse
2939 ImportVariantsResponse
4093− { _ivrJobId = Nothing
2940+ { _ivrCallSetIds = Nothing
4096−-- | A job ID that can be used to get status information.
2943+-- | IDs of the call sets that were created.
4097−ivrJobId :: Lens' ImportVariantsResponse (Maybe Text)
2944+ivrCallSetIds :: Lens' ImportVariantsResponse [Text]
4098−ivrJobId = lens _ivrJobId (\ s a -> s{_ivrJobId = a})
2945+ivrCallSetIds
2946+ = lens _ivrCallSetIds
2947+ (\ s a -> s{_ivrCallSetIds = a})
4100instance FromJSON ImportVariantsResponse where
2951instance FromJSON ImportVariantsResponse where
4101 parseJSON
2952 parseJSON
4102 = withObject "ImportVariantsResponse"
2953 = withObject "ImportVariantsResponse"
4103− (\ o -> ImportVariantsResponse <$> (o .:? "jobId"))
2955+ ImportVariantsResponse <$>
2956+ (o .:? "callSetIds" .!= mempty))
4105instance ToJSON ImportVariantsResponse where
2958instance ToJSON ImportVariantsResponse where
4106 toJSON ImportVariantsResponse{..}
2959 toJSON ImportVariantsResponse{..}
4107− = object (catMaybes [("jobId" .=) <$> _ivrJobId])
2960+ = object
2961+ (catMaybes [("callSetIds" .=) <$> _ivrCallSetIds])
4110-- /See:/ 'listCoverageBucketsResponse' smart constructor.
2964-- /See:/ 'listCoverageBucketsResponse' smart constructor.
@@ -4144,7 +2998,7 @@ lcbrNextPageToken
4144-- | The length of each coverage bucket in base pairs. Note that buckets at
2998-- | The length of each coverage bucket in base pairs. Note that buckets at
4145-- the end of a reference sequence may be shorter. This value is omitted if
2999-- the end of a reference sequence may be shorter. This value is omitted if
4146-- the bucket width is infinity (the default behaviour, with no range or
3000-- the bucket width is infinity (the default behaviour, with no range or
4147−-- targetBucketWidth).
3001+-- \`targetBucketWidth\`).
4148lcbrBucketWidth :: Lens' ListCoverageBucketsResponse (Maybe Int64)
3002lcbrBucketWidth :: Lens' ListCoverageBucketsResponse (Maybe Int64)
4149lcbrBucketWidth
3003lcbrBucketWidth
4150 = lens _lcbrBucketWidth
3004 = lens _lcbrBucketWidth
@@ -4152,8 +3006,8 @@ lcbrBucketWidth
4153-- | The coverage buckets. The list of buckets is sparse; a bucket with 0
3007-- | The coverage buckets. The list of buckets is sparse; a bucket with 0
4154-- overlapping reads is not returned. A bucket never crosses more than one
3008-- overlapping reads is not returned. A bucket never crosses more than one
4155−-- reference sequence. Each bucket has width bucketWidth, unless its end is
3009+-- reference sequence. Each bucket has width \`bucketWidth\`, unless its
4156−-- the end of the reference sequence.
3010+-- end is the end of the reference sequence.
4157lcbrCoverageBuckets :: Lens' ListCoverageBucketsResponse [CoverageBucket]
3011lcbrCoverageBuckets :: Lens' ListCoverageBucketsResponse [CoverageBucket]
4158lcbrCoverageBuckets
3012lcbrCoverageBuckets
4159 = lens _lcbrCoverageBuckets
3013 = lens _lcbrCoverageBuckets
@@ -4177,39 +3031,89 @@ instance ToJSON ListCoverageBucketsResponse where
4177 ("bucketWidth" .=) <$> _lcbrBucketWidth,
3031 ("bucketWidth" .=) <$> _lcbrBucketWidth,
4178 ("coverageBuckets" .=) <$> _lcbrCoverageBuckets])
3032 ("coverageBuckets" .=) <$> _lcbrCoverageBuckets])
3034+-- | Request message for \`TestIamPermissions\` method.
3036+-- /See:/ 'testIAMPermissionsRequest' smart constructor.
3037+newtype TestIAMPermissionsRequest = TestIAMPermissionsRequest
3038+ { _tiprPermissions :: Maybe [Text]
3039+ } deriving (Eq,Show,Data,Typeable,Generic)
3041+-- | Creates a value of 'TestIAMPermissionsRequest' with the minimum fields required to make a request.
3043+-- Use one of the following lenses to modify other fields as desired:
3045+-- * 'tiprPermissions'
3046+testIAMPermissionsRequest
3047+ :: TestIAMPermissionsRequest
3048+testIAMPermissionsRequest =
3049+ TestIAMPermissionsRequest
3050+ { _tiprPermissions = Nothing
3053+-- | REQUIRED: The set of permissions to check for the \'resource\'.
3054+-- Permissions with wildcards (such as \'*\' or \'storage.*\') are not
3055+-- allowed. Allowed permissions are: * \`genomics.datasets.create\` *
3056+-- \`genomics.datasets.delete\` * \`genomics.datasets.get\` *
3057+-- \`genomics.datasets.list\` * \`genomics.datasets.update\` *
3058+-- \`genomics.datasets.getIamPolicy\` * \`genomics.datasets.setIamPolicy\`
3059+tiprPermissions :: Lens' TestIAMPermissionsRequest [Text]
3061+ = lens _tiprPermissions
3062+ (\ s a -> s{_tiprPermissions = a})
3066+instance FromJSON TestIAMPermissionsRequest where
3068+ = withObject "TestIAMPermissionsRequest"
3070+ TestIAMPermissionsRequest <$>
3071+ (o .:? "permissions" .!= mempty))
3073+instance ToJSON TestIAMPermissionsRequest where
3074+ toJSON TestIAMPermissionsRequest{..}
3076+ (catMaybes [("permissions" .=) <$> _tiprPermissions])
4180-- | The read group set import response.
3078-- | The read group set import response.
4182-- /See:/ 'importReadGroupSetsResponse' smart constructor.
3080-- /See:/ 'importReadGroupSetsResponse' smart constructor.
4183newtype ImportReadGroupSetsResponse = ImportReadGroupSetsResponse
3081newtype ImportReadGroupSetsResponse = ImportReadGroupSetsResponse
4184− { _irgsrJobId :: Maybe Text
3082+ { _irgsrReadGroupSetIds :: Maybe [Text]
4185 } deriving (Eq,Show,Data,Typeable,Generic)
3083 } deriving (Eq,Show,Data,Typeable,Generic)
4187-- | Creates a value of 'ImportReadGroupSetsResponse' with the minimum fields required to make a request.
3085-- | Creates a value of 'ImportReadGroupSetsResponse' with the minimum fields required to make a request.
4189-- Use one of the following lenses to modify other fields as desired:
3087-- Use one of the following lenses to modify other fields as desired:
4191−-- * 'irgsrJobId'
3089+-- * 'irgsrReadGroupSetIds'
4192importReadGroupSetsResponse
3090importReadGroupSetsResponse
4193 :: ImportReadGroupSetsResponse
3091 :: ImportReadGroupSetsResponse
4194importReadGroupSetsResponse =
3092importReadGroupSetsResponse =
4195 ImportReadGroupSetsResponse
3093 ImportReadGroupSetsResponse
4196− { _irgsrJobId = Nothing
3094+ { _irgsrReadGroupSetIds = Nothing
4199−-- | A job ID that can be used to get status information.
3097+-- | IDs of the read group sets that were created.
4200−irgsrJobId :: Lens' ImportReadGroupSetsResponse (Maybe Text)
3098+irgsrReadGroupSetIds :: Lens' ImportReadGroupSetsResponse [Text]
4201−irgsrJobId
3099+irgsrReadGroupSetIds
4202− = lens _irgsrJobId (\ s a -> s{_irgsrJobId = a})
3100+ = lens _irgsrReadGroupSetIds
3101+ (\ s a -> s{_irgsrReadGroupSetIds = a})
4204instance FromJSON ImportReadGroupSetsResponse where
3105instance FromJSON ImportReadGroupSetsResponse where
4205 parseJSON
3106 parseJSON
4206 = withObject "ImportReadGroupSetsResponse"
3107 = withObject "ImportReadGroupSetsResponse"
4208− ImportReadGroupSetsResponse <$> (o .:? "jobId"))
3109+ ImportReadGroupSetsResponse <$>
3110+ (o .:? "readGroupSetIds" .!= mempty))
4210instance ToJSON ImportReadGroupSetsResponse where
3112instance ToJSON ImportReadGroupSetsResponse where
4211 toJSON ImportReadGroupSetsResponse{..}
3113 toJSON ImportReadGroupSetsResponse{..}
4212− = object (catMaybes [("jobId" .=) <$> _irgsrJobId])
3115+ (catMaybes
3116+ [("readGroupSetIds" .=) <$> _irgsrReadGroupSetIds])
4214-- | A linear alignment can be represented by one CIGAR string. Describes the
3118-- | A linear alignment can be represented by one CIGAR string. Describes the
4215-- mapped position and local alignment of the read to the reference.
3119-- mapped position and local alignment of the read to the reference.
@@ -4236,280 +3140,44 @@ linearAlignment =
4236 LinearAlignment
3140 LinearAlignment
4237 { _laCigar = Nothing
3141 { _laCigar = Nothing
4238 , _laMAppingQuality = Nothing
3142 , _laMAppingQuality = Nothing
4239− , _laPosition = Nothing
3143+ , _laPosition = Nothing
4242−-- | Represents the local alignment of this sequence (alignment matches,
4243−-- indels, etc) against the reference.
4244−laCigar :: Lens' LinearAlignment [CigarUnit]
4246− = lens _laCigar (\ s a -> s{_laCigar = a}) . _Default
4249−-- | The mapping quality of this alignment. Represents how likely the read
4250−-- maps to this position as opposed to other locations.
4251−laMAppingQuality :: Lens' LinearAlignment (Maybe Int32)
4253− = lens _laMAppingQuality
4254− (\ s a -> s{_laMAppingQuality = a})
4256−-- | The position of this alignment.
4257−laPosition :: Lens' LinearAlignment (Maybe Position)
4259− = lens _laPosition (\ s a -> s{_laPosition = a})
4261−instance FromJSON LinearAlignment where
4263− = withObject "LinearAlignment"
4265− LinearAlignment <$>
4266− (o .:? "cigar" .!= mempty) <*>
4267− (o .:? "mappingQuality")
4268− <*> (o .:? "position"))
4270−instance ToJSON LinearAlignment where
4271− toJSON LinearAlignment{..}
4274− [("cigar" .=) <$> _laCigar,
4275− ("mappingQuality" .=) <$> _laMAppingQuality,
4276− ("position" .=) <$> _laPosition])
4278−-- | Metadata describes a single piece of variant call metadata. These data
4279−-- include a top level key and either a single value string (value) or a
4280−-- list of key-value pairs (info.) Value and info are mutually exclusive.
4282−-- /See:/ 'metadata' smart constructor.
4283−data Metadata = Metadata
4284− { _mValue :: !(Maybe Text)
4285− , _mKey :: !(Maybe Text)
4286− , _mId :: !(Maybe Text)
4287− , _mType :: !(Maybe MetadataType)
4288− , _mNumber :: !(Maybe Text)
4289− , _mDescription :: !(Maybe Text)
4290− , _mInfo :: !(Maybe MetadataInfo)
4291− } deriving (Eq,Show,Data,Typeable,Generic)
4293−-- | Creates a value of 'Metadata' with the minimum fields required to make a request.
4295−-- Use one of the following lenses to modify other fields as desired:
4314− { _mValue = Nothing
4318− , _mNumber = Nothing
4319− , _mDescription = Nothing
4323−-- | The value field for simple metadata
4324−mValue :: Lens' Metadata (Maybe Text)
4325−mValue = lens _mValue (\ s a -> s{_mValue = a})
4327−-- | The top-level key.
4328−mKey :: Lens' Metadata (Maybe Text)
4329−mKey = lens _mKey (\ s a -> s{_mKey = a})
4331−-- | User-provided ID field, not enforced by this API. Two or more pieces of
4332−-- structured metadata with identical id and key fields are considered
4334−mId :: Lens' Metadata (Maybe Text)
4335−mId = lens _mId (\ s a -> s{_mId = a})
4337−-- | The type of data. Possible types include: Integer, Float, Flag,
4338−-- Character, and String.
4339−mType :: Lens' Metadata (Maybe MetadataType)
4340−mType = lens _mType (\ s a -> s{_mType = a})
4342−-- | The number of values that can be included in a field described by this
4344−mNumber :: Lens' Metadata (Maybe Text)
4345−mNumber = lens _mNumber (\ s a -> s{_mNumber = a})
4347−-- | A textual description of this metadata.
4348−mDescription :: Lens' Metadata (Maybe Text)
4350− = lens _mDescription (\ s a -> s{_mDescription = a})
4352−-- | A string which maps to an array of values.
4353−mInfo :: Lens' Metadata (Maybe MetadataInfo)
4354−mInfo = lens _mInfo (\ s a -> s{_mInfo = a})
4356−instance FromJSON Metadata where
4358− = withObject "Metadata"
4361− (o .:? "value") <*> (o .:? "key") <*> (o .:? "id")
4363− <*> (o .:? "number")
4364− <*> (o .:? "description")
4365− <*> (o .:? "info"))
4367−instance ToJSON Metadata where
4368− toJSON Metadata{..}
4371− [("value" .=) <$> _mValue, ("key" .=) <$> _mKey,
4372− ("id" .=) <$> _mId, ("type" .=) <$> _mType,
4373− ("number" .=) <$> _mNumber,
4374− ("description" .=) <$> _mDescription,
4375− ("info" .=) <$> _mInfo])
4377−-- | The read group set call response.
4379−-- /See:/ 'callReadGroupSetsResponse' smart constructor.
4380−newtype CallReadGroupSetsResponse = CallReadGroupSetsResponse
4381− { _crgsrJobId :: Maybe Text
4382− } deriving (Eq,Show,Data,Typeable,Generic)
4384−-- | Creates a value of 'CallReadGroupSetsResponse' with the minimum fields required to make a request.
4386−-- Use one of the following lenses to modify other fields as desired:
4389−callReadGroupSetsResponse
4390− :: CallReadGroupSetsResponse
4391−callReadGroupSetsResponse =
4392− CallReadGroupSetsResponse
4393− { _crgsrJobId = Nothing
4396−-- | A job ID that can be used to get status information.
4397−crgsrJobId :: Lens' CallReadGroupSetsResponse (Maybe Text)
4399− = lens _crgsrJobId (\ s a -> s{_crgsrJobId = a})
4401−instance FromJSON CallReadGroupSetsResponse where
4403− = withObject "CallReadGroupSetsResponse"
4405− CallReadGroupSetsResponse <$> (o .:? "jobId"))
4407−instance ToJSON CallReadGroupSetsResponse where
4408− toJSON CallReadGroupSetsResponse{..}
4409− = object (catMaybes [("jobId" .=) <$> _crgsrJobId])
4411−-- | An annotation set is a logical grouping of annotations that share
4412−-- consistent type information and provenance. Examples of annotation sets
4413−-- include \'all genes from refseq\', and \'all variant annotations from
4416−-- /See:/ 'annotationSet' smart constructor.
4417−data AnnotationSet = AnnotationSet
4418− { _asReferenceSetId :: !(Maybe Text)
4419− , _asName :: !(Maybe Text)
4420− , _asDatasetId :: !(Maybe Text)
4421− , _asId :: !(Maybe Text)
4422− , _asType :: !(Maybe AnnotationSetType)
4423− , _asSourceURI :: !(Maybe Text)
4424− , _asInfo :: !(Maybe AnnotationSetInfo)
4425− } deriving (Eq,Show,Data,Typeable,Generic)
4427−-- | Creates a value of 'AnnotationSet' with the minimum fields required to make a request.
4429−-- Use one of the following lenses to modify other fields as desired:
4431−-- * 'asReferenceSetId'
4448− { _asReferenceSetId = Nothing
4449− , _asName = Nothing
4450− , _asDatasetId = Nothing
4452− , _asType = Nothing
4453− , _asSourceURI = Nothing
4454− , _asInfo = Nothing
4457−-- | The ID of the reference set that defines the coordinate space for this
3146+-- | Represents the local alignment of this sequence (alignment matches,
4458−-- set\'s annotations.
3147+-- indels, etc) against the reference.
4459−asReferenceSetId :: Lens' AnnotationSet (Maybe Text)
3148+laCigar :: Lens' LinearAlignment [CigarUnit]
4460−asReferenceSetId
3149+laCigar
4461− = lens _asReferenceSetId
3150+ = lens _laCigar (\ s a -> s{_laCigar = a}) . _Default
4462− (\ s a -> s{_asReferenceSetId = a})
3151+ . _Coerce
4464−-- | The display name for this annotation set.
3153+-- | The mapping quality of this alignment. Represents how likely the read
4465−asName :: Lens' AnnotationSet (Maybe Text)
3154+-- maps to this position as opposed to other locations.
4466−asName = lens _asName (\ s a -> s{_asName = a})
3155+laMAppingQuality :: Lens' LinearAlignment (Maybe Int32)
4467−
3156+laMAppingQuality
4468−-- | The ID of the containing dataset.
3157+ = lens _laMAppingQuality
4469−asDatasetId :: Lens' AnnotationSet (Maybe Text)
3158+ (\ s a -> s{_laMAppingQuality = a})
4471− = lens _asDatasetId (\ s a -> s{_asDatasetId = a})
3160+-- | The position of this alignment.
4472−
3161+laPosition :: Lens' LinearAlignment (Maybe Position)
4473−-- | The generated unique ID for this annotation set.
3162+laPosition
4474−asId :: Lens' AnnotationSet (Maybe Text)
3163+ = lens _laPosition (\ s a -> s{_laPosition = a})
4475−asId = lens _asId (\ s a -> s{_asId = a})
3164+
4477−-- | The type of annotations contained within this set.
4478−asType :: Lens' AnnotationSet (Maybe AnnotationSetType)
4479−asType = lens _asType (\ s a -> s{_asType = a})
4481−-- | The source URI describing the file from which this annotation set was
4482−-- generated, if any.
4483−asSourceURI :: Lens' AnnotationSet (Maybe Text)
4485− = lens _asSourceURI (\ s a -> s{_asSourceURI = a})
4487−-- | A string which maps to an array of values.
4488−asInfo :: Lens' AnnotationSet (Maybe AnnotationSetInfo)
4489−asInfo = lens _asInfo (\ s a -> s{_asInfo = a})
4491−instance FromJSON AnnotationSet where
3165+instance FromJSON LinearAlignment where
4492 parseJSON
3166 parseJSON
4493− = withObject "AnnotationSet"
3167+ = withObject "LinearAlignment"
4495− AnnotationSet <$>
3169+ LinearAlignment <$>
4496− (o .:? "referenceSetId") <*> (o .:? "name") <*>
3170+ (o .:? "cigar" .!= mempty) <*>
4497− (o .:? "datasetId")
3171+ (o .:? "mappingQuality")
4498− <*> (o .:? "id")
3172+ <*> (o .:? "position"))
4500− <*> (o .:? "sourceUri")
4501− <*> (o .:? "info"))
4503−instance ToJSON AnnotationSet where
3174+instance ToJSON LinearAlignment where
4504− toJSON AnnotationSet{..}
3175+ toJSON LinearAlignment{..}
4505 = object
3176 = object
4506 (catMaybes
3177 (catMaybes
4507− [("referenceSetId" .=) <$> _asReferenceSetId,
3178+ [("cigar" .=) <$> _laCigar,
4508− ("name" .=) <$> _asName,
3179+ ("mappingQuality" .=) <$> _laMAppingQuality,
4509− ("datasetId" .=) <$> _asDatasetId,
3180+ ("position" .=) <$> _laPosition])
4510− ("id" .=) <$> _asId, ("type" .=) <$> _asType,
4511− ("sourceUri" .=) <$> _asSourceURI,
4512− ("info" .=) <$> _asInfo])
4514-- | A variant set is a collection of call sets and variants. It contains
3182-- | A variant set is a collection of call sets and variants. It contains
4515-- summary statistics of those contents. A variant set belongs to a
3183-- summary statistics of those contents. A variant set belongs to a
@@ -4519,7 +3187,7 @@ instance ToJSON AnnotationSet where
4519data VariantSet = VariantSet
3187data VariantSet = VariantSet
4520 { _vsDatasetId :: !(Maybe Text)
3188 { _vsDatasetId :: !(Maybe Text)
4521 , _vsReferenceBounds :: !(Maybe [ReferenceBound])
3189 , _vsReferenceBounds :: !(Maybe [ReferenceBound])
4522− , _vsMetadata :: !(Maybe [Metadata])
3190+ , _vsMetadata :: !(Maybe [VariantSetMetadata])
4523 , _vsId :: !(Maybe Text)
3191 , _vsId :: !(Maybe Text)
4524 } deriving (Eq,Show,Data,Typeable,Generic)
3192 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -4544,7 +3212,7 @@ variantSet =
4544 , _vsId = Nothing
3212 , _vsId = Nothing
4547−-- | The dataset to which this variant set belongs. Immutable.
3215+-- | The dataset to which this variant set belongs.
4548vsDatasetId :: Lens' VariantSet (Maybe Text)
3216vsDatasetId :: Lens' VariantSet (Maybe Text)
4549vsDatasetId
3217vsDatasetId
4550 = lens _vsDatasetId (\ s a -> s{_vsDatasetId = a})
3218 = lens _vsDatasetId (\ s a -> s{_vsDatasetId = a})
@@ -4559,13 +3227,13 @@ vsReferenceBounds
4559 . _Coerce
3227 . _Coerce
4561-- | The metadata associated with this variant set.
3229-- | The metadata associated with this variant set.
4562−vsMetadata :: Lens' VariantSet [Metadata]
3230+vsMetadata :: Lens' VariantSet [VariantSetMetadata]
4563vsMetadata
3231vsMetadata
4564 = lens _vsMetadata (\ s a -> s{_vsMetadata = a}) .
3232 = lens _vsMetadata (\ s a -> s{_vsMetadata = a}) .
4565 _Default
3233 _Default
4566 . _Coerce
3234 . _Coerce
4568−-- | The Google-generated ID of the variant set. Immutable.
3236+-- | The server-generated variant set ID, unique across all variant sets.
4569vsId :: Lens' VariantSet (Maybe Text)
3237vsId :: Lens' VariantSet (Maybe Text)
4570vsId = lens _vsId (\ s a -> s{_vsId = a})
3238vsId = lens _vsId (\ s a -> s{_vsId = a})
@@ -4588,6 +3256,47 @@ instance ToJSON VariantSet where
4588 ("metadata" .=) <$> _vsMetadata,
3256 ("metadata" .=) <$> _vsMetadata,
4589 ("id" .=) <$> _vsId])
3257 ("id" .=) <$> _vsId])
3259+-- | Response message for \`TestIamPermissions\` method.
3261+-- /See:/ 'testIAMPermissionsResponse' smart constructor.
3262+newtype TestIAMPermissionsResponse = TestIAMPermissionsResponse
3263+ { _tiamprPermissions :: Maybe [Text]
3264+ } deriving (Eq,Show,Data,Typeable,Generic)
3266+-- | Creates a value of 'TestIAMPermissionsResponse' with the minimum fields required to make a request.
3268+-- Use one of the following lenses to modify other fields as desired:
3270+-- * 'tiamprPermissions'
3271+testIAMPermissionsResponse
3272+ :: TestIAMPermissionsResponse
3273+testIAMPermissionsResponse =
3274+ TestIAMPermissionsResponse
3275+ { _tiamprPermissions = Nothing
3278+-- | A subset of \`TestPermissionsRequest.permissions\` that the caller is
3280+tiamprPermissions :: Lens' TestIAMPermissionsResponse [Text]
3282+ = lens _tiamprPermissions
3283+ (\ s a -> s{_tiamprPermissions = a})
3287+instance FromJSON TestIAMPermissionsResponse where
3289+ = withObject "TestIAMPermissionsResponse"
3291+ TestIAMPermissionsResponse <$>
3292+ (o .:? "permissions" .!= mempty))
3294+instance ToJSON TestIAMPermissionsResponse where
3295+ toJSON TestIAMPermissionsResponse{..}
3298+ [("permissions" .=) <$> _tiamprPermissions])
4591-- | The dataset list response.
3300-- | The dataset list response.
4593-- /See:/ 'listDatasetsResponse' smart constructor.
3302-- /See:/ 'listDatasetsResponse' smart constructor.
@@ -4649,7 +3358,7 @@ data ImportReadGroupSetsRequest = ImportReadGroupSetsRequest
4649 { _irgsrReferenceSetId :: !(Maybe Text)
3358 { _irgsrReferenceSetId :: !(Maybe Text)
4650 , _irgsrDatasetId :: !(Maybe Text)
3359 , _irgsrDatasetId :: !(Maybe Text)
4651 , _irgsrSourceURIs :: !(Maybe [Text])
3360 , _irgsrSourceURIs :: !(Maybe [Text])
4652− , _irgsrPartitionStrategy :: !(Maybe ImportReadGroupSetsRequestPartitionStrategy)
3361+ , _irgsrPartitionStrategy :: !(Maybe Text)
4653 } deriving (Eq,Show,Data,Typeable,Generic)
3362 } deriving (Eq,Show,Data,Typeable,Generic)
4655-- | Creates a value of 'ImportReadGroupSetsRequest' with the minimum fields required to make a request.
3364-- | Creates a value of 'ImportReadGroupSetsRequest' with the minimum fields required to make a request.
@@ -4690,7 +3399,9 @@ irgsrDatasetId
4690 = lens _irgsrDatasetId
3399 = lens _irgsrDatasetId
4691 (\ s a -> s{_irgsrDatasetId = a})
3400 (\ s a -> s{_irgsrDatasetId = a})
4693−-- | A list of URIs pointing at BAM files in Google Cloud Storage.
3402+-- | A list of URIs pointing at [BAM
3403+-- files](https:\/\/samtools.github.io\/hts-specs\/SAMv1.pdf) in Google
4694irgsrSourceURIs :: Lens' ImportReadGroupSetsRequest [Text]
3405irgsrSourceURIs :: Lens' ImportReadGroupSetsRequest [Text]
4695irgsrSourceURIs
3406irgsrSourceURIs
4696 = lens _irgsrSourceURIs
3407 = lens _irgsrSourceURIs
@@ -4700,7 +3411,7 @@ irgsrSourceURIs
4701-- | The partition strategy describes how read groups are partitioned into
3412-- | The partition strategy describes how read groups are partitioned into
4702-- read group sets.
3413-- read group sets.
4703−irgsrPartitionStrategy :: Lens' ImportReadGroupSetsRequest (Maybe ImportReadGroupSetsRequestPartitionStrategy)
3414+irgsrPartitionStrategy :: Lens' ImportReadGroupSetsRequest (Maybe Text)
4704irgsrPartitionStrategy
3415irgsrPartitionStrategy
4705 = lens _irgsrPartitionStrategy
3416 = lens _irgsrPartitionStrategy
4706 (\ s a -> s{_irgsrPartitionStrategy = a})
3417 (\ s a -> s{_irgsrPartitionStrategy = a})
@@ -4728,7 +3439,8 @@ instance ToJSON ImportReadGroupSetsRequest where
4729-- /See:/ 'importVariantsRequest' smart constructor.
3440-- /See:/ 'importVariantsRequest' smart constructor.
4730data ImportVariantsRequest = ImportVariantsRequest
3441data ImportVariantsRequest = ImportVariantsRequest
3442+ { _ivrVariantSetId :: !(Maybe Text)
4731− { _ivrFormat :: !(Maybe ImportVariantsRequestFormat)
3443+ , _ivrFormat :: !(Maybe Text)
4732 , _ivrNormalizeReferenceNames :: !(Maybe Bool)
3444 , _ivrNormalizeReferenceNames :: !(Maybe Bool)
4733 , _ivrSourceURIs :: !(Maybe [Text])
3445 , _ivrSourceURIs :: !(Maybe [Text])
4734 } deriving (Eq,Show,Data,Typeable,Generic)
3446 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -4737,6 +3449,8 @@ data ImportVariantsRequest = ImportVariantsRequest
4738-- Use one of the following lenses to modify other fields as desired:
3450-- Use one of the following lenses to modify other fields as desired:
3452+-- * 'ivrVariantSetId'
4740-- * 'ivrFormat'
3454-- * 'ivrFormat'
4742-- * 'ivrNormalizeReferenceNames'
3456-- * 'ivrNormalizeReferenceNames'
@@ -4746,14 +3460,21 @@ importVariantsRequest
4746 :: ImportVariantsRequest
3460 :: ImportVariantsRequest
4747importVariantsRequest =
3461importVariantsRequest =
4748 ImportVariantsRequest
3462 ImportVariantsRequest
3463+ { _ivrVariantSetId = Nothing
4749− { _ivrFormat = Nothing
3464+ , _ivrFormat = Nothing
4750 , _ivrNormalizeReferenceNames = Nothing
3465 , _ivrNormalizeReferenceNames = Nothing
4751 , _ivrSourceURIs = Nothing
3466 , _ivrSourceURIs = Nothing
3469+-- | Required. The variant set to which variant data should be imported.
3470+ivrVariantSetId :: Lens' ImportVariantsRequest (Maybe Text)
3472+ = lens _ivrVariantSetId
3473+ (\ s a -> s{_ivrVariantSetId = a})
4754-- | The format of the variant data being imported. If unspecified, defaults
3475-- | The format of the variant data being imported. If unspecified, defaults
4755−-- to to \"VCF\".
3476+-- to to \`VCF\`.
4756−ivrFormat :: Lens' ImportVariantsRequest (Maybe ImportVariantsRequestFormat)
3477+ivrFormat :: Lens' ImportVariantsRequest (Maybe Text)
4757ivrFormat
3478ivrFormat
4758 = lens _ivrFormat (\ s a -> s{_ivrFormat = a})
3479 = lens _ivrFormat (\ s a -> s{_ivrFormat = a})
@@ -4770,8 +3491,9 @@ ivrNormalizeReferenceNames
4770 (\ s a -> s{_ivrNormalizeReferenceNames = a})
3491 (\ s a -> s{_ivrNormalizeReferenceNames = a})
4772-- | A list of URIs referencing variant files in Google Cloud Storage. URIs
3493-- | A list of URIs referencing variant files in Google Cloud Storage. URIs
4773−-- can include wildcards as described here. Note that recursive wildcards
3494+-- can include wildcards [as described
3495+-- here](https:\/\/cloud.google.com\/storage\/docs\/gsutil\/addlhelp\/WildcardNames).
4774−-- (\'**\') are not supported.
3496+-- Note that recursive wildcards (\'**\') are not supported.
4775ivrSourceURIs :: Lens' ImportVariantsRequest [Text]
3497ivrSourceURIs :: Lens' ImportVariantsRequest [Text]
4776ivrSourceURIs
3498ivrSourceURIs
4777 = lens _ivrSourceURIs
3499 = lens _ivrSourceURIs
@@ -4784,7 +3506,7 @@ instance FromJSON ImportVariantsRequest where
4784 = withObject "ImportVariantsRequest"
3506 = withObject "ImportVariantsRequest"
4786 ImportVariantsRequest <$>
3508 ImportVariantsRequest <$>
4787− (o .:? "format") <*>
3509+ (o .:? "variantSetId") <*> (o .:? "format") <*>
4788 (o .:? "normalizeReferenceNames")
3510 (o .:? "normalizeReferenceNames")
4789 <*> (o .:? "sourceUris" .!= mempty))
3511 <*> (o .:? "sourceUris" .!= mempty))
@@ -4792,61 +3514,17 @@ instance ToJSON ImportVariantsRequest where
4792 toJSON ImportVariantsRequest{..}
3514 toJSON ImportVariantsRequest{..}
4793 = object
3515 = object
4794 (catMaybes
3516 (catMaybes
3517+ [("variantSetId" .=) <$> _ivrVariantSetId,
4795− [("format" .=) <$> _ivrFormat,
3518+ ("format" .=) <$> _ivrFormat,
4796 ("normalizeReferenceNames" .=) <$>
3519 ("normalizeReferenceNames" .=) <$>
4797 _ivrNormalizeReferenceNames,
3520 _ivrNormalizeReferenceNames,
4798 ("sourceUris" .=) <$> _ivrSourceURIs])
3521 ("sourceUris" .=) <$> _ivrSourceURIs])
4802−-- /See:/ 'externalId' smart constructor.
4803−data ExternalId = ExternalId
4804− { _eiSourceName :: !(Maybe Text)
4805− , _eiId :: !(Maybe Text)
4806− } deriving (Eq,Show,Data,Typeable,Generic)
4808−-- | Creates a value of 'ExternalId' with the minimum fields required to make a request.
4810−-- Use one of the following lenses to modify other fields as desired:
4819− { _eiSourceName = Nothing
4823−-- | The name of the source of this data.
4824−eiSourceName :: Lens' ExternalId (Maybe Text)
4826− = lens _eiSourceName (\ s a -> s{_eiSourceName = a})
4828−-- | The id used by the source of this data.
4829−eiId :: Lens' ExternalId (Maybe Text)
4830−eiId = lens _eiId (\ s a -> s{_eiId = a})
4832−instance FromJSON ExternalId where
4834− = withObject "ExternalId"
4836− ExternalId <$> (o .:? "sourceName") <*> (o .:? "id"))
4838−instance ToJSON ExternalId where
4839− toJSON ExternalId{..}
4842− [("sourceName" .=) <$> _eiSourceName,
4843− ("id" .=) <$> _eiId])
4845-- | A single CIGAR operation.
3523-- | A single CIGAR operation.
4847-- /See:/ 'cigarUnit' smart constructor.
3525-- /See:/ 'cigarUnit' smart constructor.
4848data CigarUnit = CigarUnit
3526data CigarUnit = CigarUnit
4849− { _cuOperation :: !(Maybe CigarUnitOperation)
3527+ { _cuOperation :: !(Maybe Text)
4850 , _cuOperationLength :: !(Maybe Int64)
3528 , _cuOperationLength :: !(Maybe Int64)
4851 , _cuReferenceSequence :: !(Maybe Text)
3529 , _cuReferenceSequence :: !(Maybe Text)
4852 } deriving (Eq,Show,Data,Typeable,Generic)
3530 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -4869,19 +3547,19 @@ cigarUnit =
4869 , _cuReferenceSequence = Nothing
3547 , _cuReferenceSequence = Nothing
4872−cuOperation :: Lens' CigarUnit (Maybe CigarUnitOperation)
3550+cuOperation :: Lens' CigarUnit (Maybe Text)
4873cuOperation
3551cuOperation
4874 = lens _cuOperation (\ s a -> s{_cuOperation = a})
3552 = lens _cuOperation (\ s a -> s{_cuOperation = a})
4876−-- | The number of bases that the operation runs for. Required.
3554+-- | The number of genomic bases that the operation runs for. Required.
4877cuOperationLength :: Lens' CigarUnit (Maybe Int64)
3555cuOperationLength :: Lens' CigarUnit (Maybe Int64)
4878cuOperationLength
3556cuOperationLength
4879 = lens _cuOperationLength
3557 = lens _cuOperationLength
4880 (\ s a -> s{_cuOperationLength = a})
3558 (\ s a -> s{_cuOperationLength = a})
4882−-- | referenceSequence is only used at mismatches (SEQUENCE_MISMATCH) and
3560+-- | \`referenceSequence\` is only used at mismatches (\`SEQUENCE_MISMATCH\`)
4883−-- deletions (DELETE). Filling this field replaces SAM\'s MD tag. If the
3561+-- and deletions (\`DELETE\`). Filling this field replaces SAM\'s MD tag.
4884−-- relevant information is not available, this field is unset.
3562+-- If the relevant information is not available, this field is unset.
4885cuReferenceSequence :: Lens' CigarUnit (Maybe Text)
3563cuReferenceSequence :: Lens' CigarUnit (Maybe Text)
4886cuReferenceSequence
3564cuReferenceSequence
4887 = lens _cuReferenceSequence
3565 = lens _cuReferenceSequence
@@ -4903,107 +3581,78 @@ instance ToJSON CigarUnit where
4903 ("operationLength" .=) <$> _cuOperationLength,
3581 ("operationLength" .=) <$> _cuOperationLength,
4904 ("referenceSequence" .=) <$> _cuReferenceSequence])
3582 ("referenceSequence" .=) <$> _cuReferenceSequence])
4906−-- | The read group set align request.
3584+-- | Defines an Identity and Access Management (IAM) policy. It is used to
3585+-- specify access control policies for Cloud Platform resources. A
3586+-- \`Policy\` consists of a list of \`bindings\`. A \`Binding\` binds a
3587+-- list of \`members\` to a \`role\`, where the members can be user
3588+-- accounts, Google groups, Google domains, and service accounts. A
3589+-- \`role\` is a named list of permissions defined by IAM. **Example** {
3590+-- \"bindings\": [ { \"role\": \"roles\/owner\", \"members\": [
3591+-- \"user:mike\'example.com\", \"group:admins\'example.com\",
3592+-- \"domain:google.com\",
3593+-- \"serviceAccount:my-other-app\'appspot.gserviceaccount.com\"] }, {
3594+-- \"role\": \"roles\/viewer\", \"members\": [\"user:sean\'example.com\"] }
3595+-- ] } For a description of IAM and its features, see the [IAM developer\'s
3596+-- guide](https:\/\/cloud.google.com\/iam).
4908−-- /See:/ 'alignReadGroupSetsRequest' smart constructor.
3598+-- /See:/ 'policy' smart constructor.
4909−data AlignReadGroupSetsRequest = AlignReadGroupSetsRequest
3599+data Policy = Policy
4910− { _argsrInterleavedFastqSource :: !(Maybe InterleavedFastqSource)
3600+ { _polEtag :: !(Maybe Word8)
4911− , _argsrReadGroupSetId :: !(Maybe Text)
3601+ , _polVersion :: !(Maybe Int32)
4912− , _argsrBamSourceURIs :: !(Maybe [Text])
3602+ , _polBindings :: !(Maybe [Binding])
4913− , _argsrPairedFastqSource :: !(Maybe PairedFastqSource)
4914− , _argsrDatasetId :: !(Maybe Text)
4915 } deriving (Eq,Show,Data,Typeable,Generic)
3603 } deriving (Eq,Show,Data,Typeable,Generic)
4917−-- | Creates a value of 'AlignReadGroupSetsRequest' with the minimum fields required to make a request.
3605+-- | Creates a value of 'Policy' with the minimum fields required to make a request.
4919-- Use one of the following lenses to modify other fields as desired:
3607-- Use one of the following lenses to modify other fields as desired:
4921−-- * 'argsrInterleavedFastqSource'
3609+-- * 'polEtag'
4923−-- * 'argsrReadGroupSetId'
4925−-- * 'argsrBamSourceURIs'
3611+-- * 'polVersion'
4927−-- * 'argsrPairedFastqSource'
3613+-- * 'polBindings'
4929−-- * 'argsrDatasetId'
3615+ :: Policy
4930−alignReadGroupSetsRequest
3616+policy =
4931− :: AlignReadGroupSetsRequest
3617+ Policy
4932−alignReadGroupSetsRequest =
3618+ { _polEtag = Nothing
4933− AlignReadGroupSetsRequest
3619+ , _polVersion = Nothing
4934− { _argsrInterleavedFastqSource = Nothing
3620+ , _polBindings = Nothing
4935− , _argsrReadGroupSetId = Nothing
4936− , _argsrBamSourceURIs = Nothing
4937− , _argsrPairedFastqSource = Nothing
4938− , _argsrDatasetId = Nothing
4941−-- | The interleaved FASTQ source files for alignment, where both members of
3623+-- | Can be used to perform a read-modify-write.
4942−-- each pair of reads are found on consecutive records within the same
3624+polEtag :: Lens' Policy (Maybe Word8)
4943−-- FASTQ file. Exactly one of readGroupSetId, bamSourceUris,
3625+polEtag = lens _polEtag (\ s a -> s{_polEtag = a})
4944−-- interleavedFastqSource or pairedFastqSource must be provided.
3626+
4945−argsrInterleavedFastqSource :: Lens' AlignReadGroupSetsRequest (Maybe InterleavedFastqSource)
3627+-- | Version of the \`Policy\`. The default version is 0.
4946−argsrInterleavedFastqSource
3628+polVersion :: Lens' Policy (Maybe Int32)
4947− = lens _argsrInterleavedFastqSource
3629+polVersion
4948− (\ s a -> s{_argsrInterleavedFastqSource = a})
3630+ = lens _polVersion (\ s a -> s{_polVersion = a})
4950−-- | The ID of the read group set which will be aligned. A new read group set
3632+-- | Associates a list of \`members\` to a \`role\`. Multiple \`bindings\`
4951−-- will be generated to hold the aligned data, the originals will not be
3633+-- must not be specified for the same \`role\`. \`bindings\` with no
4952−-- modified. The caller must have READ permissions for this read group set.
3634+-- members will result in an error.
4953−-- Exactly one of readGroupSetId, bamSourceUris, interleavedFastqSource or
3635+polBindings :: Lens' Policy [Binding]
4954−-- pairedFastqSource must be provided.
3636+polBindings
4955−argsrReadGroupSetId :: Lens' AlignReadGroupSetsRequest (Maybe Text)
3637+ = lens _polBindings (\ s a -> s{_polBindings = a}) .
4957− = lens _argsrReadGroupSetId
4958− (\ s a -> s{_argsrReadGroupSetId = a})
4960−-- | The BAM source files for alignment. Exactly one of readGroupSetId,
4961−-- bamSourceUris, interleavedFastqSource or pairedFastqSource must be
4962−-- provided. The caller must have READ permissions for these files.
4963−argsrBamSourceURIs :: Lens' AlignReadGroupSetsRequest [Text]
4965− = lens _argsrBamSourceURIs
4966− (\ s a -> s{_argsrBamSourceURIs = a})
4967− . _Default
3638+ _Default
4968 . _Coerce
3639 . _Coerce
4970−-- | The paired end FASTQ source files for alignment, where each member of a
4971−-- pair of reads are found in separate files. Exactly one of
4972−-- readGroupSetId, bamSourceUris, interleavedFastqSource or
4973−-- pairedFastqSource must be provided.
4974−argsrPairedFastqSource :: Lens' AlignReadGroupSetsRequest (Maybe PairedFastqSource)
4975−argsrPairedFastqSource
4976− = lens _argsrPairedFastqSource
4977− (\ s a -> s{_argsrPairedFastqSource = a})
4979−-- | Required. The ID of the dataset the newly aligned read group sets will
4980−-- belong to. The caller must have WRITE permissions to this dataset.
4981−argsrDatasetId :: Lens' AlignReadGroupSetsRequest (Maybe Text)
4983− = lens _argsrDatasetId
4984− (\ s a -> s{_argsrDatasetId = a})
4986−instance FromJSON AlignReadGroupSetsRequest where
3641+instance FromJSON Policy where
4987 parseJSON
3642 parseJSON
4988− = withObject "AlignReadGroupSetsRequest"
3643+ = withObject "Policy"
4990− AlignReadGroupSetsRequest <$>
3645+ Policy <$>
4991− (o .:? "interleavedFastqSource") <*>
3646+ (o .:? "etag") <*> (o .:? "version") <*>
4992− (o .:? "readGroupSetId")
4993− <*> (o .:? "bamSourceUris" .!= mempty)
3647+ (o .:? "bindings" .!= mempty))
4994− <*> (o .:? "pairedFastqSource")
3648+
4995− <*> (o .:? "datasetId"))
4997−instance ToJSON AlignReadGroupSetsRequest where
3649+instance ToJSON Policy where
4998− toJSON AlignReadGroupSetsRequest{..}
3650+ toJSON Policy{..}
4999 = object
3651 = object
5000 (catMaybes
3652 (catMaybes
5001− [("interleavedFastqSource" .=) <$>
3653+ [("etag" .=) <$> _polEtag,
5002− _argsrInterleavedFastqSource,
3654+ ("version" .=) <$> _polVersion,
5003− ("readGroupSetId" .=) <$> _argsrReadGroupSetId,
3655+ ("bindings" .=) <$> _polBindings])
5004− ("bamSourceUris" .=) <$> _argsrBamSourceURIs,
5005− ("pairedFastqSource" .=) <$> _argsrPairedFastqSource,
5006− ("datasetId" .=) <$> _argsrDatasetId])
5008-- | The variant data export request.
3657-- | The variant data export request.
@@ -5011,9 +3660,9 @@ instance ToJSON AlignReadGroupSetsRequest where
5011data ExportVariantSetRequest = ExportVariantSetRequest
3660data ExportVariantSetRequest = ExportVariantSetRequest
5012 { _evsrBigQueryDataset :: !(Maybe Text)
3661 { _evsrBigQueryDataset :: !(Maybe Text)
5013 , _evsrBigQueryTable :: !(Maybe Text)
3662 , _evsrBigQueryTable :: !(Maybe Text)
5014− , _evsrFormat :: !(Maybe ExportVariantSetRequestFormat)
3663+ , _evsrFormat :: !(Maybe Text)
5015− , _evsrProjectNumber :: !(Maybe Int64)
5016 , _evsrCallSetIds :: !(Maybe [Text])
3664 , _evsrCallSetIds :: !(Maybe [Text])
3665+ , _evsrProjectId :: !(Maybe Text)
5017 } deriving (Eq,Show,Data,Typeable,Generic)
3666 } deriving (Eq,Show,Data,Typeable,Generic)
5019-- | Creates a value of 'ExportVariantSetRequest' with the minimum fields required to make a request.
3668-- | Creates a value of 'ExportVariantSetRequest' with the minimum fields required to make a request.
@@ -5026,9 +3675,9 @@ data ExportVariantSetRequest = ExportVariantSetRequest
5027-- * 'evsrFormat'
3676-- * 'evsrFormat'
5029−-- * 'evsrProjectNumber'
5031-- * 'evsrCallSetIds'
3678-- * 'evsrCallSetIds'
3680+-- * 'evsrProjectId'
5032exportVariantSetRequest
3681exportVariantSetRequest
5033 :: ExportVariantSetRequest
3682 :: ExportVariantSetRequest
5034exportVariantSetRequest =
3683exportVariantSetRequest =
@@ -5036,8 +3685,8 @@ exportVariantSetRequest =
5036 { _evsrBigQueryDataset = Nothing
3685 { _evsrBigQueryDataset = Nothing
5037 , _evsrBigQueryTable = Nothing
3686 , _evsrBigQueryTable = Nothing
5038 , _evsrFormat = Nothing
3687 , _evsrFormat = Nothing
5039− , _evsrProjectNumber = Nothing
5040 , _evsrCallSetIds = Nothing
3688 , _evsrCallSetIds = Nothing
3689+ , _evsrProjectId = Nothing
5043-- | Required. The BigQuery dataset to export data to. This dataset must
3692-- | Required. The BigQuery dataset to export data to. This dataset must
@@ -5056,18 +3705,10 @@ evsrBigQueryTable
5056 (\ s a -> s{_evsrBigQueryTable = a})
3705 (\ s a -> s{_evsrBigQueryTable = a})
5058-- | The format for the exported data.
3707-- | The format for the exported data.
5059−evsrFormat :: Lens' ExportVariantSetRequest (Maybe ExportVariantSetRequestFormat)
3708+evsrFormat :: Lens' ExportVariantSetRequest (Maybe Text)
5060evsrFormat
3709evsrFormat
5061 = lens _evsrFormat (\ s a -> s{_evsrFormat = a})
3710 = lens _evsrFormat (\ s a -> s{_evsrFormat = a})
5063−-- | Required. The Google Cloud project number that owns the destination
5064−-- BigQuery dataset. The caller must have WRITE access to this project.
5065−-- This project will also own the resulting export job.
5066−evsrProjectNumber :: Lens' ExportVariantSetRequest (Maybe Int64)
5068− = lens _evsrProjectNumber
5069− (\ s a -> s{_evsrProjectNumber = a})
5071-- | If provided, only variant call information from the specified call sets
3712-- | If provided, only variant call information from the specified call sets
5072-- will be exported. By default all variant calls are exported.
3713-- will be exported. By default all variant calls are exported.
5073evsrCallSetIds :: Lens' ExportVariantSetRequest [Text]
3714evsrCallSetIds :: Lens' ExportVariantSetRequest [Text]
@@ -5077,6 +3718,14 @@ evsrCallSetIds
5077 . _Default
3718 . _Default
5078 . _Coerce
3719 . _Coerce
3721+-- | Required. The Google Cloud project ID that owns the destination BigQuery
3722+-- dataset. The caller must have WRITE access to this project. This project
3723+-- will also own the resulting export job.
3724+evsrProjectId :: Lens' ExportVariantSetRequest (Maybe Text)
3726+ = lens _evsrProjectId
3727+ (\ s a -> s{_evsrProjectId = a})
5080instance FromJSON ExportVariantSetRequest where
3729instance FromJSON ExportVariantSetRequest where
5081 parseJSON
3730 parseJSON
5082 = withObject "ExportVariantSetRequest"
3731 = withObject "ExportVariantSetRequest"
@@ -5084,8 +3733,8 @@ instance FromJSON ExportVariantSetRequest where
5084 ExportVariantSetRequest <$>
3733 ExportVariantSetRequest <$>
5085 (o .:? "bigqueryDataset") <*> (o .:? "bigqueryTable")
3734 (o .:? "bigqueryDataset") <*> (o .:? "bigqueryTable")
5086 <*> (o .:? "format")
3735 <*> (o .:? "format")
5087− <*> (o .:? "projectNumber")
5088− <*> (o .:? "callSetIds" .!= mempty))
3736+ <*> (o .:? "callSetIds" .!= mempty)
3737+ <*> (o .:? "projectId"))
5090instance ToJSON ExportVariantSetRequest where
3739instance ToJSON ExportVariantSetRequest where
5091 toJSON ExportVariantSetRequest{..}
3740 toJSON ExportVariantSetRequest{..}
@@ -5094,139 +3743,84 @@ instance ToJSON ExportVariantSetRequest where
5094 [("bigqueryDataset" .=) <$> _evsrBigQueryDataset,
3743 [("bigqueryDataset" .=) <$> _evsrBigQueryDataset,
5095 ("bigqueryTable" .=) <$> _evsrBigQueryTable,
3744 ("bigqueryTable" .=) <$> _evsrBigQueryTable,
5096 ("format" .=) <$> _evsrFormat,
3745 ("format" .=) <$> _evsrFormat,
5097− ("projectNumber" .=) <$> _evsrProjectNumber,
5098− ("callSetIds" .=) <$> _evsrCallSetIds])
3746+ ("callSetIds" .=) <$> _evsrCallSetIds,
5099−
3747+ ("projectId" .=) <$> _evsrProjectId])
5100−-- | The read group set export response.
5102−-- /See:/ 'exportReadGroupSetsResponse' smart constructor.
5103−newtype ExportReadGroupSetsResponse = ExportReadGroupSetsResponse
5104− { _ergsrJobId :: Maybe Text
5105− } deriving (Eq,Show,Data,Typeable,Generic)
5107−-- | Creates a value of 'ExportReadGroupSetsResponse' with the minimum fields required to make a request.
5109−-- Use one of the following lenses to modify other fields as desired:
5112−exportReadGroupSetsResponse
5113− :: ExportReadGroupSetsResponse
5114−exportReadGroupSetsResponse =
5115− ExportReadGroupSetsResponse
5116− { _ergsrJobId = Nothing
5119−-- | A job ID that can be used to get status information.
5120−ergsrJobId :: Lens' ExportReadGroupSetsResponse (Maybe Text)
5122− = lens _ergsrJobId (\ s a -> s{_ergsrJobId = a})
5124−instance FromJSON ExportReadGroupSetsResponse where
5126− = withObject "ExportReadGroupSetsResponse"
5128− ExportReadGroupSetsResponse <$> (o .:? "jobId"))
5130−instance ToJSON ExportReadGroupSetsResponse where
5131− toJSON ExportReadGroupSetsResponse{..}
5132− = object (catMaybes [("jobId" .=) <$> _ergsrJobId])
3749+-- | Metadata describing an Operation.
5135−-- /See:/ 'searchAnnotationsRequest' smart constructor.
3751+-- /See:/ 'operationMetadata' smart constructor.
5136−data SearchAnnotationsRequest = SearchAnnotationsRequest
3752+data OperationMetadata = OperationMetadata
5137− { _sarRange :: !(Maybe QueryRange)
3753+ { _omEvents :: !(Maybe [OperationEvent])
5138− , _sarPageToken :: !(Maybe Text)
3754+ , _omProjectId :: !(Maybe Text)
5139− , _sarAnnotationSetIds :: !(Maybe [Text])
3755+ , _omCreateTime :: !(Maybe Text)
5140− , _sarPageSize :: !(Maybe Int32)
3756+ , _omRequest :: !(Maybe OperationMetadataRequest)
5141 } deriving (Eq,Show,Data,Typeable,Generic)
3757 } deriving (Eq,Show,Data,Typeable,Generic)
5143−-- | Creates a value of 'SearchAnnotationsRequest' with the minimum fields required to make a request.
3759+-- | Creates a value of 'OperationMetadata' with the minimum fields required to make a request.
5145-- Use one of the following lenses to modify other fields as desired:
3761-- Use one of the following lenses to modify other fields as desired:
5147−-- * 'sarRange'
3763+-- * 'omEvents'
5149−-- * 'sarPageToken'
3765+-- * 'omProjectId'
5151−-- * 'sarAnnotationSetIds'
3767+-- * 'omCreateTime'
5153−-- * 'sarPageSize'
3769+-- * 'omRequest'
5154−searchAnnotationsRequest
3770+operationMetadata
5155− :: SearchAnnotationsRequest
3771+ :: OperationMetadata
5156−searchAnnotationsRequest =
3772+operationMetadata =
5157− SearchAnnotationsRequest
3773+ OperationMetadata
5158− { _sarRange = Nothing
3774+ { _omEvents = Nothing
5159− , _sarPageToken = Nothing
3775+ , _omProjectId = Nothing
5160− , _sarAnnotationSetIds = Nothing
3776+ , _omCreateTime = Nothing
5161− , _sarPageSize = Nothing
3777+ , _omRequest = Nothing
5164−-- | If specified, this query matches only annotations that overlap this
3780+-- | Optional event messages that were generated during the job\'s execution.
5165−-- range.
3781+-- This also contains any warnings that were generated during import or
5166−sarRange :: Lens' SearchAnnotationsRequest (Maybe QueryRange)
3782+-- export.
5167−sarRange = lens _sarRange (\ s a -> s{_sarRange = a})
3783+omEvents :: Lens' OperationMetadata [OperationEvent]
5169−-- | The continuation token, which is used to page through large result sets.
3785+ = lens _omEvents (\ s a -> s{_omEvents = a}) .
5170−-- To get the next page of results, set this parameter to the value of
5171−-- nextPageToken from the previous response.
5172−sarPageToken :: Lens' SearchAnnotationsRequest (Maybe Text)
5174− = lens _sarPageToken (\ s a -> s{_sarPageToken = a})
5176−-- | The annotation sets to search within. The caller must have READ access
5177−-- to these annotation sets. Required. All queried annotation sets must
5178−-- have the same type.
5179−sarAnnotationSetIds :: Lens' SearchAnnotationsRequest [Text]
5181− = lens _sarAnnotationSetIds
5182− (\ s a -> s{_sarAnnotationSetIds = a})
5183− . _Default
3786+ _Default
5184 . _Coerce
3787 . _Coerce
5186−-- | Specifies number of results to return in a single page. If unspecified,
3789+-- | The Google Cloud Project in which the job is scoped.
5187−-- it will default to 256. The maximum value is 2048.
3790+omProjectId :: Lens' OperationMetadata (Maybe Text)
5188−sarPageSize :: Lens' SearchAnnotationsRequest (Maybe Int32)
3791+omProjectId
5189−sarPageSize
3792+ = lens _omProjectId (\ s a -> s{_omProjectId = a})
5190− = lens _sarPageSize (\ s a -> s{_sarPageSize = a})
3793+
3794+-- | The time at which the job was submitted to the Genomics service.
3795+omCreateTime :: Lens' OperationMetadata (Maybe Text)
3797+ = lens _omCreateTime (\ s a -> s{_omCreateTime = a})
3799+-- | The original request that started the operation. Note that this will be
3800+-- in current version of the API. If the operation was started with v1beta2
3801+-- API and a GetOperation is performed on v1 API, a v1 request will be
3803+omRequest :: Lens' OperationMetadata (Maybe OperationMetadataRequest)
3805+ = lens _omRequest (\ s a -> s{_omRequest = a})
5192−instance FromJSON SearchAnnotationsRequest where
3807+instance FromJSON OperationMetadata where
5193 parseJSON
3808 parseJSON
5194− = withObject "SearchAnnotationsRequest"
3809+ = withObject "OperationMetadata"
5196− SearchAnnotationsRequest <$>
3811+ OperationMetadata <$>
5197− (o .:? "range") <*> (o .:? "pageToken") <*>
3812+ (o .:? "events" .!= mempty) <*> (o .:? "projectId")
5198− (o .:? "annotationSetIds" .!= mempty)
3813+ <*> (o .:? "createTime")
5199− <*> (o .:? "pageSize"))
3814+ <*> (o .:? "request"))
5201−instance ToJSON SearchAnnotationsRequest where
3816+instance ToJSON OperationMetadata where
5202− toJSON SearchAnnotationsRequest{..}
3817+ toJSON OperationMetadata{..}
5203 = object
3818 = object
5204 (catMaybes
3819 (catMaybes
5205− [("range" .=) <$> _sarRange,
3820+ [("events" .=) <$> _omEvents,
5206− ("pageToken" .=) <$> _sarPageToken,
3821+ ("projectId" .=) <$> _omProjectId,
5207− ("annotationSetIds" .=) <$> _sarAnnotationSetIds,
3822+ ("createTime" .=) <$> _omCreateTime,
5208− ("pageSize" .=) <$> _sarPageSize])
3823+ ("request" .=) <$> _omRequest])
5210−-- | A string which maps to an array of values.
5212−-- /See:/ 'metadataInfo' smart constructor.
5215− deriving (Eq,Show,Data,Typeable,Generic)
5217−-- | Creates a value of 'MetadataInfo' with the minimum fields required to make a request.
5221−metadataInfo = MetadataInfo
5223−instance FromJSON MetadataInfo where
5225− = withObject "MetadataInfo"
5226− (\ o -> pure MetadataInfo)
5228−instance ToJSON MetadataInfo where
5229− toJSON = const emptyObject
5231-- | The search variant sets response.
3825-- | The search variant sets response.
@@ -5371,7 +3965,7 @@ svrMaxCalls
5372-- | The continuation token, which is used to page through large result sets.
3966-- | The continuation token, which is used to page through large result sets.
5373-- To get the next page of results, set this parameter to the value of
3967-- To get the next page of results, set this parameter to the value of
5374−-- nextPageToken from the previous response.
3968+-- \`nextPageToken\` from the previous response.
5375svrPageToken :: Lens' SearchVariantsRequest (Maybe Text)
3969svrPageToken :: Lens' SearchVariantsRequest (Maybe Text)
5376svrPageToken
3970svrPageToken
5377 = lens _svrPageToken (\ s a -> s{_svrPageToken = a})
3971 = lens _svrPageToken (\ s a -> s{_svrPageToken = a})
@@ -5426,159 +4020,8 @@ instance ToJSON SearchVariantsRequest where
5426 ("variantSetIds" .=) <$> _svrVariantSetIds,
4020 ("variantSetIds" .=) <$> _svrVariantSetIds,
5427 ("pageSize" .=) <$> _svrPageSize])
4021 ("pageSize" .=) <$> _svrPageSize])
5429−-- | A string which maps to an array of values.
4023+-- | A map of additional call set information. This must be of the form map
5430−--
4024+-- (string key mapping to a list of string values).
5431−-- /See:/ 'annotationSetInfo' smart constructor.
5432−data AnnotationSetInfo =
5434− deriving (Eq,Show,Data,Typeable,Generic)
5436−-- | Creates a value of 'AnnotationSetInfo' with the minimum fields required to make a request.
5439− :: AnnotationSetInfo
5440−annotationSetInfo = AnnotationSetInfo
5442−instance FromJSON AnnotationSetInfo where
5444− = withObject "AnnotationSetInfo"
5445− (\ o -> pure AnnotationSetInfo)
5447−instance ToJSON AnnotationSetInfo where
5448− toJSON = const emptyObject
5452−-- /See:/ 'variantAnnotationCondition' smart constructor.
5453−data VariantAnnotationCondition = VariantAnnotationCondition
5454− { _vacExternalIds :: !(Maybe [ExternalId])
5455− , _vacNames :: !(Maybe [Text])
5456− , _vacConceptId :: !(Maybe Text)
5457− , _vacOmimId :: !(Maybe Text)
5458− } deriving (Eq,Show,Data,Typeable,Generic)
5460−-- | Creates a value of 'VariantAnnotationCondition' with the minimum fields required to make a request.
5462−-- Use one of the following lenses to modify other fields as desired:
5464−-- * 'vacExternalIds'
5471−variantAnnotationCondition
5472− :: VariantAnnotationCondition
5473−variantAnnotationCondition =
5474− VariantAnnotationCondition
5475− { _vacExternalIds = Nothing
5476− , _vacNames = Nothing
5477− , _vacConceptId = Nothing
5478− , _vacOmimId = Nothing
5481−-- | The set of external IDs for this condition.
5482−vacExternalIds :: Lens' VariantAnnotationCondition [ExternalId]
5484− = lens _vacExternalIds
5485− (\ s a -> s{_vacExternalIds = a})
5489−-- | A set of names for the condition.
5490−vacNames :: Lens' VariantAnnotationCondition [Text]
5492− = lens _vacNames (\ s a -> s{_vacNames = a}) .
5496−-- | The MedGen concept id associated with this gene. Search for these IDs at
5497−-- http:\/\/www.ncbi.nlm.nih.gov\/medgen\/
5498−vacConceptId :: Lens' VariantAnnotationCondition (Maybe Text)
5500− = lens _vacConceptId (\ s a -> s{_vacConceptId = a})
5502−-- | The OMIM id for this condition. Search for these IDs at
5503−-- http:\/\/omim.org\/
5504−vacOmimId :: Lens' VariantAnnotationCondition (Maybe Text)
5506− = lens _vacOmimId (\ s a -> s{_vacOmimId = a})
5508−instance FromJSON VariantAnnotationCondition where
5510− = withObject "VariantAnnotationCondition"
5512− VariantAnnotationCondition <$>
5513− (o .:? "externalIds" .!= mempty) <*>
5514− (o .:? "names" .!= mempty)
5515− <*> (o .:? "conceptId")
5516− <*> (o .:? "omimId"))
5518−instance ToJSON VariantAnnotationCondition where
5519− toJSON VariantAnnotationCondition{..}
5522− [("externalIds" .=) <$> _vacExternalIds,
5523− ("names" .=) <$> _vacNames,
5524− ("conceptId" .=) <$> _vacConceptId,
5525− ("omimId" .=) <$> _vacOmimId])
5528−-- /See:/ 'searchAnnotationSetsResponse' smart constructor.
5529−data SearchAnnotationSetsResponse = SearchAnnotationSetsResponse
5530− { _sasrNextPageToken :: !(Maybe Text)
5531− , _sasrAnnotationSets :: !(Maybe [AnnotationSet])
5532− } deriving (Eq,Show,Data,Typeable,Generic)
5534−-- | Creates a value of 'SearchAnnotationSetsResponse' with the minimum fields required to make a request.
5536−-- Use one of the following lenses to modify other fields as desired:
5538−-- * 'sasrNextPageToken'
5540−-- * 'sasrAnnotationSets'
5541−searchAnnotationSetsResponse
5542− :: SearchAnnotationSetsResponse
5543−searchAnnotationSetsResponse =
5544− SearchAnnotationSetsResponse
5545− { _sasrNextPageToken = Nothing
5546− , _sasrAnnotationSets = Nothing
5549−-- | The continuation token, which is used to page through large result sets.
5550−-- Provide this value in a subsequent request to return the next page of
5551−-- results. This field will be empty if there aren\'t any additional
5553−sasrNextPageToken :: Lens' SearchAnnotationSetsResponse (Maybe Text)
5555− = lens _sasrNextPageToken
5556− (\ s a -> s{_sasrNextPageToken = a})
5558−-- | The matching annotation sets.
5559−sasrAnnotationSets :: Lens' SearchAnnotationSetsResponse [AnnotationSet]
5561− = lens _sasrAnnotationSets
5562− (\ s a -> s{_sasrAnnotationSets = a})
5566−instance FromJSON SearchAnnotationSetsResponse where
5568− = withObject "SearchAnnotationSetsResponse"
5570− SearchAnnotationSetsResponse <$>
5571− (o .:? "nextPageToken") <*>
5572− (o .:? "annotationSets" .!= mempty))
5574−instance ToJSON SearchAnnotationSetsResponse where
5575− toJSON SearchAnnotationSetsResponse{..}
5578− [("nextPageToken" .=) <$> _sasrNextPageToken,
5579− ("annotationSets" .=) <$> _sasrAnnotationSets])
5581−-- | A string which maps to an array of values.
5583-- /See:/ 'callSetInfo' smart constructor.
4026-- /See:/ 'callSetInfo' smart constructor.
5584data CallSetInfo =
4027data CallSetInfo =
@@ -5598,265 +4041,85 @@ instance FromJSON CallSetInfo where
5598instance ToJSON CallSetInfo where
4041instance ToJSON CallSetInfo where
5599 toJSON = const emptyObject
4042 toJSON = const emptyObject
5601−-- | A 0-based half-open genomic coordinate range over a reference sequence,
4044+-- | Remaining structured metadata key-value pairs. This must be of the form
5602−-- for representing the position of a genomic resource.
4045+-- map (string key mapping to a list of string values).
5604−-- /See:/ 'rangePosition' smart constructor.
4047+-- /See:/ 'variantSetMetadataInfo' smart constructor.
5605−data RangePosition = RangePosition
4048+data VariantSetMetadataInfo =
5606− { _rpStart :: !(Maybe Int64)
4049+ VariantSetMetadataInfo
5607− , _rpReverseStrand :: !(Maybe Bool)
5608− , _rpReferenceId :: !(Maybe Text)
5609− , _rpReferenceName :: !(Maybe Text)
5610− , _rpEnd :: !(Maybe Int64)
5611− } deriving (Eq,Show,Data,Typeable,Generic)
5613−-- | Creates a value of 'RangePosition' with the minimum fields required to make a request.
5615−-- Use one of the following lenses to modify other fields as desired:
5619−-- * 'rpReverseStrand'
5621−-- * 'rpReferenceId'
5623−-- * 'rpReferenceName'
5630− { _rpStart = Nothing
5631− , _rpReverseStrand = Nothing
5632− , _rpReferenceId = Nothing
5633− , _rpReferenceName = Nothing
5637−-- | The start position of the range on the reference, 0-based inclusive.
5638−rpStart :: Lens' RangePosition (Maybe Int64)
5639−rpStart = lens _rpStart (\ s a -> s{_rpStart = a})
5641−-- | Whether this range refers to the reverse strand, as opposed to the
5642−-- forward strand. Note that regardless of this field, the start\/end
5643−-- position of the range always refer to the forward strand.
5644−rpReverseStrand :: Lens' RangePosition (Maybe Bool)
5646− = lens _rpReverseStrand
5647− (\ s a -> s{_rpReverseStrand = a})
5649−-- | The ID of the Google Genomics reference associated with this range.
5650−rpReferenceId :: Lens' RangePosition (Maybe Text)
5652− = lens _rpReferenceId
5653− (\ s a -> s{_rpReferenceId = a})
5655−-- | The display name corresponding to the reference specified by
5656−-- referenceId, for example chr1, 1, or chrX.
5657−rpReferenceName :: Lens' RangePosition (Maybe Text)
5659− = lens _rpReferenceName
5660− (\ s a -> s{_rpReferenceName = a})
5662−-- | The end position of the range on the reference, 0-based exclusive.
5663−rpEnd :: Lens' RangePosition (Maybe Int64)
5664−rpEnd = lens _rpEnd (\ s a -> s{_rpEnd = a})
5666−instance FromJSON RangePosition where
5668− = withObject "RangePosition"
5671− (o .:? "start") <*> (o .:? "reverseStrand") <*>
5672− (o .:? "referenceId")
5673− <*> (o .:? "referenceName")
5676−instance ToJSON RangePosition where
5677− toJSON RangePosition{..}
5680− [("start" .=) <$> _rpStart,
5681− ("reverseStrand" .=) <$> _rpReverseStrand,
5682− ("referenceId" .=) <$> _rpReferenceId,
5683− ("referenceName" .=) <$> _rpReferenceName,
5684− ("end" .=) <$> _rpEnd])
5686−-- | A transcript represents the assertion that a particular region of the
5687−-- reference genome may be transcribed as RNA.
5689−-- /See:/ 'transcript' smart constructor.
5690−data Transcript = Transcript
5691− { _tGeneId :: !(Maybe Text)
5692− , _tCodingSequence :: !(Maybe TranscriptCodingSequence)
5693− , _tExons :: !(Maybe [TranscriptExon])
5694− } deriving (Eq,Show,Data,Typeable,Generic)
4050+ deriving (Eq,Show,Data,Typeable,Generic)
5696−-- | Creates a value of 'Transcript' with the minimum fields required to make a request.
4052+-- | Creates a value of 'VariantSetMetadataInfo' with the minimum fields required to make a request.
5698−-- Use one of the following lenses to modify other fields as desired:
5702−-- * 'tCodingSequence'
4054+variantSetMetadataInfo
5703−--
4055+ :: VariantSetMetadataInfo
5704−-- * 'tExons'
4056+variantSetMetadataInfo = VariantSetMetadataInfo
5709− { _tGeneId = Nothing
5710− , _tCodingSequence = Nothing
5711− , _tExons = Nothing
5714−-- | The annotation ID of the gene from which this transcript is transcribed.
5715−tGeneId :: Lens' Transcript (Maybe Text)
5716−tGeneId = lens _tGeneId (\ s a -> s{_tGeneId = a})
5718−-- | The range of the coding sequence for this transcript, if any. To
5719−-- determine the exact ranges of coding sequence, intersect this range with
5720−-- those of the exons, if any. If there are any exons, the codingSequence
5721−-- must start and end within them. Note that in some cases, the reference
5722−-- genome will not exactly match the observed mRNA transcript e.g. due to
5723−-- variance in the source genome from reference. In these cases, exon.frame
5724−-- will not necessarily match the expected reference reading frame and
5725−-- coding exon reference bases cannot necessarily be concatenated to
5726−-- produce the original transcript mRNA.
5727−tCodingSequence :: Lens' Transcript (Maybe TranscriptCodingSequence)
5729− = lens _tCodingSequence
5730− (\ s a -> s{_tCodingSequence = a})
5732−-- | The exons that compose this transcript. This field should be unset for
5733−-- genomes where transcript splicing does not occur, for example
5734−-- prokaryotes. Introns are regions of the transcript that are not included
5735−-- in the spliced RNA product. Though not explicitly modeled here, intron
5736−-- ranges can be deduced; all regions of this transcript that are not exons
5737−-- are introns. Exonic sequences do not necessarily code for a
5738−-- translational product (amino acids). Only the regions of exons bounded
5739−-- by the codingSequence correspond to coding DNA sequence. Exons are
5740−-- ordered by start position and may not overlap.
5741−tExons :: Lens' Transcript [TranscriptExon]
5743− = lens _tExons (\ s a -> s{_tExons = a}) . _Default .
5746−instance FromJSON Transcript where
4058+instance FromJSON VariantSetMetadataInfo where
5747 parseJSON
4059 parseJSON
5748− = withObject "Transcript"
4060+ = withObject "VariantSetMetadataInfo"
5749− (\ o ->
4061+ (\ o -> pure VariantSetMetadataInfo)
5751− (o .:? "geneId") <*> (o .:? "codingSequence") <*>
5752− (o .:? "exons" .!= mempty))
5754−instance ToJSON Transcript where
4063+instance ToJSON VariantSetMetadataInfo where
5755− toJSON Transcript{..}
4064+ toJSON = const emptyObject
5758− [("geneId" .=) <$> _tGeneId,
5759− ("codingSequence" .=) <$> _tCodingSequence,
5760− ("exons" .=) <$> _tExons])
4066+-- | If importing ReadGroupSets, an ImportReadGroupSetsResponse is returned.
4067+-- If importing Variants, an ImportVariantsResponse is returned. For
4068+-- exports, an empty response is returned.
5763−-- /See:/ 'transcriptCodingSequence' smart constructor.
4070+-- /See:/ 'operationResponse' smart constructor.
5764−data TranscriptCodingSequence = TranscriptCodingSequence
4071+data OperationResponse =
5765− { _tcsStart :: !(Maybe Int64)
4072+ OperationResponse
5766− , _tcsEnd :: !(Maybe Int64)
5767− } deriving (Eq,Show,Data,Typeable,Generic)
4073+ deriving (Eq,Show,Data,Typeable,Generic)
5769−-- | Creates a value of 'TranscriptCodingSequence' with the minimum fields required to make a request.
4075+-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
5771−-- Use one of the following lenses to modify other fields as desired:
4077+operationResponse
5772−--
4078+ :: OperationResponse
5773−-- * 'tcsStart'
4079+operationResponse = OperationResponse
5776−transcriptCodingSequence
5777− :: TranscriptCodingSequence
5778−transcriptCodingSequence =
5779− TranscriptCodingSequence
5780− { _tcsStart = Nothing
5781− , _tcsEnd = Nothing
5784−-- | The start of the coding sequence on this annotation\'s reference
5785−-- sequence, 0-based inclusive. Note that this position is relative to the
5786−-- reference start, and not the containing annotation start.
5787−tcsStart :: Lens' TranscriptCodingSequence (Maybe Int64)
5788−tcsStart = lens _tcsStart (\ s a -> s{_tcsStart = a})
5790−-- | The end of the coding sequence on this annotation\'s reference sequence,
5791−-- 0-based exclusive. Note that this position is relative to the reference
5792−-- start, and not the containing annotation start.
5793−tcsEnd :: Lens' TranscriptCodingSequence (Maybe Int64)
5794−tcsEnd = lens _tcsEnd (\ s a -> s{_tcsEnd = a})
5796−instance FromJSON TranscriptCodingSequence where
4081+instance FromJSON OperationResponse where
5797 parseJSON
4082 parseJSON
5798− = withObject "TranscriptCodingSequence"
4083+ = withObject "OperationResponse"
5799− (\ o ->
4084+ (\ o -> pure OperationResponse)
5800− TranscriptCodingSequence <$>
5801− (o .:? "start") <*> (o .:? "end"))
5803−instance ToJSON TranscriptCodingSequence where
4086+instance ToJSON OperationResponse where
5804− toJSON TranscriptCodingSequence{..}
4087+ toJSON = const emptyObject
5807− [("start" .=) <$> _tcsStart, ("end" .=) <$> _tcsEnd])
5809−-- | The job search response.
4089+-- | An event that occurred during an Operation.
5811−-- /See:/ 'searchJobsResponse' smart constructor.
4091+-- /See:/ 'operationEvent' smart constructor.
5812−data SearchJobsResponse = SearchJobsResponse
4092+newtype OperationEvent = OperationEvent
5813− { _sjrNextPageToken :: !(Maybe Text)
4093+ { _oeDescription :: Maybe Text
5814− , _sjrJobs :: !(Maybe [Job])
5815 } deriving (Eq,Show,Data,Typeable,Generic)
4094 } deriving (Eq,Show,Data,Typeable,Generic)
5817−-- | Creates a value of 'SearchJobsResponse' with the minimum fields required to make a request.
4096+-- | Creates a value of 'OperationEvent' with the minimum fields required to make a request.
5819-- Use one of the following lenses to modify other fields as desired:
4098-- Use one of the following lenses to modify other fields as desired:
5821−-- * 'sjrNextPageToken'
4100+-- * 'oeDescription'
5822−--
4101+operationEvent
5823−-- * 'sjrJobs'
4102+ :: OperationEvent
5824−searchJobsResponse
4103+operationEvent =
5825− :: SearchJobsResponse
4104+ OperationEvent
5826−searchJobsResponse =
4105+ { _oeDescription = Nothing
5828− { _sjrNextPageToken = Nothing
5829− , _sjrJobs = Nothing
5832−-- | The continuation token which is used to page through large result sets.
4108+-- | Required description of event.
5833−-- Provide this value is a subsequent request to return the next page of
4109+oeDescription :: Lens' OperationEvent (Maybe Text)
5834−-- results. This field will be empty if there are no more results.
4110+oeDescription
5835−sjrNextPageToken :: Lens' SearchJobsResponse (Maybe Text)
4111+ = lens _oeDescription
5836−sjrNextPageToken
4112+ (\ s a -> s{_oeDescription = a})
5837− = lens _sjrNextPageToken
5838− (\ s a -> s{_sjrNextPageToken = a})
5840−-- | The list of jobs results, ordered newest to oldest.
5841−sjrJobs :: Lens' SearchJobsResponse [Job]
5843− = lens _sjrJobs (\ s a -> s{_sjrJobs = a}) . _Default
5846−instance FromJSON SearchJobsResponse where
4114+instance FromJSON OperationEvent where
5847 parseJSON
4115 parseJSON
5848− = withObject "SearchJobsResponse"
4116+ = withObject "OperationEvent"
5849− (\ o ->
4117+ (\ o -> OperationEvent <$> (o .:? "description"))
5850− SearchJobsResponse <$>
5851− (o .:? "nextPageToken") <*>
5852− (o .:? "jobs" .!= mempty))
5854−instance ToJSON SearchJobsResponse where
4119+instance ToJSON OperationEvent where
5855− toJSON SearchJobsResponse{..}
4120+ toJSON OperationEvent{..}
5856 = object
4121 = object
5857− (catMaybes
4122+ (catMaybes [("description" .=) <$> _oeDescription])
5858− [("nextPageToken" .=) <$> _sjrNextPageToken,
5859− ("jobs" .=) <$> _sjrJobs])
5861-- | ReferenceBound records an upper bound for the starting coordinate of
4124-- | ReferenceBound records an upper bound for the starting coordinate of
5862-- variants in a particular reference.
4125-- variants in a particular reference.
@@ -5908,6 +4171,88 @@ instance ToJSON ReferenceBound where
5908 [("upperBound" .=) <$> _rbUpperBound,
4171 [("upperBound" .=) <$> _rbUpperBound,
5909 ("referenceName" .=) <$> _rbReferenceName])
4172 ("referenceName" .=) <$> _rbReferenceName])
4175+-- /See:/ 'undeleteDatasetRequest' smart constructor.
4176+data UndeleteDatasetRequest =
4177+ UndeleteDatasetRequest
4178+ deriving (Eq,Show,Data,Typeable,Generic)
4180+-- | Creates a value of 'UndeleteDatasetRequest' with the minimum fields required to make a request.
4182+undeleteDatasetRequest
4183+ :: UndeleteDatasetRequest
4184+undeleteDatasetRequest = UndeleteDatasetRequest
4186+instance FromJSON UndeleteDatasetRequest where
4188+ = withObject "UndeleteDatasetRequest"
4189+ (\ o -> pure UndeleteDatasetRequest)
4191+instance ToJSON UndeleteDatasetRequest where
4192+ toJSON = const emptyObject
4194+-- | Associates \`members\` with a \`role\`.
4196+-- /See:/ 'binding' smart constructor.
4197+data Binding = Binding
4198+ { _bMembers :: !(Maybe [Text])
4199+ , _bRole :: !(Maybe Text)
4200+ } deriving (Eq,Show,Data,Typeable,Generic)
4202+-- | Creates a value of 'Binding' with the minimum fields required to make a request.
4204+-- Use one of the following lenses to modify other fields as desired:
4213+ { _bMembers = Nothing
4217+-- | Specifies the identities requesting access for a Cloud Platform
4218+-- resource. \`members\` can have the following formats: * \`allUsers\`: A
4219+-- special identifier that represents anyone who is on the internet; with
4220+-- or without a Google account. * \`allAuthenticatedUsers\`: A special
4221+-- identifier that represents anyone who is authenticated with a Google
4222+-- account or a service account. * \`user:{emailid}\`: An email address
4223+-- that represents a specific Google account. For example,
4224+-- \`alice\'gmail.com\` or \`joe\'example.com\`. *
4225+-- \`serviceAccount:{emailid}\`: An email address that represents a service
4226+-- account. For example, \`my-other-app\'appspot.gserviceaccount.com\`. *
4227+-- \`group:{emailid}\`: An email address that represents a Google group.
4228+-- For example, \`admins\'example.com\`. * \`domain:{domain}\`: A Google
4229+-- Apps domain name that represents all the users of that domain. For
4230+-- example, \`google.com\` or \`example.com\`.
4231+bMembers :: Lens' Binding [Text]
4233+ = lens _bMembers (\ s a -> s{_bMembers = a}) .
4237+-- | Role that is assigned to \`members\`. For example, \`roles\/viewer\`,
4238+-- \`roles\/editor\`, or \`roles\/owner\`. Required
4239+bRole :: Lens' Binding (Maybe Text)
4240+bRole = lens _bRole (\ s a -> s{_bRole = a})
4242+instance FromJSON Binding where
4244+ = withObject "Binding"
4247+ (o .:? "members" .!= mempty) <*> (o .:? "role"))
4249+instance ToJSON Binding where
4253+ [("members" .=) <$> _bMembers,
4254+ ("role" .=) <$> _bRole])
5911-- | An abstraction for referring to a genomic position, in relation to some
4256-- | An abstraction for referring to a genomic position, in relation to some
5912-- already known reference. For now, represents a genomic position as a
4257-- already known reference. For now, represents a genomic position as a
5913-- reference name, a base number on that reference (0-based), and a
4258-- reference name, a base number on that reference (0-based), and a
@@ -6028,7 +4373,7 @@ instance ToJSON SearchReadGroupSetsResponse where
6028 [("nextPageToken" .=) <$> _srgsrNextPageToken,
4373 [("nextPageToken" .=) <$> _srgsrNextPageToken,
6029 ("readGroupSets" .=) <$> _srgsrReadGroupSets])
4374 ("readGroupSets" .=) <$> _srgsrReadGroupSets])
6031−-- | A string which maps to an array of values.
4376+-- | A map of additional read group set information.
6033-- /See:/ 'readGroupSetInfo' smart constructor.
4378-- /See:/ 'readGroupSetInfo' smart constructor.
6034data ReadGroupSetInfo =
4379data ReadGroupSetInfo =
@@ -6050,10 +4395,10 @@ instance ToJSON ReadGroupSetInfo where
6050 toJSON = const emptyObject
4395 toJSON = const emptyObject
6052-- | A reference set is a set of references which typically comprise a
4397-- | A reference set is a set of references which typically comprise a
6053−-- reference assembly for a species, such as GRCh38 which is representative
4398+-- reference assembly for a species, such as \`GRCh38\` which is
6054−-- of the human genome. A reference set defines a common coordinate space
4399+-- representative of the human genome. A reference set defines a common
6055−-- for comparing reference-aligned experimental data. A reference set
4400+-- coordinate space for comparing reference-aligned experimental data. A
6056−-- contains 1 or more references.
4401+-- reference set contains 1 or more references.
6058-- /See:/ 'referenceSet' smart constructor.
4403-- /See:/ 'referenceSet' smart constructor.
6059data ReferenceSet = ReferenceSet
4404data ReferenceSet = ReferenceSet
@@ -6101,7 +4446,7 @@ referenceSet =
6103-- | All known corresponding accession IDs in INSDC (GenBank\/ENA\/DDBJ)
4448-- | All known corresponding accession IDs in INSDC (GenBank\/ENA\/DDBJ)
6104−-- ideally with a version number, for example NC_000001.11.
4449+-- ideally with a version number, for example \`NC_000001.11\`.
6105rsSourceAccessions :: Lens' ReferenceSet [Text]
4450rsSourceAccessions :: Lens' ReferenceSet [Text]
6106rsSourceAccessions
4451rsSourceAccessions
6107 = lens _rsSourceAccessions
4452 = lens _rsSourceAccessions
@@ -6110,7 +4455,7 @@ rsSourceAccessions
6110 . _Coerce
4455 . _Coerce
6112-- | The IDs of the reference objects that are part of this set.
4457-- | The IDs of the reference objects that are part of this set.
6113−-- Reference.md5checksum must be unique within this set.
4458+-- \`Reference.md5checksum\` must be unique within this set.
6114rsReferenceIds :: Lens' ReferenceSet [Text]
4459rsReferenceIds :: Lens' ReferenceSet [Text]
6115rsReferenceIds
4460rsReferenceIds
6116 = lens _rsReferenceIds
4461 = lens _rsReferenceIds
@@ -6120,7 +4465,7 @@ rsReferenceIds
6121-- | Order-independent MD5 checksum which identifies this reference set. The
4466-- | Order-independent MD5 checksum which identifies this reference set. The
6122-- checksum is computed by sorting all lower case hexidecimal string
4467-- checksum is computed by sorting all lower case hexidecimal string
6123−-- reference.md5checksum (for all reference in this set) in ascending
4468+-- \`reference.md5checksum\` (for all reference in this set) in ascending
6124-- lexicographic order, concatenating, and taking the MD5 of that value.
4469-- lexicographic order, concatenating, and taking the MD5 of that value.
6125-- The resulting value is represented in lower case hexadecimal format.
4470-- The resulting value is represented in lower case hexadecimal format.
6126rsMD5checksum :: Lens' ReferenceSet (Maybe Text)
4471rsMD5checksum :: Lens' ReferenceSet (Maybe Text)
@@ -6130,7 +4475,7 @@ rsMD5checksum
6131-- | ID from http:\/\/www.ncbi.nlm.nih.gov\/taxonomy (e.g. 9606->human)
4476-- | ID from http:\/\/www.ncbi.nlm.nih.gov\/taxonomy (e.g. 9606->human)
6132-- indicating the species which this assembly is intended to model. Note
4477-- indicating the species which this assembly is intended to model. Note
6133−-- that contained references may specify a different ncbiTaxonId, as
4478+-- that contained references may specify a different \`ncbiTaxonId\`, as
6134-- assemblies may contain reference sequences which do not belong to the
4479-- assemblies may contain reference sequences which do not belong to the
6135-- modeled species, e.g. EBV in a human reference genome.
4480-- modeled species, e.g. EBV in a human reference genome.
6136rsNcbiTaxonId :: Lens' ReferenceSet (Maybe Int32)
4481rsNcbiTaxonId :: Lens' ReferenceSet (Maybe Int32)
@@ -6138,11 +4483,11 @@ rsNcbiTaxonId
6138 = lens _rsNcbiTaxonId
4483 = lens _rsNcbiTaxonId
6139 (\ s a -> s{_rsNcbiTaxonId = a})
4484 (\ s a -> s{_rsNcbiTaxonId = a})
6141−-- | The Google generated immutable ID of the reference set.
4486+-- | The server-generated reference set ID, unique across all reference sets.
6142rsId :: Lens' ReferenceSet (Maybe Text)
4487rsId :: Lens' ReferenceSet (Maybe Text)
6143rsId = lens _rsId (\ s a -> s{_rsId = a})
4488rsId = lens _rsId (\ s a -> s{_rsId = a})
6145−-- | Public id of this reference set, such as GRCh37.
4490+-- | Public id of this reference set, such as \`GRCh37\`.
6146rsAssemblyId :: Lens' ReferenceSet (Maybe Text)
4491rsAssemblyId :: Lens' ReferenceSet (Maybe Text)
6147rsAssemblyId
4492rsAssemblyId
6148 = lens _rsAssemblyId (\ s a -> s{_rsAssemblyId = a})
4493 = lens _rsAssemblyId (\ s a -> s{_rsAssemblyId = a})
@@ -6169,7 +4514,7 @@ instance FromJSON ReferenceSet where
6169 <*> (o .:? "ncbiTaxonId")
4514 <*> (o .:? "ncbiTaxonId")
6170 <*> (o .:? "id")
4515 <*> (o .:? "id")
6171 <*> (o .:? "assemblyId")
4516 <*> (o .:? "assemblyId")
6172− <*> (o .:? "sourceURI")
4517+ <*> (o .:? "sourceUri")
6173 <*> (o .:? "description"))
4518 <*> (o .:? "description"))
6175instance ToJSON ReferenceSet where
4520instance ToJSON ReferenceSet where
@@ -6182,5 +4527,5 @@ instance ToJSON ReferenceSet where
6182 ("ncbiTaxonId" .=) <$> _rsNcbiTaxonId,
4527 ("ncbiTaxonId" .=) <$> _rsNcbiTaxonId,
6183 ("id" .=) <$> _rsId,
4528 ("id" .=) <$> _rsId,
6184 ("assemblyId" .=) <$> _rsAssemblyId,
4529 ("assemblyId" .=) <$> _rsAssemblyId,
6185− ("sourceURI" .=) <$> _rsSourceURI,
4530+ ("sourceUri" .=) <$> _rsSourceURI,
6186 ("description" .=) <$> _rsDescription])
4531 ("description" .=) <$> _rsDescription])