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