(dotimes(x 1e4)(format(if(> x 9)(every'char> #1=(format()"~D"x)(subseq #1#1)))"~A "x))