rail, 312 bytes

Result

AC

Code [DL]

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

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

$'p'
 -(!!)-()o1\
     /      s
     ^       |
    # \g0{d}-/

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

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

stdin

4763541448429407529849433666517446510683467589411692726315188184775148425696132579036621261112128092

stdout

0000111111111111111222222222223333333444444444444444555555555666666666666667777777788888888899999999

stderr

strace