{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TypeFamilies #-}
module Data.SAM.Version1_6.Alignment.HOPT (
SAM_V1_6_Alignment_HOPT(..)
) where
import Data.ByteString (ByteString)
import Data.Data
import Generics.Deriving.Base
data SAM_V1_6_Alignment_HOPT = SAM_V1_6_Alignment_HOPT { SAM_V1_6_Alignment_HOPT -> ByteString
sam_v1_6_alignment_hopt_tag :: ByteString
, SAM_V1_6_Alignment_HOPT -> ByteString
sam_v1_6_alignment_hopt_value :: ByteString
}
deriving ((forall x.
SAM_V1_6_Alignment_HOPT -> Rep SAM_V1_6_Alignment_HOPT x)
-> (forall x.
Rep SAM_V1_6_Alignment_HOPT x -> SAM_V1_6_Alignment_HOPT)
-> Generic SAM_V1_6_Alignment_HOPT
forall x. Rep SAM_V1_6_Alignment_HOPT x -> SAM_V1_6_Alignment_HOPT
forall x. SAM_V1_6_Alignment_HOPT -> Rep SAM_V1_6_Alignment_HOPT x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x. SAM_V1_6_Alignment_HOPT -> Rep SAM_V1_6_Alignment_HOPT x
from :: forall x. SAM_V1_6_Alignment_HOPT -> Rep SAM_V1_6_Alignment_HOPT x
$cto :: forall x. Rep SAM_V1_6_Alignment_HOPT x -> SAM_V1_6_Alignment_HOPT
to :: forall x. Rep SAM_V1_6_Alignment_HOPT x -> SAM_V1_6_Alignment_HOPT
Generic,Typeable)
instance Eq SAM_V1_6_Alignment_HOPT where
SAM_V1_6_Alignment_HOPT ByteString
sam_v1_6_alignment_hopt_tag1
ByteString
sam_v1_6_alignment_hopt_value1 == :: SAM_V1_6_Alignment_HOPT -> SAM_V1_6_Alignment_HOPT -> Bool
== SAM_V1_6_Alignment_HOPT ByteString
sam_v1_6_alignment_hopt_tag2
ByteString
sam_v1_6_alignment_hopt_value2 = ByteString
sam_v1_6_alignment_hopt_tag1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_alignment_hopt_tag2 Bool -> Bool -> Bool
&&
ByteString
sam_v1_6_alignment_hopt_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_alignment_hopt_value2
instance Show SAM_V1_6_Alignment_HOPT where
show :: SAM_V1_6_Alignment_HOPT -> String
show (SAM_V1_6_Alignment_HOPT ByteString
tag
ByteString
value
) =
String
"SAM_V1_6_Alignment_HOPT { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
String
"sam_v1_6_alignment_hopt_tag = " String -> ShowS
forall a. [a] -> [a] -> [a]
++
(ByteString -> String
forall a. Show a => a -> String
show ByteString
tag) String -> ShowS
forall a. [a] -> [a] -> [a]
++
String
" , sam_v1_6_alignment_hopt_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
" }"