Problem: compression challenge but not in the way you think

Code: compression+challenge+but+not+in+the+way+you+think/tails_1658458351

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)

\ (reverse) 
    / (foldr) -->let( I ) 
        \ (reverse) 
            % (split (remove empties)) 
                @ (= fstLine) 
                ~ (auto = words) 
        ~ (tuple) 
            % (split (remove empties)) 
                @ (= fstLine) 
                @ (= fstLine) 
            0 (integer) 
        (implicit tuple) <--arg( C B A ) 
            ? (if/else) -->let( H ) 
                _ (= A) 
                ~ (tuple) <--arg( D ) 
                    : (append) 
                        @ (= C) 
                        _ (= B) 
                    - (subtract) 
                        ;$ (= A) 
                        ~ (auto = 1) 
                (implicit tuple) 
                    ? (if/else) -->let( G ) 
                        ? (index) 
                            $ (= C) 
                            'R' (char) 
                        ~ (tuple) <--arg( E ) 
                            : (append) 
                                < (take) 
                                    ; (save) -->let( F ) 
                                        `r (read int) 
                                            @ (= C) 
                                    ;$ (= B) 
                                ;$ (= B) 
                            ;@ (= A) 
                        (implicit tuple) 
                            _ (= B) 
                            (implicit arg = F) 
                    (implicit arg = G) 
            (implicit arg = H)