Lucas-Carmichael numbers: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: remove dbl sort) |
|||
Line 429: | Line 429: | ||
atom max_p = floor(sqrt(B+1))-1, |
atom max_p = floor(sqrt(B+1))-1, |
||
fppp = floor(product(get_primes(-k-1))/2) |
fppp = floor(product(get_primes(-k-1))/2) |
||
return sort(F({}, max(A,fppp), B, max_p, 1, 1, 3, k)) |
|||
sequence LC = F({}, A, B, max_p, 1, 1, 3, k) |
|||
LC = sort(LC) |
|||
return sort(LC) |
|||
end function |
end function |
||