Haskell: Use custom Sieve type in Primes module