(princ(subseq(write-to-string(loop for i from 0 to 99999 collect i):pretty())1 588890))