theorem
  --A = --B implies A = B
proof
  assume --A = --B;
  then A c= B & B c= A by Th13;
  hence thesis;
end;
