# code: http://golf.shinh.org/reveal.rb?Growing+Vines/tails_1647241322&nbb
# target Nibbles version: 0.21
# commenter version: 0.1.2.181

< #(take):[[chr]] 
    10 #(integer):int 
    `. #(iterate while uniq):[[chr]] 
        fstLine #(@):[chr] 
        \A 
        . #(map):[chr] 
            << #(init):[chr] 
                `\ #(special scans):[chr] 
                    : #(append):[chr] 
                        " " #(string):[chr] 
                        A #($):[chr] 
                    #(foldop: undefined nibble 0xd (try Nibbles version >=0.22)):null 
            \B 
            ? #(if/else):chr 
                != #(abs diff):int 
                    '\\' #(char):chr 
                    ; #(let):chr 
                        `( #(uncons):chr 
                            : #(append):[chr] 
                                B #($):chr 
                                " " #(string):[chr] 
                        sets C 
                    sets D 
                \E 
                ? #(if/else):chr 
                    ; #(let):int 
                        % #(modulus):int 
                            ; #(let):chr 
                                / #(foldr1):chr 
                                    `) #(swapped uncons):[chr] 
                                        C #(_):[chr] 
                                    sets F 
                                    \H G 
                                    H #($):chr 
                            sets I 
                            ~ #(auto = 2):auto 
                    sets J 
                    \K 
                    I #(_):chr 
                    ? #(if/else):chr 
                        / #(divide):int 
                            F #(_):chr 
                            ; #(let):chr 
                                '|' #(char):chr 
                            sets L 
                        \M 
                        L #(@):chr 
                        ~ #(default):null 
                ? #(if/else):chr 
                    J #(@):int 
                    \N 
                    L #(@):chr 
                    #(implicit arg = D):chr