rail, 348 bytes

Result

AC

Code [DL]

$'d'
 \-(!!)()()#

$'i'
 \-i2mc2c(!e!)1a(!!)0()p()z1sc(!!)(!d!)()p(e)p#

$'g'
 \-o1s{d}0g#

$'p'
 \-(!!)--(){g}\
       /      |
       ^  /---/
#(!!)-/ \-

$'f'
 \-(!!)(!c!)(c)()2mc2c(!z!)(!y!)(!x!)(y)(){p}(c)()()9q-#

$'main'
 \-[00000]{d}p{d}\
                 |
 /{f}-0-\        p
 |    \  >e------/
 ^    | /    \
# \-1a/ |    |
        \-{i}/

stdin

4081350757650089446988397036115989757916713808574265196333664918157453844621973329688888972281810240

stdout

0000000011111111111222222333333333344444444455555555566666666667777777777888888888888888899999999999

stderr

strace