Skip to content

Instantly share code, notes, and snippets.

@AndreasPK
Created February 19, 2018 10:12
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save AndreasPK/8e6f0cbf253f0930f4cda81e685ac136 to your computer and use it in GitHub Desktop.
Save AndreasPK/8e6f0cbf253f0930f4cda81e685ac136 to your computer and use it in GitHub Desktop.
On GHC-8.2 this code is faster in GHCi then when compiled.
{-# LANGUAGE OverloadedStrings #-}
module Main where
import qualified Data.Text as T
import Data.Text (Text(..))
longestCommonSubstring :: [Text] -> Text
longestCommonSubstring entries = go [""] "" where
go :: [Text] -> Text -> Text
go [] longest = longest
go current@(s:_) _ = go (filter substringOfAll $ concatMap step current) s
substringOfAll :: Text -> Bool
substringOfAll s = all (\e -> T.isInfixOf s e) entries
step :: Text -> [Text]
step s = map (\c -> T.cons c s) ['A', 'C', 'G', 'T']
main :: IO ()
main = do
let lss = longestCommonSubstring contents
print lss
--print $ longestCommonSubstring strings
contents :: [Text]
contents = ["TAGCCGACGTTTTCACTCGTTCCCATGCATTATGCAGCTATTTCCAGTAATTGTTCCCCGCTCGATAAGGTGTCCAAGGACAAATCTTGAAACATATCGACGCTTGACAGAACCCGGATTCCATCGGCGGTGTTCACCTAGGGCACCTATCGTGTTTCCACTAGAGTAATCACAACAATTGAAAAGTAACTCGTGTTTCCCTTTGTGCCGGGCGAACGCTACGCCCCCAGCTACTACACCAACGTTAATCGAAGACCTTCTTGACAGTTGGTAGCACATACCCTACGCTGGGTACGAGCTGGAGAGCTGAAACCCGACCCTATGAGAATCCATACTTCAGACTGTATCGTTGTCCATATAATGGACACGGGGTACTTTTGGCATGATATTGTAATTTGTCATGCGATTGCCTCAGTATATCCCTGCTTACACGTGCAGAAAATATGTCCCATTTTACACCGGTCCACCATAACAATTATGCAACTTGTCAGTCGGGGTAGGCTCGGTCTCTGCGTCTAGCGGTGTGAATTACGCGTCCCACCTGCACCAACCACTGACTTTAGGGATCTTTGGGTATCGTGCATCTTGATTCGGTTCTGCCGGAGTTTTCTTAGCAACCAAAACACGGCACATCCAGCCATTTCTTTAACAGTTGAGAGTGTTAGGCCTAACAAATTTACGAGCGAAAATATGAGCTAAGACGAAACGAGACGACTGAAGAGACCCTACGGACGAGCGCCTTGAATATTGTCACCCCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTCGCCGAGTTTCTACCTGATGCGAGGCCTAAGAGGCAGTTGTGTAAAGGAAAATATTCCAAGCTT","TGCCCGAATTAGTCTAGCGAGTCAGGGTCCTCTCTCTAACCCCTCCCCTTCATAACGATACCAGGCCTCGTTGTCACTTCTGTTGCACAGGCGATGCCCGGCATCAAAGCTGGTGAGCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTATCGATCAGGTATGATAAAATGACCTGCCCCTGAAGGACATGAACGTGCACAGGGTAGAACTGCATGGGTTCCCCTGGGGTGGGTCGGGGACACAGTTGATGGCTGCTAAAGCGTTATCTGCGCTTGCGAGCTACAGCCCAACTTGGAACAAAGCGCACGATATTCGTGTGCTCGTATCGCAGTCACGTGTTATTTCGCTCTAGGGTCAACAGATTAAAACCCATTGCTAGATCATGGAAGACGACCTCTGCATCCCGTCGCTTAGCATTTCGAGCCACTTCTACGCACCGTTTACAAGACACAGAGAACTGGGACTCCAGGCCGGGCCTCAGTAAAGTGACGCAGGCTTAATCGGTCAGGCTGCCAGGCCCAAGGCTCGATAGCGATATCTTCTTTTACCTACTCAACTCTTCTGACCTTTGGAATCGTACCCTATGCTTAATATTCTTTCGACCCTTAGCTTAAATCAGCACTACTGGAAGCGACATTGAGTCCGCCTCCGTTCATGACCGCATGCATCAGGTATCCCAAGCACGTTCGCGAACTCCCTGTGCCTCTCGCGGTTTACTGCCACCCAAGTGCGATTATTACAACATACGTTACAGGGGTAGTTAAATAAATAAACTTGGCGCATTCGCGGTGTGTCCCGGCAATACCTGATCGTCCCCCATCCACAGGTGGTGCAGAGTGGGTAGGCGGGGG","ATAAGTCCCCACAGCTGTTCAAACGCTCTTCGCGACGTAAGCTGTCAAAAGGAGTGGGTTGCCGATGTTCAGTAAGCGTAACCTATAAGATAGATCGTCGGTATGTGCAAAGGTCAAGGAGATAGAGTTAAGCAATTTATCGTGGCCTTGCGACGTCTTCTGCGCTCCAGATGCGCATCCCTAAACACTCGATATATGTCCAGACAGTATCTTGTGACACCATTGTGCGATCTCTCGCACAATCGGCGTTACTTCAGTTGGTGTTATGTGGGTTACTCAGTTCAGGACAGTACAGACAACCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTGACGGGGGTTGCACGACAGTCCCGGGCGTTGTTTACGCTACTTTATCACGGTATCCTGCGTGCGCCCCACTGCAGTTCGGGCGAGCTGACCGGCCTTACCCCTTTGGTACCCTTGACTCCTATCTTGGGTAAGGTCGTGTGAGATTAAATTTACTGAGGCTTCCCGAGGCGCACAGTTCGCCCCGCGTTGAATTTCGGGCAATTAGATTATACATGGTGTGGAAAGGTCCGTGAAAGAATAACCTATGGGGCATACTCGAATTCCGAGTATACTGGCACAAGCCTGACACGGCGGTTAGTAATCCTCTTTTTGTCGCGTCCGCCATCTTTCCTAAAGCTGCGCATCAAGGCGTCCGAAGGATAATAAGTCGAGATCACAGATATTAAGAGCAGGGGAATTAAACCCTTATGTGTGTCTTCTCTCTAGAAACATGAGAACAGCGTTACACTGCGACTAATCTCATCCAAACCTGCAGAACTGGGCTGCGAGCTGATGTATCTCGGTGTAGTCGACGACCTCA","CCCGGTAAAGAAACTCGTACAGTCCAATAGTCGGCTGGCCGGCTGGCAATTACTAGGGGCAAGTGCGGGGCCATATTTATTGTATCTCCGGGTTCCGACCTAGGAGGGCGTGACATGATCCCCTGCGGTGGCTACTATTCACACACCAATGTATGCGCCCTGAGCCCGTACGTTGTAACGCTCATCATTCCATGGCATCACTGGTTCCGGAACACCATTGGAACTGGTAAGACTCCAGCTTACGTCAAGCTGACCGGGGCGCGCTGAGTGTTCGTCTCAAACAGCTGACTGTTGCCATTCCGCCCGTAGCCTGCGTAAGCCGCATTACCATCTTCCTATTTCTACCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTCTCCCTCTGAGCTCGGACGACCCGTATAATTAAGGAAAGAATTAACGACGGTCCTAGGCCCGCACTACCCGTCATGCGCAAATCCAACATGGAGCGTAGTACTGGTGGTTAATATGAGAGCAAGATGTAGATGTCCTAACCAGGCCTCGTAGTGAAGTAAACCTCTGAGTTTTAAGCACCTGGGGCCTACAAGCTTGTATTACTCTTGTGTCTAAGGGACCATTCTGTAACACCCAATTACCGGCCTCGGGGATCTACCAGGCGCCAAAACCTCAGCACTCCTACATTGAGGACCAATCGTGTTCCGAACGCTTGGCTTAACGGATGATATACCCATAAAACAGCTCGGTGTGGAGTCCGTACTATTGTGATCAGTTGGTGCACCACCCCTCACCACATCGAAATCTGATCCACGCACGTGGCAGTCCACCATGACGCAAAAGTCACCGTGTCCGTCTTGTAGGACGATGGCTCTC","CGGTCGGATGCCACTTTGCTAATGAGTGCTTCGACTCCCACTCCACTCGACCGAACGTGGTTGGTAATCCGGTAGATCTCTACCTTTACCGTCTAAGTAGGATCGATACCATGTTCCTGTAGATACAGGGAATCTATTAAGGGCCGATGTTTAGGTAGGTCCCCTTAAGCCCAGGCTACAAGGGTGTGCAGGCTCACTTGTCCGATTTTCTCTGGTTATTCGGAAGCTCTGCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTTTGTTATCTAAAGCCGTAAACTGACATCATTGAATGCTGGGGCTAAAGTTTACGTAAGCAGGCTATTTCAGAAACCTCATCCTAAAACCGCACACCGCTCTAATTCAGGATAGTTGCGGGTGGGCACTGCATGTGCTATATTGACAATCGGTACTGGGTTTAGAGATTTATCATTGATTAAACTACCCAGATGAGATGTCGGCTCTTGCGAATGACCGGCGCCCACACGGTGAAAAAAATGTTAACAAGTCATTCGGCTCAGTATTCTATGGCTTAGTCCCCCCCCACTGCAGGATAATGTACGGTTATAAGAATCATTACCCCGGGCCGAAAGTTTATAATTGCTATGAACTATGAAATAGCCCCTTATATAACAGGATGAACGTGAACGGTTCATCATGTTTAAAACTTGGTGTTATGTTGACGGTAGGCGGGCCTGACACTGTTAGTAGCGGGGCGGGAGTAATCCTAGGCTTAACCTCATAGTCAGAAGAACTTTGGTATTGGCCGCGGCATGGTTCGCTATCGGATATGTTTTTCATATGGCCGTCCCACATAAATGGGCTACCAACTACGAGATCCATTTAGC","AAGTTGACGCAGTATGTTCTTGATTATTACCGCGACTACAAGTCAGTGGCGGCCTACGTCAAGCTCTCTGGGGGGTTGAACTCTGTATTTACTATGTAATACAAACTCGACGTAAGCGGGCGAGACTAACCCGAGCGATTGTCGCGCGCTTTAAAGCAGATCTGCAGTTCGCAATGGTATGCTTTTATTGGGTCTCGTAACAATGCGGGGTTGTCTGCGTCAAGCTCCGTTCTATGGGAATGTCCTGTGGAAGGAGGTTTCGACCATTCACTTGGCATCGAGGGCTAAGGTTCACTAGTGCAGGCAATCCCTGGGGGTGCGCGGATTATCGTAGTGGAGGCTGGGGCGAATCTTTCTGCGGATGGTAGAGGTGGATGACTCGCAGGGTTGGGGGGATAAGAGGATGCCATCTGGCTGCCCCGTATATGCGTTCTTGGACCCGGTTAGGGTCTATCCTTCCCGGGCTTCCAGTACTTTGGCTAGTATGCATTAACAACCGATCGCACTTCATGGGTATTCTGATGACCTACTGCACATTTTTAAGTACAGAAATAGTGCATAAGGCCTGCACGGACTAACTCTCTATACACTTTATGAGGCACATCCGGAGTTCGCTCACGTCTCGCCTGACAGGTTCCGTATCCGAGCCCTCTTGTTTGCGAATATATGGTGGAGACATTTTTTTGCGTAGAAACGGTTGTTTACGGGAACCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTTCAGGAACTTGAGTAGTTTCCGATGAGTCATAGGGTGCATAATTTAATATAAGGTACGCCCCAGGATTTTCGTACGTTGAGCGCCCTCGGGGCATCTCAATCCGCCACCC","GTTTAACAACTAGCCCATCAGCCGCAGGAGCTCCATGGTGGTACATAACTTAGAGTCAATGTAGATCGGCTCGAAGCGTTTCCAAGCTACCCCAGGCACATCCCATGCCTCGACGCCCAGCATCTAGACATATTGGCGCACAATCGCAGGCCGTTAAACCCCTTGAAAAGCTATCGTGCGGGTAGCAACACCAACTACCTCGCCTACTGTTATCCCGCAATGAATACTGCAGTTATGGTAGTCAGGTTATATAATGGTAATCACCAGCACTGTGCTGGACCACTCTTGTGGCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTTGGAAATTTCTGATTCCAAACATCCTTCTCAGGCCGCTAATGGAACACGTCGTATTCCGCGCGTAATACCAGAAAATCCCCTTCAGTATGGTCCATGACATCTTGGTCAGCCTACTACCTCCATCGTTCTTGTGACGGGTGGTGCATTCTATGCACTGCGGGCCAGACTTCGCCTGAATGCCGAGGTAACATCTCCGCGGCGAAATAGAGGGTAGTGTTCGCTGAACGCTTTCCGCTCGCCGGAGTTTTGTCTAGCCGAATTAGCAGCTGTTGGACTGGCGCGGGTGATCCAGAGTTCGTTCTGTGTGCTAGGAACACGATGTATCTACTCTGACGTTGGCTAAGGGCAGTCATCAAACAAATTGCTTGGGTCAATTGCCAGGTGCCAAGACCATGGGGCTCGCCATTAAACTTAGAACTCTGAAACCTGAGCCAGTAAACTCCTGAGGATTGTTCAGGTCTTGCAGACTCCCTTTACTCTTAACGAGTCGTATCTCCAAAGGAGGTAGATATGGTGAAATGGGGATAC","TAATCCACTAATAATATGCAACAGCGCTAAAACGGGTTCGGCGTTGACCGAAAGTCCATCCTAGTCCTCAAGGAGTAGAAACTCTGATAAACTCGACTGTTCGCACAATTTGTTCTGACCCTTGTGACCGACTATCGCAACGCATCTTCATTCAACCCCAATATGTTGCAGAATCCTTCGGACGGACGGGGTAGTGGACTACGAGACTACACTGTCTTTTCCTTCCTTTATACCTCCTCGACTAGCGCTCATACACATTAGCCGACTGTTTATTGCACCCTGGACGAGTCCAACTGTAAACGGCCAACTTGGATCGATCTTGGATTCTAGGCACCCGAAGACGAGGATCCGCAGCGGTCAAATTGACTACGCAGCGCCCTAAGAATCTAGTTAATGCATAAACCGAAGTCAGAAAGGAGATATCGTGCACTTACGAATAACAACGCTACGGAACGTAATACATGGTCAGGCGTATTTATTGCGCCTTTCTTTACTACTGAGGAGGCACGCCTACCTATGGACGATACACTCCTGCGAGGTCGGCCGCGCTATGGGGTAGTTTGGTCAAAGGCCAATAAGGGCGCATGAAAACAAGCGATGGTTGGGCAAATCGACTACATGCGCCGATCCAGATTAGTGCTTTCCGTTATACTCGTACGGAATCTCAGCATCCTACCAGACCCTGACACGAAGACTCCTCGATGCTTGGCGTTCACAATGCCCGCAAGGTCTAGGCTCTTGTCGCGCCAGATGCGGAGATGATGCGCGAACCACGAGGCGAATGGTCCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTAGTGTGTGGCGGGATCAGGGGTATAGTCTAGCA","TACTACTCCTATAGGGTCTGCATGATAGAAATATAAAATAGGTCAAAGGTCGATGTGTCTGTCCGCCTGAGCCTGTGGCTATTGTATACGCGAATAGAGTACCGATATACGACCGGCGTACGTCGCCACTGTCATGGCCTTAGATTACTGTTCACAGTCGTACCAAATCTATAACTCGGCACTGGTTCAACACACCCCTTCAGGGCGTGTTTAATTCTATCAAGTTTTGGTTTCAAGAACGAACACTACAGCTGCTGGGATGGCTTGGGTATAGCTCTATAGATACGATCACAGTGGGCCTTCGTTGCCCCTAGTCCGCTTCGTGTAGTGACTTTCGATGTCCCTAGGAAAATGGCCGATTCGCCGTCCAGTGGTGTAGCCTGAGCCCACGGGAGGTGCAAGGTGCCATTTGCTATCAATCGCAAATCTTGCTAAAAAAACGGCTGTCATGGCTAAGTTATTTTTTTGGAGTCATTCCCCCAGCCCACCTTGCAGCCGGATCAATATCCAGCTAGTTAAAGAAAATATCAAGAGGGCCTTGAATAGTAGTGGTGTCAGGGAATAAGATATTTGAACGAACGCCACCTTAGTGTCGAATTCCTTAAGTGGGACTCACCGTTGATGCCCAAGGATCGATGCTATCCTCCCTGGTGATCTATCGACGAGTTTCCAACCATGGGCATCACCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTGGTTTTTTGACCCCCGAGAATTTGTCTGTAATCACTCCAATCCCGAAACCTAACCTATGCGTCTCGTTATATGCTAGGGTACGCCTTGTTGAAGAGGCGTAGACTTTTGAGCTAATACAAGCGCTCGCGACTGTG","AATTGCTGGATCATGAACTAAGCTTCAGCCTACACTCGCCGCTACCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTCGGCAGTGTTTTAAGAAGTTATTATTCCTCAATGGGGCTCAATTGCCTGCTTAAAGTCTCCCCCATGGCACGGTATCTGACGAACACGTCTTTACGGAGCGCACATTCCATTTCGGCAGCTTTATAGTCTCATGTATCTTCGACAGGGCTACCCACATCAGAAGCGCCGAGATCCACTACAGGCCCGCGGGGTATTCGTAGGTGCGCTATAAGCTCGTTGCTTTGGATGTAACAGAATTCTGGGGCTCAATTCACACATTGGGTCATGGGTCGATTAATCTCGTGCTTAATCACTCCACAATATCCTTCGTGCGTCGCACGGGGGGCCGCGATTCTTAAACAGTTCTCTTGAACGGTCAGGCCCAGAAGAGAAAGTTGGACTTTAAAAATGCAGAATTTGGACCAGGGGATCTCACAGCAGAATAGTGTGGTATACGTCATTTCCCAGTTCCGGTGCTGAGGGGCATACGGCGGATGCCAATAGTCTGTCCAGTACCTCAAAGAGTCTGAATGGCTGGTCCCGGTTCGCCCCACTGTAGGTTAAGCAGTACGCCGTACTTGACACAGTCAATTTGCAATCCGTCGCAACGGTGTGCCAAGGATGGATTCTGAGGCATGTCCACCGTTCCCAATTCCTTGCGCTTAATAATGGGCGCGTTACATTGTGTACATCCACTCTTCATGAGCCAACCTAATAACTCGTTAGCAGGTACTGTCATGGTTTCGTGAAAGTCCAAGAGACCCGTCAGAAGCTTCCAGTGAGGCTGCGCCGCCAC","GTTGTGACCTCTTCGGTCGGAGGCTATTGAGGGTAAGGGTTGAGTATATTAACCACCAAATGCCAGTGACAGGGAGGTGTCTGCCTCTACCCGCTTATTTACGCGGACTATATGCATTAGGTAGTTCCTAACGGTCGTTGAGTATTGTGATCCGCGTGGTGATTAACCACGCTATGAGCTTTCATATAGCCTGTTACGACGACTTGTGTAGTAGTCGAGGTCACTTACCAGTAGCATCTTGGTCGGCGTAAGCGAGCCTAAACGGTATGGACCGGAAGTGGCACGTTCCTGTGACCCTTCATCCTTTGATGGTTAACAGGGACCTAAGAAGCACACACAAGGCAGGACTGCCGTGGGAGATGCTCTGAACACAGGACCTTGGGGATAAGCTAGCAACGGCGGAATGTGCCCAGCAATCCGGATCAAGTACGGTAGATCCAGCCTTGCGCTTGCGGCTGTTCATCGGCACCGATATCTTTTGCCCCGTACTTACCTATGCACCGCGCTACGCCACCTAATAGTTCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTGTTGCTGCACAACTTCTTCAGCGACTAATCAGCTACTTTCTCAGTTAGAGAAGTCTGGGTTTCTTTGCGTATAGCCAGGCGGGTGGTCCGGTATACCGAGTCTACACAGGTGTAGAATCGGATATCAACCCATTCCCCACCGGGTTGGTAATTCGGTAGAAAATAATCCCATAGGTAACATGACCGTGCGTTGTTGCACGGGCGTGCTTGTGTATGCGGCCAAAATCATAGGTTTAGAATTGGTATCAGGGTCTAGCATAGACCTCTACTTAGATAGGATGCGCATAACACGCTTCG","GTATTGATCAGGGTGGACATCTGTCCATACACACCTCTGACAATCCAGCCTCTTAAAAAGAAATCAGCGCCTCGCACCGTTGAGTCCTCCTACGGGATACTTGAGCAGGTGTCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTCTAAGAAAACGTCGCAAGTACCTTTCATGTAAGCAAAAACCGTGTCTTGGACCGGGAAAAGCTGCGGGACGCGCTGATACGGTTTTGGTAGAGACGACTGAGCCAGTACAGCTTATGCGTCACCGAGACCTGTTCCAATGGTTGTCAAGGACACTATATGGTAGGTATCTTGTCTTTTATTAGCGGGAATGATTGTGTACCTTACAGATCCAATCCTCGCGGTTACTCACTAGTCAGCTATGTAGGCCTACTTGCCGCAACATATCTCAGCTCGTGAGAGTTCGCATTCCTATTTCCCAGCGCGGTATACAGGTTTGTCTATTAGGAGAAGATGGTAGGCAGGCGCAATGTAGACACCACGTAATCGCTGCACAGACCATTCCGAGCCGGCCCGAGCCCCCTTAGGCGCTACAATAGAGCTTTTAGAGCTCTGTCTGTCATCTTATCTTTTCTGTGTATCGCTACGAAGGCAGGCAATCTCAACACGTCCATCTATTTGCCAGTGCCTCAGGAAAGGCATGTCATTGGTACCCGGCGCCGTTCGACATACCAGGTATGCGAAGCTAATAGTATATGAAGCATTGCACCGGAACTAGCACAGACAACACTTCGGCCTCGAGCTCCATGATCATGTATCCGGTGAATCATCAGCGTAGCGTCATAACACATCGAGGCTCTCCTGGTTTCGCTTTGCAGACATTTCAGCGT","GGCGGACCTATGCCCCATGTAAGTTTTATAATAGTATCTTCTTATCGGCGCTTTATCTGTCCTTCTCCAGCACAACTGATACGCAAGGAGCAGATACTGCGCGACCTGTTGGCCACATGGATTAACCGGTCCCTTAGAAGTCCCCACGGTGCGGCATGCCCTCGGATCGTTAGCGTATACTCCACTCGAGAGTAAAAGAGTGCGACAAGCGATGAAAGGTCATACATCTGAAAGGGACCCACCGTTGTTGCTTCCAAACATCATCGTAGAAATCGTAATTGTCCTTCCATAATAGGGGCATTGCTCCAGGGCGCGGTTCGCCGGGCTTGGCGCTCTCTATAAAAACTTTGTGACTTTTGTGGACATATGAGGGAACACCCTTGACCGACCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTGATAATTTGTTTGCAGACCCCGAACTGTATATGACTCAACCTGGTCGTTCCCAGCAATAAAAGTTCTCAAGGCCTATGATGGGTCTGGTGCCCACTCCTACCATGGTTCTTCGTGAATCTAACTATTGTCACGCTTGGTATGTTTATCCTCCGGGAGACCGTGTTGAACCCCTACTTTCTAAATTTCGAGAAGGTCGGTAACCATCTCTTATCTGTCTGGCACTATTCAGAGCCGCCCGTGCGAATTCTCCCCCATTAGTACGAATCGAGAACCAGCGCGCTCTTACGTGGCCGTATTGCTACATAAACTGAGGATTTGCGAGGCGGCCATTCTTTTCTTCTATGCCATTAGTGTGGAGGTACTGCAAAAATACGCGAAGCTCGACGAGTTTAAGTGGAAGCACCTTAGTTGTGGTTGCCCAAGGCTATGCC","AGATAGGTACGTTAGCGTCTGGAGTCGGCCATCTGGCATATTTTGGCCAATATGTACATAAACCGAAGAAATTACTCATTACAAGGCTGCCCTAAGTTTCCATGAACCCAATCTCTAGAATTGATCACAGAGCCACTCGCCTCCAGGGCAGCGTTGCCGGTATACTCAAAGCGCAGGTAGCTCACTTCCTTGATAAGAAGCGCAAAGCTTCACGAAATTTAGAACATCCGTAAATAGGCCGAGGCGGCCGGGAAACTAAAATTAGTTACATGCGGACTCTCCCAAAACACCCGACCTGGTACTTCGATGATGCGTATTCTTGCTGAACATGGTTCGGATCCTGCCACTAAAACGGTATGGCAGAATAGGGGTACTCAGTTAGGCGAGGGATCCATGTCGGACGCCCGCCAATACCCCCAACATTAACCAGACTCAGTTCTGCGAACAGTATACGAGCTCCCAGGTGGACATCCCGGTTCGAGGACTTCGTCTGCACAGTGAATATGACATGGCGTCCGACTTAAAATTAAACTGGCTATTTGTCTAGAGATGCACTATTGGCGGGATTAGGCAAACTGCTTCGGATAACTTGAGATGGACTCTAAATAATACTCCCCGAGTGTATGTTTGATATGCCCTAACATGCTCAATACACTGGCGCGAAGCCGTAGGCATTGTGTGTCACATGTGATAGGGACCGAGAACGTAGGAGGTTTCGTCGGTGTCATCAATAGACACATATGTGATAGGCCCAGGCATCCTACGCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTCGTAGACTCGGTGACGTCACAGGTCTAGCAACATTTATCCGGCTTCGACAGAACC","ACGAACAGCTGCTAGATTGCGCGAGGGGATGCCGGATTGCGCTTAGCCAGGGGGCTGGCCTCTTACTTGTTGTATGCCTTGGCCGGTGTCAGAGGGCGAGGAGTCGCATTCAACTAAGTCCTATAGCGTGGCTTGCTTGATGGTTGAACGGTTTCTTCGAGTAAAGCCCTGACCCTTAAAGGCCAAGGACTGCGCCGTCAACTTGGCTCGCCGCAAGTCGCTGAGCGCATATCACGCGGCTCAATCTCATACCCAGGATTTAAGTGGACGCGGAATACACCCTCGCGCCCGTTTTTCCGCGTAGACTGCGCAAGTACAGGGGGGGGGGTATACATACGGATTGTTCGGTACAGACCCCGTGGGCGGTGGCTTCGATTTACGGTGTCTGACAGCTCTTGCAAACAGGGCAGTCTAGCGCGACTGCCACGATAGGGCTCATTCCTTCAGCAGCGTATCCATGTCGCGGTCTGAGTCAACCTTAGGGAGGGTTGACCAATCAAGGATAAGAAGACTATTGTCGTTTCTATCAAAGCTTACCAATACGATTTAATTGAGCACAGATTGAACCCCATCTATGGGAAAAATCTCGCACCCGTTGCTATCCCACAATCAACAGAGATCGCGCAGGAGATCCGGACGTTCGTCGAATTGCTCATTGATTGAGCAGCACAAACCTATATTTTCTAAGGGCCCACCCTAGCGCCGTCCCTCGTTTCCTTCTGTCTAAGGCGAAGACTTAATCCTAGGAGGTGTCGCACGAACGAAAGGCGCGCGCGGGCGCATACAAACACCGCCCTCGCGCTAGAAGCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTTTATTCAGAAGC","CGTCGGAAGATTGTACCAAATTTTCTTTAATAGGCGATGAAACTTAGAGAATACTTCCTTTTGGTCAAGTCGTATTCTTAATGGTAGGTCTTTGCGACGGGATCACAGTACTACGCGTCACAAGGGGTCGCTTATTCACTGCAACCGACATCCTCTTAAGCATGCACGCCATATAGTGAGTCAGATAGTTAGTCGGACCTTTTACGCACTATGATAGTAACAGCCGTCTCCGGGTTTCCTGAACCGTCTTCCAATCGTGCGTTCTTATACCGGACTTTGCCGCTATCTTCCTCTAACATGTGCCAACGCAATCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTGTTCTGATAGGCCTCTGTGCAGGAAACAAAACCGGTATCAGGGACTGACAGTAGCGTTAACAGCATAACTCATCTTGAAGCGGCCACCAGAGGGCTTCCTTTCCGATAGTTAGGACTTTTAGCAGGGCTGCTACTCTGGGTGTGACTCTTTGAGCCTCAGTCAAGTGGCAAAATGCCGCACGTCTCTTCATATGTCAACGGATAGCCAACCCATCTCGTTTGCCGCTAAAGACTCATCCTTGAACTTCAACGTCTGCCTTGCAGTATCGCGTCGACCGCATCTATACACTCCCTGACGCCACATGCCGTATACGAATGGTACTATGAGGTAACAGTCGAGGCCCCCGTTTACCAGGTCGACCATCCATAGGAGAACCAGTAACGAATAAGAGCCGCTACTTCCAAAGAACCGTTGCACCGCAATGGATCGTATACGTCTAACTGTACGACGCGCGACGTGCATCCGAACTCCAATGAGAACCGTATTCTACAGCTTTAACCATGGGGA","TTATTCTTAATAAGTCTTGAAGGAGTTCTATATTTCCGATCAATGGGGGAGGGAGAACCGTGTTCAATGATTGGGTGGACCTATCTGTACCCTTCCCGCAGTCCAGCTGCGACCCGAATTGATTTAGTTTAAGAGGGCAATCGGCGGGGATATGGCTTTCCCCGTTGGGCTGAGGAAGATAGGAACGGAACCCATGCCCATATACCCGAATAGCAGGTGCGAGAAACGCTCAGTATTTCATTTAAGATAATACGGGGTACAGCGCGGAACGGGAGTGGCAGCGTTAACCATGGCGTAGGTTAGCAGAGGATTATTAGGCGGGCGCTGCCCCGCCGGCACCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTCGCTCTCAACGTTGTGAAGGAATTCACTCTATATTGACGTGCCCATTCCCTGCGAGCGGATCGAAAAACGTAAATTGGGCTGGGCAATTCCCCTGAGTGCATAAGTGGCAGGTGTCGTTACAAGGCGCTGTGCTACCGAGGGAACTAGTAGGGTTCCCCGGGGACGCTCTTCCACGCTGGTATGTTGACGGTGTTTCTGCTTCTCTGTGTCCGTTTCCCCCTTGTTCGTGACCGAACCAGAACGGGTTCATTGGAGTCGGCCAGTATCGGGCTGTACAAATATAGACCCGTTTCTCTTATGGGTAACCTGACTGTGAGAACGATGTGTACACTACGAGAAAGAGTAGAATGTTTCGGTGCCGCCGTCGCTGGCGTCGTTGCCTTGATAGGATTCCTTTTATGTGATATTTACGAGTCTACTTCAGTGAAGTGTCCAGCAATGTAGGCGATGCTCTCGGTCGTTCGGCTAAGCCACTAGACG","TACCCTTGTAATATTAGCCTTTCCATAATATTACTTCCGCATTGCTGGTGGTAGCTTTTGTATCGCTTGCAAAGCATACTTGACTCCGTCGCGCTATCCGACAGAGCCCCACCAAGCCTCTATGCCCTTTCGCACTAAGCCGAAATGCGTCCCACCTATTGATCCTGCCTCTTTTGTCCCGGCAAGGAGACCGTGCGTTTAGAATTTTCTATAACGGTTCGGTTTTACTAGCATGCGGGTGGCAATAATTACACTGCGAATCTTGTTGCGGTTAAGGCATAAATGGCACAGAATGCAACAAGGCCCTCCTTCCCTCGCCCAACTATGTAGATCCAGTGATTAACAAGAACCGCATAAAATGCGACGAGTTATATCGAGAGGCGCGAAGCAGCGCTAGTTAGCTCGCCCCACGGGTGCCGCACGTACAATCTTGTGGGCCCCTTAATTAGTATGAACTGCTATACCACGGGCAGGCCACGCGCCCCTAATGTTGGTCTCTTGACCAACCTAGGAACTTACCGACTAGAGTTTCTCTAAACATGAATCCATAAGAGAATTTGCAGTAAGCATCATGCGGCGGCCAAACGGTATTTCCCGGCTTGGTTCACTCGGAGAAAGACTACACCGGCACGACCCCGGTACGTTACACTGACTATCGCGACTCCCCCTTAATACAGTAGTACCGCGCTGGGGTTTAGATATCTGTTTATTGTCCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTTAACCATGGAGGAACTTCCAACACTCGAGGGGGCTCGGTATCGATTAACATATTTAAGCCCCGGCGCTAGGTGATACAACAGCACATGTGCGAAGACATAATTCCAG","GTCAACCTGAATTATGCTAACCAGTCCCTTCTACCGGGGCCCATCATGTGTTCCTCCTGGGAATAGCTAGCCTAGCCTATTTAACGTACGTTATGATGAAAGCCGTAACAAGCACAGGTCCAGTTTACATGTCTCGTCTGTCAGTAGTTTTAACGGGCGTACGTACGCTGTGATGTAAAAGGGAAAACCACGAATTCCGGTAGCGGGATGTGGACTGGAAGTGAGCTAACCTTACTATTTTTGGTGGTCAAAGTACCGGTAATGCTCAGACTCCGTAAGATACGCTGTCAACCGTTGGCACGGTGGGTAACTAAGTCTCGACAACCGAAGGCACATCCTAGACAAGCGTAATCTCTTGCGCCTTCTAACAATATTAGCCAGAGCCAGGTCCCTTGCCCCGTATTACCGCGGGAGCACTCATAATCCATACAGACAGGCGACATACCATTGGCATAAGGAAGCATAGGATTAAAAGTGTAGGAGCACCACTCGGATGCAAGACAGTACTCATAAGTCCGAAAAGAGCTGGGCCAGAGACTTAATGGGCGAGACCGCTATATTGGCCAGATTAGGAACTCAACTGACGCTAGTCCGGAAGTTCGCGCGCGGTTGCAAGCGGCTTGATCCTGTGCCATGACGAGCCACTCTCCATGGTGAGGGGGCCCTTCACGAATTTGCTTGGAAGGGGTATATACCAGCCGAAGGGTAGCAAATGAATGCTGACACTTTCCTCGGGCATGGCATTAAGTAGCGGAGTGGGTGCACTCCTGTCCGGCGATACCTGAGTTAGGTGCGGGAGCGAGTTAATGATCGTAGTATCGCCAACTTAGTGAAACAGTTGTAACGGCCGCTCTATGCGAATTATCGTGTTTTCCAGCTCCAATAAGCTACAGGAAGGATGCCTGGCCTTGTCACTTTATTCGGGAACGAATAGACGTGGAGCGTCTTCCGGCCACTCCTAAGATATTCAACTTTAGGACGTATTCACGCCCCTCCGCTG"]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment