RosettaCodeData/Task/M-bius-function/J/m-bius-function-1.j

2 lines
37 B
Plaintext

mu=: ({{*/1-y>1}} * _1 ^ 2|+/)@q:~&_