# code: http://golf.shinh.org/reveal.rb?Distribute/tails_1646313549&nbb
# target Nibbles version: 0.24
# commenter version: 0.1.2.181

#(implicit string concatenation):[chr] 
    #(implicit string concatenation):[chr] 
        #(implicit string concatenation):[chr] 
            #(implicit string concatenation):[chr] 
                "(" #(string):[chr] 
                ;~ #(save fn):[chr] -->let( N:fn([int,int]->[chr]) ) 
                    | #(partition):[int,int] -->let( I:[int,int] ) 
                        ! #(zip with):[int,int] 
                            _ #(= ints):[int] 
                            =\ #(scanl):[int] <--arg( A:int ) 
                                ;$ #(= ints):[int] 
                                1 #(integer):int <--arg( C:int B:int ) 
                                ? #(if/else):int <--arg( E:int D:int ) 
                                    @ #(= D):int 
                                    - #(subtract):int <--arg( F:int ) 
                                        _ #(= D):int 
                                        @ #(= E):int 
                                    + #(add):int 
                                        @ #(= D):int 
                                        $ #(= E):int 
                            , #(zipop: make tuple):null 
                        ~ #(par......):null 
                        ~ #(...tition):null 
                        @ #(= G):int <--arg( H:int G:int ) 
                    * #(join):[chr] <--arg( J:[int,int] ) 
                        * #(join):[chr] 
                            ; #(save):[chr] -->let( K:[chr] ) 
                                "," #(string):[chr] 
                            . #(map):[int] 
                                @ #(= J):[int,int] 
                                $ #(= M):int <--arg( M:int L:int ) 
                        `' #(transpose):[[chr]] 
                            "[]" #(string):[chr] 
            @ #(= K):[chr] 
        $ #(= N):[chr] 
            _ #(= I):[int,int] 
    ")" #(string):[chr]