packages feed

flower-0.3: src/FRecover.hs

module Main where
import Bio.Sequence.SFF
import System.Environment (getArgs)

main = mapM_ recoverFile =<< getArgs

recoverFile f = writeSFF (f++"_recovered") =<< recoverSFF f