g/mutually-attacking-queens.k

1 files changed, 8 insertions, 9 deletions

diff --git a/g/mutually-attacking-queens.k b/g/mutually-attacking-queens.k
index d129c230..cfb0b094 100755
--- a/g/mutually-attacking-queens.k
+++ b/g/mutually-attacking-queens.k
@@ -1,12 +1,11 @@
 #!../k
 / https://codegolf.stackexchange.com/questions/164175/mutually-attacking-queens/164201#164201
-f:{+/0|-1++/0|-':x,'+x,+8 31#,/+x,a,(|x),a:0*x}
+f:{+/0|-1+/0|-':x,'+x,+8 31#,/+x,a,(|x),a:^x}
 \l 0.k
-b:{8 8#x-"0"}
-t[b"1011100010101011101011010101010001100101100010000100011101110101";43]
-t[b"0000000000000000000000000000000000000000000000000000000000000000"; 0]
-t[b"1111111111111111111111111111111111111111111111111111111111111111"; 0]
-t[b"0000000000000000000000000100001000000000000000000000000000000000"; 1]
-t[b"0000000000010000000010000100001000001010000000000001001000000000";10]
-t[b"1111111111111111111111111111111111110111111111111111111111111111"; 4]
-t[b"1101111111111111111101111111011111110111111111111111111111111111";11]
+t[8 8#1011100010101011101011010101010001100101100010000100011101110101b]43
+t[8 8#0000000000000000000000000000000000000000000000000000000000000000b] 0
+t[8 8#1111111111111111111111111111111111111111111111111111111111111111b] 0
+t[8 8#0000000000000000000000000100001000000000000000000000000000000000b] 1
+t[8 8#0000000000010000000010000100001000001010000000000001001000000000b]10
+t[8 8#1111111111111111111111111111111111110111111111111111111111111111b] 4
+t[8 8#1101111111111111111101111111011111110111111111111111111111111111b]11