# code: http://golf.shinh.org/reveal.rb?count+down/tails_1646542167&nbb
# target Nibbles version: 0.25
# commenter version: 0.1.2.181

`. #(iterate while uniq):[int] 
    $ #(= fstInt):int 
    / #(foldr1):int <--arg( A:int ) 
        \ #(reverse):[int] 
            `@ #(to base):[int] 
                ~ #(auto = 10):auto 
                - #(subtract):int 
                    $ #(= A):int 
                    ~ #(auto = 1):auto 
        * #(multiply):int <--arg( C:int B:int ) 
            10 #(integer):int 
            @ #(= B):int