matrix := [ [0,14,0,0,0,0,0,0,0,0,0,0,0], [14,0,0,0,0,0,0,0,0,0,0,0,0], [0,0,0,14,0,0,0,0,0,0,0,0,0], [0,0,14,0,0,0,0,0,0,0,0,0,0], [0,0,0,0,0,14,0,0,0,0,0,0,0], [0,0,0,0,14,0,0,0,0,0,0,0,0], [0,0,0,0,0,0,0,0,14,0,0,0,0], [0,0,0,0,0,0,0,0,0,14,0,0,0], [0,0,0,0,0,0,14,0,0,0,0,0,0], [0,0,0,0,0,0,0,14,0,0,0,0,0], [17,3,4,7,9,4,0,16,20,7,22,8,7], [1,14,1,13,10,17,2,12,13,11,6,20,11], [15,3,15,11,18,19,7,14,11,9,21,21,18] ]*Z(23);