rail, 204 bytes

Result

AC

Code [DL]

$ 'j'                /-(x){j}(c)#
 \-(!x!)(!c!)(c)(x)g<
                     \-(c)(x)#
$ 'main'/{j}i-\ /-\
 \      |     | |  \-o--@
 |      \   /-/ \     /
 \-91a----e<   /--u1q<
            \-/       #

stdin

6003791383190581256507029274564572171659077955436247276142889268834855014427278900486707758162305540

stdout

0000000000001111111122222222222333333444444444455555555555556666666667777777777777788888888889999999

stderr

strace