Anonymous user
Next special primes: Difference between revisions
→{{header|F_Sharp|F#}}: Alternative added to improve clarity
(Add Factor) |
(→{{header|F_Sharp|F#}}: Alternative added to improve clarity) |
||
Line 246:
n25=967 n26=1049 n26-n25=82
</pre>
Here's another way of writing the mP sequence above which is (hopefully) a little clearer:
<lang fsharp>
let mP = seq {
let mutable prevp, maxdiff = 2, 0
for p in primes32() do
let diff = p - prevp
if diff > maxdiff then
yield (prevp, diff, p)
maxdiff <- diff
prevp <- p
}
</lang>
=={{header|Factor}}==
| |||