matrix := [ [2,6,0,0,0,0,0,0,0,0,0,0,0,0], [0,0,7,0,0,0,0,0,0,0,0,0,0,0], [0,0,0,0,7,0,0,0,0,0,0,0,0,0], [0,0,0,0,0,7,0,0,0,0,0,0,0,0], [4,7,5,0,11,0,0,0,0,0,0,0,0,0], [0,0,0,0,0,0,0,0,7,0,0,0,0,0], [0,0,0,0,0,0,0,0,0,7,0,0,0,0], [12,9,6,11,0,7,6,0,0,0,0,0,0,0], [0,0,0,0,0,0,0,0,0,0,0,7,0,0], [10,1,4,0,0,6,7,4,9,4,0,10,0,0], [10,0,9,5,11,12,7,0,7,4,4,2,0,0], [0,0,0,7,0,0,0,0,0,0,0,0,0,0], [0,0,0,0,0,0,0,0,0,0,0,0,0,7], [12,6,5,10,1,2,0,7,4,6,0,4,6,0] ]*Z(13);