(dotimes(x 1e4)(and(> x 9)(apply >(map x->number(string->list #`",x")))(print x)))