theorem
  field id X = X
proof
  dom id X = X & rng id X = X;
  then field id X = X \/ X by RELAT_1:def 6;
  hence thesis;
end;
