module Main where import Bio.Sequence.SFF import System.Environment (getArgs) main = mapM_ recoverFile =<< getArgs recoverFile f = writeSFF (f++"_recovered") =<< recoverSFF f