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