matrix := [
[0,14,0,0,0,0,0,0,0],
[14,0,0,0,0,0,0,0,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],
[0,0,0,0,0,0,0,0,14],
[1,22,7,10,16,13,3,14,20],
[0,0,0,0,0,0,14,0,0]
]*Z(23);