{-# LANGUAGE DeriveDataTypeable    #-}
{-# LANGUAGE DeriveGeneric         #-}
{-# LANGUAGE FlexibleContexts      #-}
{-# LANGUAGE FlexibleInstances     #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedLists       #-}
{-# LANGUAGE OverloadedStrings     #-}
{-# LANGUAGE PackageImports        #-}
{-# LANGUAGE RecordWildCards       #-}
{-# LANGUAGE TemplateHaskell       #-}
{-# LANGUAGE TypeFamilies          #-}
{-# Language QuasiQuotes           #-}

-- |
-- Module      :  Data.SAM.Version1_6.Header.SQ
-- Copyright   :  (c) Matthew Mosior 2023
-- License     :  BSD-style
-- Maintainer  :  mattm.github@gmail.com
-- Portability :  portable
--
-- = WARNING
--
-- This module is considered __internal__.
--
-- The Package Versioning Policy __does not apply__.
--
-- The contents of this module may change __in any way whatsoever__
-- and __without any warning__ between minor versions of this package.
--
-- Authors importing this library are expected to track development
-- closely.
--
-- All credit goes to the author(s)/maintainer(s) of the
-- [containers](https://hackage.haskell.org/package/containers) library
-- for the above warning text.
--
-- = Description
--
-- This library enables the decoding/encoding of SAM, BAM and CRAM file formats.

module Data.SAM.Version1_6.Header.SQ ( -- * SAM version 1.6 Reference sequence dictionary data type
                                       SAM_V1_6_Reference_Sequence_Dictionary(..),
                                       -- * SAM version 1.6 Reference sequence dictionary data types
                                       SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_Description(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_Species(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology(..),
                                       SAM_V1_6_Reference_Sequence_Dictionary_URI(..)
                                     ) where

import Data.ByteString
import Data.Data
import Data.Sequence
import Data.Word
import Generics.Deriving.Base

-- | Custom SAM (version 1.6) @"SAM_V1_6_Reference_Sequence_Dictionary"@ data type.
-- See section 1.3 of the [SAM v1.6](http://samtools.github.io/hts-specs/SAMv1.pdf) specification documentation.
data SAM_V1_6_Reference_Sequence_Dictionary = SAM_V1_6_Reference_Sequence_Dictionary { SAM_V1_6_Reference_Sequence_Dictionary
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
sam_v1_6_reference_sequence_dictionary_reference_sequence_name                        :: SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
sam_v1_6_reference_sequence_dictionary_reference_sequence_length                      :: SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
sam_v1_6_reference_sequence_dictionary_reference_alternative_locus                    :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe
     SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
sam_v1_6_reference_sequence_dictionary_reference_alternative_reference_sequence_names :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe
     SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier                     :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe SAM_V1_6_Reference_Sequence_Dictionary_Description
sam_v1_6_reference_sequence_dictionary_description                                    :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_Description
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
sam_v1_6_reference_sequence_dictionary_md5_checksum                                   :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe SAM_V1_6_Reference_Sequence_Dictionary_Species
sam_v1_6_reference_sequence_dictionary_species                                        :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_Species
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
sam_v1_6_reference_sequence_dictionary_molecule_topology                              :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology                                       
                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary
-> Maybe SAM_V1_6_Reference_Sequence_Dictionary_URI
sam_v1_6_reference_sequence_dictionary_uri                                            :: Maybe SAM_V1_6_Reference_Sequence_Dictionary_URI 
                                                                                     }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary
 -> Rep SAM_V1_6_Reference_Sequence_Dictionary x)
-> (forall x.
    Rep SAM_V1_6_Reference_Sequence_Dictionary x
    -> SAM_V1_6_Reference_Sequence_Dictionary)
-> Generic SAM_V1_6_Reference_Sequence_Dictionary
forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary x
-> SAM_V1_6_Reference_Sequence_Dictionary
forall x.
SAM_V1_6_Reference_Sequence_Dictionary
-> Rep SAM_V1_6_Reference_Sequence_Dictionary x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary
-> Rep SAM_V1_6_Reference_Sequence_Dictionary x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary
-> Rep SAM_V1_6_Reference_Sequence_Dictionary x
$cto :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary x
-> SAM_V1_6_Reference_Sequence_Dictionary
to :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary x
-> SAM_V1_6_Reference_Sequence_Dictionary
Generic,Typeable)

instance Show SAM_V1_6_Reference_Sequence_Dictionary where
  show :: SAM_V1_6_Reference_Sequence_Dictionary -> String
show (SAM_V1_6_Reference_Sequence_Dictionary SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
reference_sequence_name
                                               SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
reference_sequence_length
                                               Maybe SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
reference_alternative_locus
                                               Maybe
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
reference_alternative_sequence_names
                                               Maybe
  SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
genome_assembly_identifier
                                               Maybe SAM_V1_6_Reference_Sequence_Dictionary_Description
description
                                               Maybe SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
md5_checksum
                                               Maybe SAM_V1_6_Reference_Sequence_Dictionary_Species
species
                                               Maybe SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
molecule_topology
                                               Maybe SAM_V1_6_Reference_Sequence_Dictionary_URI
uri
       ) =
    String
"SAM_V1_6_Reference_Sequence_Dictionary { "  String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
"reference_sequence_name = "                 String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> String
forall a. Show a => a -> String
show SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
reference_sequence_name)               String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , reference_sequence_length = "            String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> String
forall a. Show a => a -> String
show SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
reference_sequence_length)             String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , reference_alternative_locus = "          String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
-> String
forall a. Show a => a -> String
show Maybe SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
reference_alternative_locus)           String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , reference_alternative_sequence_names = " String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> String
forall a. Show a => a -> String
show Maybe
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
reference_alternative_sequence_names)  String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , genome_assembly_identifier = "           String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe
  SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> String
forall a. Show a => a -> String
show Maybe
  SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
genome_assembly_identifier)            String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , description = "                          String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe SAM_V1_6_Reference_Sequence_Dictionary_Description -> String
forall a. Show a => a -> String
show Maybe SAM_V1_6_Reference_Sequence_Dictionary_Description
description)                           String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , md5_checksum = "                         String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum -> String
forall a. Show a => a -> String
show Maybe SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
md5_checksum)                          String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , species = "                              String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe SAM_V1_6_Reference_Sequence_Dictionary_Species -> String
forall a. Show a => a -> String
show Maybe SAM_V1_6_Reference_Sequence_Dictionary_Species
species)                               String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , molecule_topology = "                    String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
-> String
forall a. Show a => a -> String
show Maybe SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
molecule_topology)                     String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , uri = "                                  String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Maybe SAM_V1_6_Reference_Sequence_Dictionary_URI -> String
forall a. Show a => a -> String
show Maybe SAM_V1_6_Reference_Sequence_Dictionary_URI
uri)                                   String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" }"

-- | SN tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name = SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name { SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_tag   :: Seq Word8
                                                                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_value :: ByteString 
                         }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
 -> Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x)
-> (forall x.
    Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name)
-> Generic
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x
$cto :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
to :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name x
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name where
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_tag1   Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_name_value2  

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name
-> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name Seq Word8
tag ByteString
value) =
    String
"SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Name { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
"tag = "                                                            String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                                          String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , value = "                                                       String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                                        String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" }"

-- | LN tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length = SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length { SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_tag   :: Seq Word8
                                                                                                                                         , SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_value :: ByteString
                             }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
 -> Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x)
-> (forall x.
    Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length)
-> Generic
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x
$cto :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
to :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length x
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length where
  SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_reference_sequence_length_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length
-> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length Seq Word8
tag ByteString
value) =
    String
"SAM_V1_6_Reference_Sequence_Dictionary_Reference_Sequence_Length { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
"tag = "                                                              String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                                            String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , value = "                                                         String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                                          String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" }"

-- | AH tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus = SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus { SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
-> Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_locus_tag   :: Seq Word8
                                                                                                                         , SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
-> ByteString
sam_v1_6_reference_sequence_dictionary_alternative_locus_value :: ByteString
             }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
 -> Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x)
-> (forall x.
    Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus)
-> Generic SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x
$cto :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
to :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus x
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus where
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_locus_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_alternative_locus_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus -> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_locus_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_alternative_locus_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_locus_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_locus_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_alternative_locus_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_alternative_locus_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus -> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus Seq Word8
tag ByteString
value) =
    String
"SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Locus { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
"tag = "                                                      String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                                    String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , value = "                                                 String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                                  String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" }"

-- | AN tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names = SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names { SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_tag   :: Seq Word8
                                                                                                                                                               , SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> ByteString
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_value :: ByteString
                                                                                                                                                               }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
 -> Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
      x)
-> (forall x.
    Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
      x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names)
-> Generic
     SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
  x
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
     x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
     x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
     x
$cto :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
  x
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
to :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
  x
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names where
  SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_alternative_reference_sequence_names_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names
-> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names Seq Word8
tag ByteString
value) = String
"SAM_V1_6_Reference_Sequence_Dictionary_Alternative_Reference_Sequence_Names { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                                 String
"tag = "                                                                         String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                                 (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                                                       String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                                 String
" , value = "                                                                    String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                                 (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                                                     String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                                 String
" }"

-- | AS tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier = SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier { SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> Seq Word8
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_tag   :: Seq Word8
                                                                                                                                           , SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> ByteString
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_value :: ByteString
                                                                                                                                           }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
 -> Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
      x)
-> (forall x.
    Rep
      SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier)
-> Generic
     SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier x
-> SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> Rep
     SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier x
$cto :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier x
-> SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
to :: forall x.
Rep
  SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier x
-> SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier where
  SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier Seq Word8
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier Seq Word8
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_genome_assembly_identifier_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier
-> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier Seq Word8
tag ByteString
value) = String
"SAM_V1_6_Reference_Sequence_Dictionary_Genome_Assembly_Identifier { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                       String
"tag = "                                                               String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                       (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                                             String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                       String
" , value = "                                                          String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                       (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                                           String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                                       String
" }"

-- | DS tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Description = SAM_V1_6_Reference_Sequence_Dictionary_Description { SAM_V1_6_Reference_Sequence_Dictionary_Description -> Seq Word8
sam_v1_6_reference_sequence_dictionary_description_tag   :: Seq Word8
                                                                                                             , SAM_V1_6_Reference_Sequence_Dictionary_Description -> ByteString
sam_v1_6_reference_sequence_dictionary_description_value :: ByteString
                                                                                                             }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Description
 -> Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x)
-> (forall x.
    Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Description)
-> Generic SAM_V1_6_Reference_Sequence_Dictionary_Description
forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x
-> SAM_V1_6_Reference_Sequence_Dictionary_Description
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Description
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Description
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Description
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x
$cto :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x
-> SAM_V1_6_Reference_Sequence_Dictionary_Description
to :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Description x
-> SAM_V1_6_Reference_Sequence_Dictionary_Description
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Description where
  SAM_V1_6_Reference_Sequence_Dictionary_Description Seq Word8
sam_v1_6_reference_sequence_dictionary_description_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_description_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Description
-> SAM_V1_6_Reference_Sequence_Dictionary_Description -> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Description Seq Word8
sam_v1_6_reference_sequence_dictionary_description_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_description_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_description_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_description_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_description_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_description_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Description where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Description -> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Description Seq Word8
tag ByteString
value) = String
"SAM_V1_6_Reference_Sequence_Dictionary_Description { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                        String
"tag = "                                                String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                        (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                              String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                        String
" , value = "                                           String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                        (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                            String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                        String
" }"

-- | M5 tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum = SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum { SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum -> Seq Word8
sam_v1_6_reference_sequence_dictionary_md5_checksum_tag   :: Seq Word8
                                                                                                               , SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum -> ByteString
sam_v1_6_reference_sequence_dictionary_md5_checksum_value :: ByteString
                                                                                                               }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
 -> Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x)
-> (forall x.
    Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x
    -> SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum)
-> Generic SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x
-> SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x
$cto :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x
-> SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
to :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum x
-> SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum where
  SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum Seq Word8
sam_v1_6_reference_sequence_dictionary_md5_checksum_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_md5_checksum_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum
-> SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum -> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum Seq Word8
sam_v1_6_reference_sequence_dictionary_md5_checksum_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_md5_checksum_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_md5_checksum_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_md5_checksum_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_md5_checksum_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_md5_checksum_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum -> String
show (SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum Seq Word8
tag ByteString
value) = String
"SAM_V1_6_Reference_Sequence_Dictionary_MD5_Checksum { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                         String
"tag = "                                                 String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                         (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                               String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                         String
" , value = "                                            String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                         (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                             String -> ShowS
forall a. [a] -> [a] -> [a]
++
                                                                         String
" }"

-- | SP tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Species = SAM_V1_6_Reference_Sequence_Dictionary_Species { SAM_V1_6_Reference_Sequence_Dictionary_Species -> Seq Word8
sam_v1_6_reference_sequence_dictionary_species_tag   :: Seq Word8
                                                                                                     , SAM_V1_6_Reference_Sequence_Dictionary_Species -> ByteString
sam_v1_6_reference_sequence_dictionary_species_value :: ByteString
                                                                                                     }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Species
 -> Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x)
-> (forall x.
    Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Species)
-> Generic SAM_V1_6_Reference_Sequence_Dictionary_Species
forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x
-> SAM_V1_6_Reference_Sequence_Dictionary_Species
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Species
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Species
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Species
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x
$cto :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x
-> SAM_V1_6_Reference_Sequence_Dictionary_Species
to :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Species x
-> SAM_V1_6_Reference_Sequence_Dictionary_Species
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Species where
  SAM_V1_6_Reference_Sequence_Dictionary_Species Seq Word8
sam_v1_6_reference_sequence_dictionary_species_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_species_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Species
-> SAM_V1_6_Reference_Sequence_Dictionary_Species -> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Species Seq Word8
sam_v1_6_reference_sequence_dictionary_species_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_species_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_species_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_species_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_species_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_species_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Species where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Species -> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Species Seq Word8
tag ByteString
value) =
    String
"SAM_V1_6_Reference_Sequence_Dictionary_Species { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
"tag = "                                            String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                          String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , value = "                                       String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                        String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" }"

