matrix := [ [0,2,0,0,0,0,0,0], [0,0,2,0,0,0,0,0], [0,0,0,2,0,0,0,0], [0,0,0,0,2,0,0,0], [0,0,0,0,0,2,0,0], [0,0,0,0,0,0,2,0], [1,1,1,1,1,1,1,0], [1,0,2,2,2,0,0,2] ]*Z(3);