consider F being Functional_Sequence of X,ExtREAL such that
A3:
for n being Nat holds
( F . n is_simple_func_in S & dom (F . n) = dom f )
and
A4:
for n being Nat holds F . n is nonnegative
and
A5:
for n, m being Nat st n <= m holds
for x being Element of X st x in dom f holds
(F . n) . x <= (F . m) . x
and
A6:
for x being Element of X st x in dom f holds
( F # x is convergent & lim (F # x) = f . x )
by A1, A2, Th64;
reconsider g = F . 0 as PartFunc of X,ExtREAL ;
A7:
g is_simple_func_in S
by A3;
A8:
for x being Element of X st x in dom f holds
( F # x is convergent & g . x <= lim (F # x) )
dom g = dom f
by A3;
then
ex G being ExtREAL_sequence st
( ( for n being Nat holds G . n = integral' (M,(F . n)) ) & G is convergent & sup (rng G) = lim G & integral' (M,g) <= lim G )
by A3, A4, A5, A8, A7, Th75;
then consider G being ExtREAL_sequence such that
A14:
for n being Nat holds G . n = integral' (M,(F . n))
and
A15:
G is convergent
and
integral' (M,g) <= lim G
;
take
lim G
; ex F being Functional_Sequence of X,ExtREAL ex K being ExtREAL_sequence st
( ( for n being Nat holds
( F . n is_simple_func_in S & dom (F . n) = dom f ) ) & ( for n being Nat holds F . n is nonnegative ) & ( for n, m being Nat st n <= m holds
for x being Element of X st x in dom f holds
(F . n) . x <= (F . m) . x ) & ( for x being Element of X st x in dom f holds
( F # x is convergent & lim (F # x) = f . x ) ) & ( for n being Nat holds K . n = integral' (M,(F . n)) ) & K is convergent & lim G = lim K )
thus
ex F being Functional_Sequence of X,ExtREAL ex K being ExtREAL_sequence st
( ( for n being Nat holds
( F . n is_simple_func_in S & dom (F . n) = dom f ) ) & ( for n being Nat holds F . n is nonnegative ) & ( for n, m being Nat st n <= m holds
for x being Element of X st x in dom f holds
(F . n) . x <= (F . m) . x ) & ( for x being Element of X st x in dom f holds
( F # x is convergent & lim (F # x) = f . x ) ) & ( for n being Nat holds K . n = integral' (M,(F . n)) ) & K is convergent & lim G = lim K )
by A3, A4, A5, A6, A14, A15; verum