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