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