rail, 216 bytes

Result

WA

Code [DL]

$ 'main'
 \-1-9{o}o#

$ 'o' (val, num -- val):
 \
 |      /(!b!)m-[001](b)s1-\
 |      |                  |
 |      \              /---/
 \-1(!b!)-----{d}0q---<
                       \-a(b)m#
$ 'd'
 \-(!q!)(q)(q)#

stdin

4122503774274906325672654618740683193406322007931947505019424320967214886631257690364276308328905369

stdout

stderr

Crash: Type mismatch

strace