AKS test for primes: Difference between revisions

AKS test for primes (view source)

16 bytes added , 1 year ago

m

Fixed small bug in primerow (still gave correct results, but didn't check the middle element)

357

edits

Revision as of 20:26, 29 December 2022 (view source) Davgot (talk \| contribs) (LFE version) ← Older edit		Revision as of 20:55, 29 December 2022 (view source) Davgot (talk \| contribs) m (Fixed small bug in primerow (still gave correct results, but didn't check the middle element)) Newer edit →
Line 3,692: primerow([], _). primerow([A,A\|_], _N) :- A mod N == 0. % end when we've seen half the list. primerow([A\|As], N) :- (A mod N == 0; A == 1), primerow(As, N).