matrix := [
[0,7,0,0,0],
[7,0,0,0,0],
[0,0,0,7,0],
[0,0,7,0,0],
[10,3,4,9,7]
]*Z(13);