A1: now

let t be real number ; :: thesis: ( ( for s being real number st s in X holds
s >= t ) implies inf X >= t )
assume for s being real number st s in X holds
s >= t ; :: thesis: inf X >= t
then for x being ext-real number st x in X holds
t <= x ;
then t is LowerBound of X by XXREAL_2:def 2;
hence inf X >= t by XXREAL_2:def 4; :: thesis: verum

end;

for s being real number st s in X holds
s >= inf X by XXREAL_2:3;
hence lower_bound X = inf X by A1, Lm1; :: thesis: verum