Penguin

Differences between current version and revision by previous author of Haskell.

Other diffs: Previous Major Revision, Previous Revision, or view the Annotated Edit History

Newer page: version 11 Last edited on Sunday, December 13, 2009 10:49:35 pm by FirstnameLastname
Older page: version 10 Last edited on Tuesday, December 28, 2004 1:32:52 am by AristotlePagaltzis Revert
@@ -10,9 +10,9 @@
 sieve :: [Int] -> [Int] 
 sieve [] = [] 
 sieve (h:t) = h : sieve [x| x <- t, x `mod` h /= 0] 
  
-main = (putStrLn . show . length . sieve) [2..100000] 
+main = (print . length . sieve) [2..100000] 
 </verbatim> 
  
 !!! Implementations