Abstract

All the hexagonal prime data you could ever need.

There is nothing here — Annonymous

$$e^{i\pi}-1=0$$

        
          module Primes where

          primes :: [Integer]
          primes = 2 : 3 : filter isPrime [5,7..]

          isPrime :: Integer -> Bool
          isPrime n = all (/= 0)
                    $ map (n `mod`)
                    $ takeWhile (\x -> x*x <= n) primes