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