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