science_man_88

king

Dec 23rd, 2016
395
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. king(x)=select(r->(abs(r[1]-x[1])<2 && abs(r[2]-x[2])<2) && [r[1],r[2]]!=[x[1],x[2]],setbinop((x,y)->concat(x,y),[1,2,3,4,5,6,7,8],[1,2,3,4,5,6,7,8]))
Add Comment
Please, Sign In to add comment