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