195
range1
m:
    64
    range
        pop
        dup2
        show
        reverse
        read-num
        +
    m6
    catenate #(elem+list)
        show
        dup
        reverse
        =
    f4
    head
    show-line