flower 0.3 → 0.4
raw patch · 2 files changed
+4/−4 lines, 2 filesdep ~cmdargs
Dependency ranges changed: cmdargs
Files
- flower.cabal +2/−2
- src/Flowt.hs +2/−2
flower.cabal view
@@ -1,5 +1,5 @@ Name: flower-Version: 0.3+Version: 0.4 License: GPL Cabal-Version: >= 1.6 Author: Ketil Malde@@ -23,7 +23,7 @@ The Darcs repository is at <http://malde.org/~ketil/biohaskell/flower>. HomePage: http://malde.org/~ketil/biohaskell/flower-Build-Depends: bio >= 0.4.2, base >=3 && <5, array >= 0.1, bytestring >= 0.9.1, binary == 0.4.*, random, cmdargs, containers+Build-Depends: bio >= 0.4.2, base >=3 && <5, array >= 0.1, bytestring >= 0.9.1, binary == 0.4.*, random, cmdargs <= 0.1.1, containers Build-Type: Simple Tested-with: GHC==6.8.3
src/Flowt.hs view
@@ -21,7 +21,7 @@ import System.Console.CmdArgs version :: String-version = "flowt v0, copyright 2009-2010 Ketil Malde"+version = "flowt v0.4, copyright 2009-2010 Ketil Malde" type FingerPrints = IntSet type DupMap = IntMap [ReadBlock]@@ -77,7 +77,7 @@ when (clusters opts) $ BC.writeFile "clusters.txt" $ BC.unlines $ map (BC.unwords . map (read_name . read_header)) $ cg return ()- + gensum f ds = write $ unlines $ map showcluster $ M.assocs ds where write = if f == "-" then putStrLn else writeFile f showcluster (k,v) = let a = averageflow v