haskell nth-prime