let lcase =  [(0,0);(0,1);(0,2);(0,3);(0,4);(0,5);(0,6);(0,7);
             (1,0);(2,0);(3,0);(4,0);(5,0);(6,0);(7,0);
             (7,1);(7,2);(7,3);(7,4);(7,5);(7,6);(7,7);
             (6,7);(5,7);(4,7);(3,7);(2,7);(1,7);(2,2);(5,5);(5,2);(2,5);
             (1,2);(2,1);(5,1);(6,2);(1,5);(2,6);(5,6);(6,5)]