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