# code: http://golf.shinh.org/reveal.rb?Simple+Hexagony/tails_1644403551&nbb # target Nibbles version: 0.23 # commenter version: 0.1.2.181 * #(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 ) ; #(save):int -->let( F:int ) `$ #(signum):int `& #(bit intersection):int ; #(save):int -->let( E:int ) ^ #(pow):int 2 #(integer):int ;$ #(= A):int _ #(= C):int `^ #(bit xor):int ;$ #(= C):int @ #(= E):int ; #(save):int -->let( G:int ) * #(multiply):int + #(add):int ^ #(pow):int 21 #(integer):int + #(add):int $ #(= F):int ~ #(auto = 1):auto ~ #(auto = 1):auto ;@ #(= B):int % #(modulus):int + #(add):int + #(add):int ;_ #(= B):int $ #(= G):int ;;$ #(= A):int 463 #(integer):int