theorem
  0 <= |.x.|
 proof
  reconsider x as R_eal by XXREAL_0:def 1;
  0 <= |.x.|;
 hence thesis;
 end;
