# code: http://golf.shinh.org/reveal.rb?Primey+Factory/tails_1644993720&nbb
# target Nibbles version: 0.23
# commenter version: 0.1.2.181

#(implicit map with implicit range):[int] 
    $ #(= fstInt):int 
    [ #(min):int <--arg( B:int A:int ) 
        $ #(= B):int 
        / #(foldr1):int 
            + #(concat):[int] 
                =~ #(group by (also sorts)):[[int]] 
                    | #(filter):[int] 
                        + #(add):[int] 
                            ~ #(auto = 1):auto 
                            , #(range from 1):[int] 
                                $ #(= B):int 
                        - #(subtract):int <--arg( C:int ) 
                            3 #(integer):int 
                            , #(length):int 
                                | #(filter):[int] 
                                    , #(range from 1):[int] 
                                        $ #(= C):int 
                                    - #(subtract):int <--arg( D:int ) 
                                        ~ #(auto = 1):auto 
                                        % #(modulus):int 
                                            @ #(= C):int 
                                            $ #(= D):int 
                    , #(length):int <--arg( E:int ) 
                        <~ #(take while):[int] 
                            \ #(reverse):[int] 
                                `@ #(to base):[int] 
                                    $ #(= E):int 
                                    @ #(= B):int 
                            - #(subtract):int <--arg( F:int ) 
                                ~ #(auto = 1):auto 
                                $ #(= F):int 
            @ #(= G):int <--arg( H:int G:int )