matrix := [
[0,10,0,0,0,0,0],
[10,0,0,0,0,0,0],
[0,0,0,10,0,0,0],
[0,0,10,0,0,0,0],
[0,0,0,0,0,10,0],
[0,0,0,0,10,0,0],
[13,13,18,18,13,13,9]
]*Z(19);