Anonymous user
Perfect totient numbers: Difference between revisions
m
→{{header|REXX}}: updated to the latest version of the program.
m (added am OEIS URL for ;Also see:) |
m (→{{header|REXX}}: updated to the latest version of the program.) |
||
Line 122:
@.=. /*memoization array of totient numbers.*/
$= /*list of the perfect totient numbers. */
do j=
a= s /* [↓] search for a perfect totient #.*/
do until a==1; a= phi(a); s= s + a
| |||