matrix := [
[0,7,0,0,0,0,0,0,0,0,0,0,0],
[0,0,0,7,0,0,0,0,0,0,0,0,0],
[0,6,7,7,0,0,0,0,0,0,0,0,0],
[7,0,0,0,0,0,0,0,0,0,0,0,0],
[0,0,0,0,7,0,0,0,0,0,0,0,0],
[6,7,0,0,0,7,0,0,0,0,0,0,0],
[6,7,0,0,0,0,7,0,0,0,0,0,0],
[6,0,0,7,0,0,0,7,0,0,0,0,0],
[7,12,0,7,0,0,0,0,7,0,0,0,0],
[12,8,0,6,0,0,0,0,0,7,0,0,0],
[0,12,0,1,0,0,0,0,0,0,7,0,0],
[0,0,0,0,0,0,0,0,0,0,0,7,0],
[6,7,0,0,0,0,0,0,0,0,0,0,7]
]*Z(13);