# code: http://golf.shinh.org/reveal.rb?rect/kaki_1734756562&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.6.187

: #(append):[[chr]] 
    : #(append):[[chr]] 
        ;~ #(save fn):[chr] 
            ; #(save):[chr] 
                "-+" #(string):[chr] 
            sets A 
            \B 
            * #(join):[chr] 
                ^ #(replicate):[chr] 
                    fstInt #(_):int 
                    `( #(uncons):chr 
                        B #($):[chr] 
                    sets C 
                `: #(list of 2 lists):[[chr]] 
                    C #($):[chr] 
                    C #($):[chr] 
        sets D 
        . #(map):[[chr]] 
            , #(range from 1):[int] 
                sndInt #(;_):int 
            \E 
            D #(@):[chr] 
                " |" #(string):[chr] 
    D #($):[chr] 
        #(implicit arg = A):[chr]