module Biobase.ExtSS where import Data.ByteString.Char8 as BS -- | Extended secondary structures as used by RNAwolf. We have a sequence in -- 5'->3' order. Then an extended structure string with ".()<>X" as pairing -- symbols. Finally we have detailed pairing information which encodes -- Leontis-Westhof notation. In addition, comments starting with "#" are -- possible. data ExtSS = ExtSS { sequence :: !ByteString , structure :: !ByteString , detailed :: ![(Int,Int,ByteString)] , comments :: ![ByteString] } deriving (Read,Show)