program main(input, output);

var
    i, j: integer;
    done: Boolean;
    count: integer;
    xsize, ysize: integer;
    notSymmetric: Boolean;
    matrix: array[1..100, 1..100] of integer;

begin
    done := false;
    count := 1;
    repeat 
	readln(xsize, ysize);

	if ((xsize = 0) or (ysize = 0)) then begin
	    done := true;
	end else begin
	    for i:= 1 to xsize do begin
		for j:= 1 to ysize do begin
		    read(matrix[i,j]);
		end;
		readln;
	    end;

	    notSymmetric := false;
	    if (xsize <> ysize) then begin
		notSymmetric := true;
	    end else begin
		for i:= 1 to xsize do begin
		    for j:= 1 to xsize do begin
			if (matrix[i,j] <> matrix[j,i]) then 
			    notSymmetric := true;
		    end;
		end;
	    end;
	    if (notSymmetric) then begin
		writeln('Matrix #', count:1, ' is not symmetric');
	    end else begin
		writeln('Matrix #', count:1, ' is symmetric');
	    end;
	end;
	count := count + 1;
    until done;
end.