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

theorem Th12:
  a in REAL implies -infty < a
proof
  -infty <= a by Def5,Lm4,Lm6;
  hence thesis by Th1,Th11;
end;
