# code: http://golf.shinh.org/reveal.rb?count+up+digits/tails_1645093087&nbb
# target Nibbles version: 0.23
# commenter version: 0.1.2.181

\ #(reverse):[[chr]] 
    `. #(iterate while uniq):[[chr]] 
        fstLine #(@):[chr] 
        \A 
        : #(append):[chr] 
            : #(append):[chr] 
                `<~ #(take drop while):[chr] 
                    A #($):[chr] 
                    \B 
                    == #(equal?):int 
                        B #($):chr 
                        \C 
                        0 #(integer):int 
                sets D 
                ?, #(if/else (lazy list)):[chr] 
                    D #($):[chr] 
                    \E 
                    - #(subtract):chr 
                        `( #(uncons):chr 
                            D #(@):[chr] 
                        sets F 
                        ~ #(auto = 1):auto 
                    F #($):[chr] 
            #(implicit arg = F):[chr]