Problem: GA BU ZO MEU

Code: GA+BU+ZO+MEU/tails_1718708140

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) 
    ;@ (= allLines) 
    + (concat) <--arg( B A ) 
        . (map) 
            `@ (to base) 
                4 (integer) 
                + (sum) 
                    . (map) 
                        % (split (remove empties)) 
                            $ (= B) 
                            ~ (auto = words) 
                        `@ (from base) <--arg( C ) 
                            4 (integer) 
                            . (map) 
                                | (filter) 
                                    ! (zip with) 
                                        . (map) 
                                            ; (save) -->let( E ) 
                                                . (map) 
                                                    "E-X+" (string) 
                                                    = (subscript (wrapped)) <--arg( D ) 
                                                        $ (= D) 
                                                        % (split (remove empties)) 
                                                            ;;;$ (= allInput) 
                                                            ~ (auto = words) 
                                            / (foldr1) <--arg( F ) 
                                                $ (= F) 
                                                $ (= H) <--arg( H G ) 
                                        _ (= C) <--arg( I ) 
                                        ? (zipop: index) 
                                    $ (= J) <--arg( J ) 
                                % (modulus) <--arg( K ) 
                                    $ (= K) 
                                    4 (integer) 
            = (subscript (wrapped)) <--arg( L ) 
                (implicit arg = L) 
                (implicit arg = E)