[layout
martin.hofmann@uni-bamberg.de**20100108082128] hunk ./src/Igor2/Data/Hypotheses.hs 235
-numberOfLeastPatterns rs = liftM length $ (foldM leastPatterns []) ((filter (not . hasHO)) . S.toList $ rs) 
+numberOfLeastPatterns rs = liftM length $ (foldM leastPatterns []) ((filter (not . hasHO)) . S.toList $ rs)