Problem: Simple Hexagony BIG

Code: Simple+Hexagony+BIG/tails_1644403852

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)

* (join) 
    ;@ (= sndLine) 
    < (take) 
        * (multiply) 
            50 (integer) 
            ;$ (= sndInt) 
        > (drop) 
            2 (integer) 
            `' (transpose) -->let( K J I ) 
                `. (iterate while uniq) 
                    ~~~ (4-ary tuple) 
                        0 (integer) 
                        0 (integer) 
                        1 (integer) 
                        1 (integer) 
                    (implicit tuple) <--arg( D C B A ) 
                        ; (save) -->let( F ) 
                            `$ (signum) 
                                `& (bit intersection) 
                                    ; (save) -->let( E ) 
                                        ^ (pow) 
                                            2 (integer) 
                                            ;$ (= A) 
                                    _ (= C) 
                        `^ (bit xor) 
                            ;$ (= C) 
                            @ (= E) 
                        ; (save) -->let( H ) 
                            % (modulus) 
                                * (multiply) 
                                    + (add) 
                                        ^ (pow) 
                                            65 (integer) 
                                            + (add) 
                                                $ (= F) 
                                                ~ (auto) 
                                        ~ (auto) 
                                    ;@ (= B) 
                                ; (save) -->let( G ) 
                                    4291 (integer) 
                        % (modulus) 
                            + (add) 
                                + (add) 
                                    ;;$ (= B) 
                                    $ (= H) 
                                ;;@ (= A) 
                            @ (= G)