Problem: Decimation

Code: Decimation/tails_1645408270

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) 
    | (filter) 
        `\ (special scans) 
            ;_ (= allInput) 
            : (foldop: cons) 
        + (add) <--arg( A ) 
            % (modulus) 
                , (length) 
                    + (concat) 
                        % (split (remove empties)) 
                            $ (= A) 
                            "\n" (string) 
                10 (integer) 
            / (divide) 
                10 (integer) 
                / (foldr1) 
                    $ (= A) 
                    @ (= B) <--arg( C B ) 
    / (foldr1) <--arg( E D ) 
        $ (= E) 
        @ (= F) <--arg( G F )