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