# code: http://golf.shinh.org/reveal.rb?McCarthy+91+function/tails_1644921716&nbb
# target Nibbles version: 0.23
# commenter version: 0.1.2.181

#(implicit map):[[chr]] 
    <~ #(take while):[int,int,int] 
        `. #(iterate while uniq):[int,int,int] 
            ~~ #(3-ary tuple):int,int,int 
                1 #(integer):int 
                fstInt #($):int 
                fstInt #($):int 
            \C B A 
            #(implicit tuple):int,int,int 
                ? #(if/else):int 
                    - #(subtract):int 
                        B #(@):int 
                        ^ #(pow):int 
                            ~ #(auto = 10):auto 
                            ~ #(auto = 2):auto 
                    \D 
                    ~ #(tuple):int,int 
                        - #(subtract):int 
                            C #(@):int 
                            ~ #(auto = 1):auto 
                        - #(subtract):int 
                            B #(_):int 
                            10 #(integer):int 
                    #(implicit tuple):int,int 
                        + #(add):int 
                            C #($):int 
                            ~ #(auto = 1):auto 
                        + #(add):int 
                            11 #(integer):int 
                            B #(@):int 
                sets E 
                E #($):int 
                C #(@):int 
        \H G F 
        F #(_):int 
    \N M L K J I 
    : #(append):[chr] 
        : #(append):[chr] 
            ^ #(replicate):[chr] 
                N #($):int 
                "M(" #(string):[chr] 
            M #(@):int 
        ^ #(replicate):[chr] 
            N #($):int 
            ")" #(string):[chr]