# code: http://golf.shinh.org/reveal.rb?Prime+Numbers/Dingledooper_1640233280&nbb
# target Nibbles version: 0.2
# commenter version: 0.1.2.181

< #(take):[int] 
    fstInt #($):int 
    | #(filter):[int] 
        , #(range from 1):[int] 
            ~ #(auto = infinity):auto 
        \A 
        % #(modulus):int 
            ^ #(pow):int 
                `* #(product):int 
                    , #(range from 1):[int] 
                        - #(subtract):int 
                            A #($):int 
                            ~ #(auto = 1):auto 
                #(implicit arg = A):int 
            #(implicit arg = A):int