# code: http://golf.shinh.org/reveal.rb?trail/tails_1697086909&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.2.181

/ #(foldr):[chr] -->let( F:[chr] ) 
    \ #(reverse):[chr] 
        @ #(= fstLine):[chr] 
    ~ #(tuple):[chr],[chr] 
        ;;@ #(= sndLine):[chr] 
        "\n" #(string):[chr] 
    #(implicit tuple):[chr],[chr] <--arg( C:chr B:[chr] A:[chr] ) 
        : #(append):[chr] 
            ? #(if/else):[chr] -->let( E:[chr] ) 
                - #(subtract):chr 
                    $ #(= C):chr 
                    ;$ #(= fstInt):int 
                ~ #(tuple):[chr],[chr] <--arg( D:chr ) 
                    _ #(= B):[chr] 
                    : #(append):[chr] 
                        ;$ #(= A):[chr] 
                        "." #(string):[chr] 
                #(implicit tuple):[chr],[chr] 
                    : #(append):[chr] 
                        @ #(= B):[chr] 
                        << #(init):[chr] 
                            _ #(= A):[chr] 
                    _ #(= A):[chr] 
            "#" #(string):[chr] 
        #(implicit arg = E):[chr]