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,0,0,1,3,4], [0,0,0,0,0,0,3,0,0] ]*Z(5);