matrix := [
[0,14,0,0,0,0,0],
[14,0,0,0,0,0,0],
[0,0,0,14,0,0,0],
[0,0,14,0,0,0,0],
[0,0,0,0,0,14,0],
[0,0,0,0,14,0,0],
[15,15,16,16,14,14,9]
]*Z(23);