matrix := [ [13,9,0,0,0,0,0,0,0,0,0,0,0], [0,0,14,0,0,0,0,0,0,0,0,0,0], [10,6,10,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,0,14,0,0,0,0,0,0], [0,0,0,0,0,0,0,14,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,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,0,0,0,0,14], [0,0,0,0,0,14,0,0,0,0,0,0,0], [8,13,7,14,20,12,12,1,0,21,10,14,2], [18,13,9,2,15,7,6,1,6,14,15,17,0] ]*Z(23);