CalmoSoft primes: Difference between revisions
Content added Content deleted
(→{{header|Wren}}: Incorporates two optimizations (see Talk Page) - about 20% faster than before.) |
(→{{header|Go}}: Updated in line with Wren version, about 20% faster.) |
||
Line 609: | Line 609: | ||
import ( |
import ( |
||
"fmt" |
"fmt" |
||
"math/big" |
|||
"rcu" |
"rcu" |
||
"time" |
"time" |
||
Line 643: | Line 644: | ||
sum -= primes[i-1] |
sum -= primes[i-1] |
||
} |
} |
||
isEven := i == 0 |
|||
sum2 := sum |
sum2 := sum |
||
for j := pc - 1; j >= i; j-- { |
for j := pc - 1; j >= i; j-- { |
||
Line 652: | Line 654: | ||
sum2 -= primes[j+1] |
sum2 -= primes[j+1] |
||
} |
} |
||
if |
if (temp % 2) == 0 != isEven { |
||
continue |
|||
} |
|||
bsum := big.NewInt(int64(sum2)) |
|||
if bsum.ProbablyPrime(5) { |
|||
if temp > longest { |
if temp > longest { |
||
longest = temp |
longest = temp |
||
Line 726: | Line 732: | ||
7 + 11 + 13 + 17 + 19 + 23 + .. + 49999699 + 49999711 + 49999739 + 49999751 + 49999753 + 49999757 = 72,618,848,632,313 |
7 + 11 + 13 + 17 + 19 + 23 + .. + 49999699 + 49999711 + 49999739 + 49999751 + 49999753 + 49999757 = 72,618,848,632,313 |
||
Took |
Took 210 ms |
||
</pre> |
</pre> |
||