Problem: Simple Hexagony
Code: Simple+Hexagony/tails_1644674388
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):[chr] ;@ (= sndLine):[chr] < (take):[int] ;$ (= sndInt):int > (drop):[int] 2 (integer):int `' (transpose):[int] -->let( J:[int] I:[int] H:[int] ) `. (iterate while uniq):[int,int,int,int] ~~~ (4-ary tuple):int,int,int,int 0 (integer):int 0 (integer):int 1 (integer):int 1 (integer):int (implicit tuple):int,int,int,int <--arg( D:int C:int B:int A:int ) ; (let):int -->let( F:int ) `$ (signum):int `& (bit intersection):int ; (let):int -->let( E:int ) ^ (pow):int 2 (integer):int ;$ (= A):int _ (= C):int `^ (bit xor):int ;$ (= C):int @ (= E):int ; (let):int -->let( G:int ) * (multiply):int ^ (pow):int 22 (integer):int ^ (pow):int 5 (integer):int $ (= F):int ;@ (= B):int % (modulus):int + (add):int + (add):int ;_ (= B):int $ (= G):int ;;$ (= A):int 463 (integer):int