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