Wilson primes of order n: Difference between revisions
m
→J: simplify
(added RPL) |
m (→J: simplify) |
||
Line 732:
<syntaxhighlight lang="j"> wilson=. 0 = (*:@] | _1&^@[ -~ -~ *&! <:@[)^:<:
(>: i. 11x) (
┌──┬───────────────┐
│1 │5 13 563 │
|