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