Sexy primes: Difference between revisions
m
Minor edit to Prolog code
m (Minor edit to C++ code) |
m (Minor edit to Prolog code) |
||
Line 1,518:
retract(is_prime(S)),
!,
Q is S + 2 * P,
cross_out(Q, N, P).
cross_out(S, N, P):-
Q is S + 2 * P,
cross_out(Q, N, P).</lang>
|