read a;(eval c=$\{a:{0..35}':1};d=${a%$c*};d=${d/*$c};b[36#${#d}$c]+=$c;' printf %s ${b[*]} " ") $a||. *