Successive prime differences: Difference between revisions

m
Line 633:
 
===Dynamic computed input===
<lang haskell>import{-# Data.Numbers.PrimesLANGUAGE (primes)NumericUnderscores #-}
import Data.Numbers.Primes (primes)
 
-- Type alias dictionary. Key is the difference group and value is a successive prime group.
Line 659 ⟶ 660:
main = mapM_ (showGroup result . show) diffs
where (diffs, result) = groups [[2], [1], [2,2], [2,4], [4,2], [6,4,2]]
groups diffs = (diffs, findPrimes (takeWhile (<10000001_000_000) primes) diffs)</lang>
{{out}}
<pre>
Anonymous user