theorem
  R c= [:field R,field R:] by Lm6;
