matrix := [ [0,5,4,0,0,6,0,0,2,6,0,5,4,4], [2,0,0,3,4,0,0,0,0,0,0,4,0,0], [0,5,4,2,0,0,0,0,0,4,0,5,0,0], [0,4,2,0,0,3,2,4,0,3,0,4,4,2], [0,5,0,0,0,0,0,0,0,0,0,0,0,0], [5,4,4,0,0,0,0,0,0,3,5,0,0,0], [4,5,4,4,4,4,0,0,0,4,0,5,0,4], [5,3,5,4,3,0,2,0,0,4,0,3,0,0], [0,0,5,4,5,0,3,3,0,0,0,3,5,0], [0,0,0,3,2,4,0,0,0,0,0,4,0,5], [0,5,4,4,4,3,0,0,5,0,0,5,3,3], [0,0,5,0,0,0,2,4,0,0,0,4,4,0], [0,5,4,0,0,0,3,4,0,4,0,2,3,0], [3,5,0,0,0,1,0,0,0,5,3,0,0,3] ]*Z(7);