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