Problem: Primey Factory

Code: Primey+Factory/tails_1644993720

Nibbles version: 0.2 | 0.21 | 0.22 | 0.23 | 0.24 | 0.25 | 1.00

Format: Compact | Simple | +Type | Table | JSON | .nbl (DeBruijn) | .nbl (names)

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