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