Digital root Fixed by youz

(while:prn"digital_root("(= r[sum[- int._ 48](+""_)]n(read))")="(r:r:r:* n))

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

download

return to the top page