totient function by recursive

N=9999
exec"N+=1;t=n=N;d=1\nwhile d<n:\n\x09d+=1;t*=d-(n%d<1);t/=d\n\x09while n%d<1:n/=d\nprint t;"*301

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top