let X be non empty set ; :: thesis: for S being SigmaField of X
for f being with_the_same_dom Functional_Sequence of X,REAL
for E being Element of S st dom (f . 0) = E & ( for n being Nat holds f . n is E -measurable ) & ( for x being Element of X st x in E holds
f # x is convergent ) holds
lim f is E -measurable

let S be SigmaField of X; :: thesis: for f being with_the_same_dom Functional_Sequence of X,REAL
for E being Element of S st dom (f . 0) = E & ( for n being Nat holds f . n is E -measurable ) & ( for x being Element of X st x in E holds
f # x is convergent ) holds
lim f is E -measurable

let f be with_the_same_dom Functional_Sequence of X,REAL; :: thesis: for E being Element of S st dom (f . 0) = E & ( for n being Nat holds f . n is E -measurable ) & ( for x being Element of X st x in E holds
f # x is convergent ) holds
lim f is E -measurable

let E be Element of S; :: thesis: ( dom (f . 0) = E & ( for n being Nat holds f . n is E -measurable ) & ( for x being Element of X st x in E holds
f # x is convergent ) implies lim f is E -measurable )

assume A1: dom (f . 0) = E ; :: thesis: ( ex n being Nat st not f . n is E -measurable or ex x being Element of X st
( x in E & not f # x is convergent ) or lim f is E -measurable )

then A2: dom (lim f) = E by MESFUNC8:def 9;
assume for n being Nat holds f . n is E -measurable ; :: thesis: ( ex x being Element of X st
( x in E & not f # x is convergent ) or lim f is E -measurable )

then A3: lim_sup f is E -measurable by ;
assume A4: for x being Element of X st x in E holds
f # x is convergent ; :: thesis: lim f is E -measurable
A5: now :: thesis: for x being Element of X st x in dom (lim f) holds
(lim f) . x = () . x
let x be Element of X; :: thesis: ( x in dom (lim f) implies (lim f) . x = () . x )
assume A6: x in dom (lim f) ; :: thesis: (lim f) . x = () . x
then f # x is convergent by A2, A4;
hence (lim f) . x = () . x by ; :: thesis: verum
end;
dom () = E by ;
hence lim f is E -measurable by ; :: thesis: verum