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