theorem
  field R c= X \/ Y
proof
  dom R \/ rng R c= X \/ Y by XBOOLE_1:13;
  hence thesis;
end;
