# code: http://golf.shinh.org/reveal.rb?A069800/tails_1662361531&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.2.181

< #(take):[int] 
    $ #(= fstInt):int 
    + #(concat):[int] 
        =~ #(group by (also sorts)):[[int]] 
            | #(filter):[int] 
                , #(range from 1):[int] 
                    ^ #(pow):int 
                        $ #(= fstInt):int 
                        3 #(integer):int 
                `* #(product):int <--arg( A:int ) 
                    `@ #(to base):[int] 
                        ~ #(auto = 10):auto 
                        $ #(= A):int 
            + #(sum):int <--arg( B:int ) 
                `@ #(to base):[int] 
                    ~ #(auto = 10):auto 
                    #(implicit arg = B):int