-- | TP tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology = SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology { SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
-> Seq Word8
sam_v1_6_reference_sequence_dictionary_molecule_topology_tag   :: Seq Word8
                                                                                                                         , SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
-> ByteString
sam_v1_6_reference_sequence_dictionary_molecule_topology_value :: ByteString
                                                                                                                         }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
 -> Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x)
-> (forall x.
    Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x
    -> SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology)
-> Generic SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x
-> SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x
$cto :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x
-> SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
to :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology x
-> SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology where
  SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology Seq Word8
sam_v1_6_reference_sequence_dictionary_molecule_topology_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_molecule_topology_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology
-> SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology -> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology Seq Word8
sam_v1_6_reference_sequence_dictionary_molecule_topology_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_molecule_topology_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_molecule_topology_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_molecule_topology_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_molecule_topology_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_molecule_topology_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology -> String
show (SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology Seq Word8
tag ByteString
value) =
    String
"SAM_V1_6_Reference_Sequence_Dictionary_Molecule_Topology { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
"tag = "                                                      String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                                    String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , value = "                                                 String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                                  String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" }"

-- | UR tag for @"SAM_V1_6_Reference_Sequence_Dictionary"@.
data SAM_V1_6_Reference_Sequence_Dictionary_URI = SAM_V1_6_Reference_Sequence_Dictionary_URI { SAM_V1_6_Reference_Sequence_Dictionary_URI -> Seq Word8
sam_v1_6_reference_sequence_dictionary_uri_tag   :: Seq Word8
                                                                                             , SAM_V1_6_Reference_Sequence_Dictionary_URI -> ByteString
sam_v1_6_reference_sequence_dictionary_uri_value :: ByteString
                                                                                             }
  deriving ((forall x.
 SAM_V1_6_Reference_Sequence_Dictionary_URI
 -> Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x)
-> (forall x.
    Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x
    -> SAM_V1_6_Reference_Sequence_Dictionary_URI)
-> Generic SAM_V1_6_Reference_Sequence_Dictionary_URI
forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x
-> SAM_V1_6_Reference_Sequence_Dictionary_URI
forall x.
SAM_V1_6_Reference_Sequence_Dictionary_URI
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_URI
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x
from :: forall x.
SAM_V1_6_Reference_Sequence_Dictionary_URI
-> Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x
$cto :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x
-> SAM_V1_6_Reference_Sequence_Dictionary_URI
to :: forall x.
Rep SAM_V1_6_Reference_Sequence_Dictionary_URI x
-> SAM_V1_6_Reference_Sequence_Dictionary_URI
Generic,Typeable)

instance Eq SAM_V1_6_Reference_Sequence_Dictionary_URI where
  SAM_V1_6_Reference_Sequence_Dictionary_URI Seq Word8
sam_v1_6_reference_sequence_dictionary_uri_tag1 ByteString
sam_v1_6_reference_sequence_dictionary_uri_value1 == :: SAM_V1_6_Reference_Sequence_Dictionary_URI
-> SAM_V1_6_Reference_Sequence_Dictionary_URI -> Bool
== SAM_V1_6_Reference_Sequence_Dictionary_URI Seq Word8
sam_v1_6_reference_sequence_dictionary_uri_tag2 ByteString
sam_v1_6_reference_sequence_dictionary_uri_value2 = Seq Word8
sam_v1_6_reference_sequence_dictionary_uri_tag1 Seq Word8 -> Seq Word8 -> Bool
forall a. Eq a => a -> a -> Bool
== Seq Word8
sam_v1_6_reference_sequence_dictionary_uri_tag2 Bool -> Bool -> Bool
&& ByteString
sam_v1_6_reference_sequence_dictionary_uri_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_reference_sequence_dictionary_uri_value2

instance Show SAM_V1_6_Reference_Sequence_Dictionary_URI where
  show :: SAM_V1_6_Reference_Sequence_Dictionary_URI -> String
show (SAM_V1_6_Reference_Sequence_Dictionary_URI Seq Word8
tag ByteString
value) =
    String
"SAM_V1_6_Reference_Sequence_Dictionary_URI { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
"tag = "                                        String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (Seq Word8 -> String
forall a. Show a => a -> String
show Seq Word8
tag)                                      String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" , value = "                                   String -> ShowS
forall a. [a] -> [a] -> [a]
++
    (ByteString -> String
forall a. Show a => a -> String
show ByteString
value)                                    String -> ShowS
forall a. [a] -> [a] -> [a]
++
    String
" }"