{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TypeFamilies #-}
module Data.SAM.Version1_6.Alignment.AOPT (
SAM_V1_6_Alignment_AOPT(..)
) where
import Data.ByteString (ByteString)
import Data.Data
import Generics.Deriving.Base
data SAM_V1_6_Alignment_AOPT = SAM_V1_6_Alignment_AOPT { SAM_V1_6_Alignment_AOPT -> ByteString
sam_v1_6_alignment_aopt_tag :: ByteString
, SAM_V1_6_Alignment_AOPT -> ByteString
sam_v1_6_alignment_aopt_value :: ByteString
}
deriving ((forall x.
SAM_V1_6_Alignment_AOPT -> Rep SAM_V1_6_Alignment_AOPT x)
-> (forall x.
Rep SAM_V1_6_Alignment_AOPT x -> SAM_V1_6_Alignment_AOPT)
-> Generic SAM_V1_6_Alignment_AOPT
forall x. Rep SAM_V1_6_Alignment_AOPT x -> SAM_V1_6_Alignment_AOPT
forall x. SAM_V1_6_Alignment_AOPT -> Rep SAM_V1_6_Alignment_AOPT x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x. SAM_V1_6_Alignment_AOPT -> Rep SAM_V1_6_Alignment_AOPT x
from :: forall x. SAM_V1_6_Alignment_AOPT -> Rep SAM_V1_6_Alignment_AOPT x
$cto :: forall x. Rep SAM_V1_6_Alignment_AOPT x -> SAM_V1_6_Alignment_AOPT
to :: forall x. Rep SAM_V1_6_Alignment_AOPT x -> SAM_V1_6_Alignment_AOPT
Generic,Typeable)
instance Eq SAM_V1_6_Alignment_AOPT where
SAM_V1_6_Alignment_AOPT ByteString
sam_v1_6_alignment_aopt_tag1
ByteString
sam_v1_6_alignment_aopt_value1 == :: SAM_V1_6_Alignment_AOPT -> SAM_V1_6_Alignment_AOPT -> Bool
== SAM_V1_6_Alignment_AOPT ByteString
sam_v1_6_alignment_aopt_tag2
ByteString
sam_v1_6_alignment_aopt_value2 = ByteString
sam_v1_6_alignment_aopt_tag1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_alignment_aopt_tag2 Bool -> Bool -> Bool
&&
ByteString
sam_v1_6_alignment_aopt_value1 ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
== ByteString
sam_v1_6_alignment_aopt_value2
instance Show SAM_V1_6_Alignment_AOPT where
show :: SAM_V1_6_Alignment_AOPT -> String
show (SAM_V1_6_Alignment_AOPT ByteString
tag
ByteString
value
) =
String
"SAM_V1_6_Alignment_AOPT { " String -> ShowS
forall a. [a] -> [a] -> [a]
++
String
"sam_v1_6_alignment_aopt_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_aopt_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
" }"