let f be ext-real-valued Function; :: thesis: ( f is trivial implies ( f is increasing & f is decreasing ) )
assume A1: f is trivial ; :: thesis: ( f is increasing & f is decreasing )
thus f is increasing :: thesis: f is decreasing
proof
let e1 be ext-real number ; :: according to VALUED_0:def 13 :: thesis: for e2 being ext-real number st e1 in dom f & e2 in dom f & e1 < e2 holds
f . e1 < f . e2

let e2 be ext-real number ; :: thesis: ( e1 in dom f & e2 in dom f & e1 < e2 implies f . e1 < f . e2 )
assume ( e1 in dom f & e2 in dom f ) ; :: thesis: ( not e1 < e2 or f . e1 < f . e2 )
hence ( not e1 < e2 or f . e1 < f . e2 ) by A1, ZFMISC_1:def 10; :: thesis: verum
end;
let e1 be ext-real number ; :: according to VALUED_0:def 14 :: thesis: for e2 being ext-real number st e1 in dom f & e2 in dom f & e1 < e2 holds
f . e1 > f . e2

let e2 be ext-real number ; :: thesis: ( e1 in dom f & e2 in dom f & e1 < e2 implies f . e1 > f . e2 )
assume ( e1 in dom f & e2 in dom f ) ; :: thesis: ( not e1 < e2 or f . e1 > f . e2 )
hence ( not e1 < e2 or f . e1 > f . e2 ) by A1, ZFMISC_1:def 10; :: thesis: verum