let A be non empty set ; :: thesis: for f, g being Element of Funcs (A,REAL) holds (maxfuncreal A) . (((minfuncreal A) . (f,g)),f) = f
let f, g be Element of Funcs (A,REAL); :: thesis: (maxfuncreal A) . (((minfuncreal A) . (f,g)),f) = f
thus (maxfuncreal A) . (((minfuncreal A) . (f,g)),f) = (maxfuncreal A) . (f,((minfuncreal A) . (f,g))) by Th8
.= f by Th12 ; :: thesis: verum