reserve x for set;
reserve a,b,c,d for ExtReal;

theorem
  a in REAL or a = +infty or a = -infty by Lm10;
