matrix := [
[0,7,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,0,0,0,1,0,0,7,1,0,6,3,3],
[6,0,0,3,6,0,6,0,0,0,0,10,0,0],
[0,6,3,0,0,0,10,7,0,7,0,1,10,0],
[6,0,6,0,0,0,0,0,10,0,6,0,1,0],
[0,0,0,6,0,0,0,6,0,6,0,7,0,0],
[6,0,6,0,0,3,0,0,0,3,6,0,0,6],
[1,0,1,7,1,0,0,10,0,10,0,0,12,7],
[7,0,0,0,0,10,0,0,0,10,7,3,7,7],
[0,6,0,0,0,7,0,6,7,7,0,6,3,0],
[6,0,6,3,6,0,0,0,0,0,0,0,7,0],
[3,0,3,8,3,1,0,7,7,8,0,6,0,3],
[0,0,10,0,0,0,0,0,7,0,0,6,3,0]
]*Z(13);