let a, c, b be ext-real number ; :: thesis: ( a <= c & b <= c & ( for d being ext-real number st a <= d & b <= d holds
c <= d ) implies c = max a,b )

assume that
A1: ( a <= c & b <= c ) and
A2: for d being ext-real number st a <= d & b <= d holds
c <= d ; :: thesis: c = max a,b
( a <= max a,b & b <= max a,b ) by Th25;
then A3: c <= max a,b by A2;
max a,b <= c by A1, Def10;
hence c = max a,b by A3, Th1; :: thesis: verum