Ormiston pairs: Difference between revisions
→{{header|F_Sharp|F#}}
(Realize in F#) |
|||
Line 209:
printfn $"<1 million: %d{primes32()|>Seq.takeWhile((>)1000000)|>Seq.pairwise|>Seq.filter fG|>Seq.length}"
printfn $"<10 million: %d{primes32()|>Seq.takeWhile((>)10000000)|>Seq.pairwise|>Seq.filter fG|>Seq.length}"
printfn $"<
printfn $"<1 trillion: %d{primes32()|>Seq.takeWhile((>)1000000000)|>Seq.pairwise|>Seq.filter fG|>Seq.length}"
</syntaxhighlight>
{{out}}
Line 219 ⟶ 220:
<1 trillion: 326926
</pre>
=={{header|Factor}}==
{{works with|Factor|0.99 2022-04-03}}
|