theorem
  field R = field(R~)
proof
  thus field R = rng(R~) \/ rng R by Th14
    .= field(R~) by Th14;
end;
