mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Digital-root/J/digital-root-1.j

3 lines
65 B
Plaintext
Raw Permalink Blame History

digrot=: +/@(#.inv~&10)^:_
addper=: _1 + [: # +/@(#.inv~&10)^:a:
Reference in New Issue View Git Blame Copy Permalink