euler/haskell/euler007.hs

module Main where
import Prime

main = do
    print $ last (take 10001 primes)