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