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