# code: http://golf.shinh.org/reveal.rb?mysterious+numbers/tails+%28whio%29_1771402494&nbb
# target Nibbles version: 0.24
# commenter version: 0.1.6.187

or #(or):[int] 
    / #(foldr):[int] 
        _ #(= ints):[int] 
        | #(filter):[int] <--arg( B:int A:int ) 
            ;@ #(= ints):[int] 
            - #(subtract):int <--arg( C:int ) 
                $ #(= C):int 
                ~ #(auto = 1):auto 
        `% #(split list (keep empties)):[[int]] <--arg( E:int D:[int] ) 
            @ #(= D):[int] 
            : #(append):[int] 
                + #(add):int 
                    % #(modulus):int 
                        $ #(= E):int 
                        3 #(integer):int 
                    3 #(integer):int 
                2 #(integer):int 
    1 #(integer):int <--arg( F:int )