import Lib (primes) main :: IO () main = putStr $ show $ primes !! 10001