Permalink
Browse files

we lost the "evalute (length puzzles)" somewhere

  • Loading branch information...
1 parent 3d1c35f commit fa9d4e50a67aa3a601f8e7da6b2abf351ee942b0 @simonmar committed Mar 6, 2013
Showing with 1 addition and 0 deletions.
  1. +1 −0 sudoku4.hs
View
@@ -13,6 +13,7 @@ main = do
let puzzles = lines file
solutions = runEval (parMap solve puzzles)
+ evaluate (length puzzles)
print (length (filter isJust solutions))
-- >>

0 comments on commit fa9d4e5

Please sign in to comment.