matrix := [ [0,6,0,0,0,0,0,0,0,0,0,0,0], [6,0,0,0,0,0,0,0,0,0,0,0,0], [0,0,0,6,0,0,0,0,0,0,0,0,0], [0,0,6,0,0,0,0,0,0,0,0,0,0], [0,0,0,0,0,6,0,0,0,0,0,0,0], [0,0,0,0,6,0,0,0,0,0,0,0,0], [0,0,0,0,0,0,0,0,6,0,0,0,0], [0,0,0,0,0,0,0,0,0,6,0,0,0], [0,0,0,0,0,0,6,0,0,0,0,0,0], [0,0,0,0,0,0,0,6,0,0,0,0,0], [0,16,2,12,2,6,0,14,9,16,13,11,1], [0,2,13,10,5,13,15,6,1,2,3,1,15], [6,8,14,11,2,5,2,13,8,9,4,16,9] ]*Z(17);