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