Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  carageniuncllem1 Structured version   Visualization version   Unicode version

Theorem carageniuncllem1 40735
Description: The outer measure of  A  i^i  ( G `  n ) is the sum of the outer measures of  A  i^i  ( F `  m ). These are lines 7 to 10 of Step (d) in the proof of Theorem 113C of [Fremlin1] p. 20. (Contributed by Glauco Siliprandi, 17-Aug-2020.)
Hypotheses
Ref Expression
carageniuncllem1.o  |-  ( ph  ->  O  e. OutMeas )
carageniuncllem1.s  |-  S  =  (CaraGen `  O )
carageniuncllem1.x  |-  X  = 
U. dom  O
carageniuncllem1.a  |-  ( ph  ->  A  C_  X )
carageniuncllem1.re  |-  ( ph  ->  ( O `  A
)  e.  RR )
carageniuncllem1.z  |-  Z  =  ( ZZ>= `  M )
carageniuncllem1.e  |-  ( ph  ->  E : Z --> S )
carageniuncllem1.g  |-  G  =  ( n  e.  Z  |-> 
U_ i  e.  ( M ... n ) ( E `  i
) )
carageniuncllem1.f  |-  F  =  ( n  e.  Z  |->  ( ( E `  n )  \  U_ i  e.  ( M..^ n ) ( E `
 i ) ) )
carageniuncllem1.k  |-  ( ph  ->  K  e.  Z )
Assertion
Ref Expression
carageniuncllem1  |-  ( ph  -> 
sum_ n  e.  ( M ... K ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  K )
) ) )
Distinct variable groups:    A, n    i, E, n    n, F   
n, K    i, M, n    n, O    S, i    n, Z    ph, i, n
Allowed substitution hints:    A( i)    S( n)    F( i)    G( i, n)    K( i)    O( i)    X( i, n)    Z( i)

Proof of Theorem carageniuncllem1
Dummy variables  k 
j are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 carageniuncllem1.k . . . 4  |-  ( ph  ->  K  e.  Z )
2 carageniuncllem1.z . . . 4  |-  Z  =  ( ZZ>= `  M )
31, 2syl6eleq 2711 . . 3  |-  ( ph  ->  K  e.  ( ZZ>= `  M ) )
4 eluzfz2 12349 . . 3  |-  ( K  e.  ( ZZ>= `  M
)  ->  K  e.  ( M ... K ) )
53, 4syl 17 . 2  |-  ( ph  ->  K  e.  ( M ... K ) )
6 id 22 . 2  |-  ( ph  ->  ph )
7 oveq2 6658 . . . . . 6  |-  ( k  =  M  ->  ( M ... k )  =  ( M ... M
) )
87sumeq1d 14431 . . . . 5  |-  ( k  =  M  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  sum_ n  e.  ( M ... M ) ( O `
 ( A  i^i  ( F `  n ) ) ) )
9 fveq2 6191 . . . . . . 7  |-  ( k  =  M  ->  ( G `  k )  =  ( G `  M ) )
109ineq2d 3814 . . . . . 6  |-  ( k  =  M  ->  ( A  i^i  ( G `  k ) )  =  ( A  i^i  ( G `  M )
) )
1110fveq2d 6195 . . . . 5  |-  ( k  =  M  ->  ( O `  ( A  i^i  ( G `  k
) ) )  =  ( O `  ( A  i^i  ( G `  M ) ) ) )
128, 11eqeq12d 2637 . . . 4  |-  ( k  =  M  ->  ( sum_ n  e.  ( M ... k ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  k )
) )  <->  sum_ n  e.  ( M ... M
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  M ) ) ) ) )
1312imbi2d 330 . . 3  |-  ( k  =  M  ->  (
( ph  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  k ) ) ) )  <->  ( ph  ->  sum_
n  e.  ( M ... M ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  M )
) ) ) ) )
14 oveq2 6658 . . . . . 6  |-  ( k  =  j  ->  ( M ... k )  =  ( M ... j
) )
1514sumeq1d 14431 . . . . 5  |-  ( k  =  j  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  sum_ n  e.  ( M ... j ) ( O `
 ( A  i^i  ( F `  n ) ) ) )
16 fveq2 6191 . . . . . . 7  |-  ( k  =  j  ->  ( G `  k )  =  ( G `  j ) )
1716ineq2d 3814 . . . . . 6  |-  ( k  =  j  ->  ( A  i^i  ( G `  k ) )  =  ( A  i^i  ( G `  j )
) )
1817fveq2d 6195 . . . . 5  |-  ( k  =  j  ->  ( O `  ( A  i^i  ( G `  k
) ) )  =  ( O `  ( A  i^i  ( G `  j ) ) ) )
1915, 18eqeq12d 2637 . . . 4  |-  ( k  =  j  ->  ( sum_ n  e.  ( M ... k ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  k )
) )  <->  sum_ n  e.  ( M ... j
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  j ) ) ) ) )
2019imbi2d 330 . . 3  |-  ( k  =  j  ->  (
( ph  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  k ) ) ) )  <->  ( ph  ->  sum_
n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) ) ) )
21 oveq2 6658 . . . . . 6  |-  ( k  =  ( j  +  1 )  ->  ( M ... k )  =  ( M ... (
j  +  1 ) ) )
2221sumeq1d 14431 . . . . 5  |-  ( k  =  ( j  +  1 )  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  sum_ n  e.  ( M ... ( j  +  1 ) ) ( O `
 ( A  i^i  ( F `  n ) ) ) )
23 fveq2 6191 . . . . . . 7  |-  ( k  =  ( j  +  1 )  ->  ( G `  k )  =  ( G `  ( j  +  1 ) ) )
2423ineq2d 3814 . . . . . 6  |-  ( k  =  ( j  +  1 )  ->  ( A  i^i  ( G `  k ) )  =  ( A  i^i  ( G `  ( j  +  1 ) ) ) )
2524fveq2d 6195 . . . . 5  |-  ( k  =  ( j  +  1 )  ->  ( O `  ( A  i^i  ( G `  k
) ) )  =  ( O `  ( A  i^i  ( G `  ( j  +  1 ) ) ) ) )
2622, 25eqeq12d 2637 . . . 4  |-  ( k  =  ( j  +  1 )  ->  ( sum_ n  e.  ( M ... k ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  k )
) )  <->  sum_ n  e.  ( M ... (
j  +  1 ) ) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  ( j  +  1 ) ) ) ) ) )
2726imbi2d 330 . . 3  |-  ( k  =  ( j  +  1 )  ->  (
( ph  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  k ) ) ) )  <->  ( ph  ->  sum_
n  e.  ( M ... ( j  +  1 ) ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  ( j  +  1 ) ) ) ) ) ) )
28 oveq2 6658 . . . . . 6  |-  ( k  =  K  ->  ( M ... k )  =  ( M ... K
) )
2928sumeq1d 14431 . . . . 5  |-  ( k  =  K  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  sum_ n  e.  ( M ... K ) ( O `
 ( A  i^i  ( F `  n ) ) ) )
30 fveq2 6191 . . . . . . 7  |-  ( k  =  K  ->  ( G `  k )  =  ( G `  K ) )
3130ineq2d 3814 . . . . . 6  |-  ( k  =  K  ->  ( A  i^i  ( G `  k ) )  =  ( A  i^i  ( G `  K )
) )
3231fveq2d 6195 . . . . 5  |-  ( k  =  K  ->  ( O `  ( A  i^i  ( G `  k
) ) )  =  ( O `  ( A  i^i  ( G `  K ) ) ) )
3329, 32eqeq12d 2637 . . . 4  |-  ( k  =  K  ->  ( sum_ n  e.  ( M ... k ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  k )
) )  <->  sum_ n  e.  ( M ... K
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  K ) ) ) ) )
3433imbi2d 330 . . 3  |-  ( k  =  K  ->  (
( ph  ->  sum_ n  e.  ( M ... k
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  k ) ) ) )  <->  ( ph  ->  sum_
n  e.  ( M ... K ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  K )
) ) ) ) )
35 eluzel2 11692 . . . . . . . 8  |-  ( K  e.  ( ZZ>= `  M
)  ->  M  e.  ZZ )
363, 35syl 17 . . . . . . 7  |-  ( ph  ->  M  e.  ZZ )
37 fzsn 12383 . . . . . . 7  |-  ( M  e.  ZZ  ->  ( M ... M )  =  { M } )
3836, 37syl 17 . . . . . 6  |-  ( ph  ->  ( M ... M
)  =  { M } )
3938sumeq1d 14431 . . . . 5  |-  ( ph  -> 
sum_ n  e.  ( M ... M ) ( O `  ( A  i^i  ( F `  n ) ) )  =  sum_ n  e.  { M }  ( O `  ( A  i^i  ( F `  n )
) ) )
40 carageniuncllem1.o . . . . . . . 8  |-  ( ph  ->  O  e. OutMeas )
41 carageniuncllem1.x . . . . . . . 8  |-  X  = 
U. dom  O
42 carageniuncllem1.a . . . . . . . 8  |-  ( ph  ->  A  C_  X )
43 carageniuncllem1.re . . . . . . . 8  |-  ( ph  ->  ( O `  A
)  e.  RR )
44 inss1 3833 . . . . . . . . 9  |-  ( A  i^i  ( F `  M ) )  C_  A
4544a1i 11 . . . . . . . 8  |-  ( ph  ->  ( A  i^i  ( F `  M )
)  C_  A )
4640, 41, 42, 43, 45omessre 40724 . . . . . . 7  |-  ( ph  ->  ( O `  ( A  i^i  ( F `  M ) ) )  e.  RR )
4746recnd 10068 . . . . . 6  |-  ( ph  ->  ( O `  ( A  i^i  ( F `  M ) ) )  e.  CC )
48 fveq2 6191 . . . . . . . . 9  |-  ( n  =  M  ->  ( F `  n )  =  ( F `  M ) )
4948ineq2d 3814 . . . . . . . 8  |-  ( n  =  M  ->  ( A  i^i  ( F `  n ) )  =  ( A  i^i  ( F `  M )
) )
5049fveq2d 6195 . . . . . . 7  |-  ( n  =  M  ->  ( O `  ( A  i^i  ( F `  n
) ) )  =  ( O `  ( A  i^i  ( F `  M ) ) ) )
5150sumsn 14475 . . . . . 6  |-  ( ( M  e.  ZZ  /\  ( O `  ( A  i^i  ( F `  M ) ) )  e.  CC )  ->  sum_ n  e.  { M }  ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( F `  M ) ) ) )
5236, 47, 51syl2anc 693 . . . . 5  |-  ( ph  -> 
sum_ n  e.  { M }  ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( F `  M ) ) ) )
53 eqidd 2623 . . . . . 6  |-  ( ph  ->  ( O `  ( A  i^i  ( E `  M ) ) )  =  ( O `  ( A  i^i  ( E `  M )
) ) )
54 carageniuncllem1.f . . . . . . . . . . 11  |-  F  =  ( n  e.  Z  |->  ( ( E `  n )  \  U_ i  e.  ( M..^ n ) ( E `
 i ) ) )
5554a1i 11 . . . . . . . . . 10  |-  ( ph  ->  F  =  ( n  e.  Z  |->  ( ( E `  n ) 
\  U_ i  e.  ( M..^ n ) ( E `  i ) ) ) )
56 fveq2 6191 . . . . . . . . . . . 12  |-  ( n  =  M  ->  ( E `  n )  =  ( E `  M ) )
57 oveq2 6658 . . . . . . . . . . . . 13  |-  ( n  =  M  ->  ( M..^ n )  =  ( M..^ M ) )
5857iuneq1d 4545 . . . . . . . . . . . 12  |-  ( n  =  M  ->  U_ i  e.  ( M..^ n ) ( E `  i
)  =  U_ i  e.  ( M..^ M ) ( E `  i
) )
5956, 58difeq12d 3729 . . . . . . . . . . 11  |-  ( n  =  M  ->  (
( E `  n
)  \  U_ i  e.  ( M..^ n ) ( E `  i
) )  =  ( ( E `  M
)  \  U_ i  e.  ( M..^ M ) ( E `  i
) ) )
6059adantl 482 . . . . . . . . . 10  |-  ( (
ph  /\  n  =  M )  ->  (
( E `  n
)  \  U_ i  e.  ( M..^ n ) ( E `  i
) )  =  ( ( E `  M
)  \  U_ i  e.  ( M..^ M ) ( E `  i
) ) )
61 uzid 11702 . . . . . . . . . . . 12  |-  ( M  e.  ZZ  ->  M  e.  ( ZZ>= `  M )
)
6236, 61syl 17 . . . . . . . . . . 11  |-  ( ph  ->  M  e.  ( ZZ>= `  M ) )
632a1i 11 . . . . . . . . . . . 12  |-  ( ph  ->  Z  =  ( ZZ>= `  M ) )
6463eqcomd 2628 . . . . . . . . . . 11  |-  ( ph  ->  ( ZZ>= `  M )  =  Z )
6562, 64eleqtrd 2703 . . . . . . . . . 10  |-  ( ph  ->  M  e.  Z )
66 fvex 6201 . . . . . . . . . . . 12  |-  ( E `
 M )  e. 
_V
67 difexg 4808 . . . . . . . . . . . 12  |-  ( ( E `  M )  e.  _V  ->  (
( E `  M
)  \  U_ i  e.  ( M..^ M ) ( E `  i
) )  e.  _V )
6866, 67ax-mp 5 . . . . . . . . . . 11  |-  ( ( E `  M ) 
\  U_ i  e.  ( M..^ M ) ( E `  i ) )  e.  _V
6968a1i 11 . . . . . . . . . 10  |-  ( ph  ->  ( ( E `  M )  \  U_ i  e.  ( M..^ M ) ( E `
 i ) )  e.  _V )
7055, 60, 65, 69fvmptd 6288 . . . . . . . . 9  |-  ( ph  ->  ( F `  M
)  =  ( ( E `  M ) 
\  U_ i  e.  ( M..^ M ) ( E `  i ) ) )
71 fzo0 12492 . . . . . . . . . . . . 13  |-  ( M..^ M )  =  (/)
72 iuneq1 4534 . . . . . . . . . . . . 13  |-  ( ( M..^ M )  =  (/)  ->  U_ i  e.  ( M..^ M ) ( E `  i )  =  U_ i  e.  (/)  ( E `  i
) )
7371, 72ax-mp 5 . . . . . . . . . . . 12  |-  U_ i  e.  ( M..^ M ) ( E `  i
)  =  U_ i  e.  (/)  ( E `  i )
74 0iun 4577 . . . . . . . . . . . 12  |-  U_ i  e.  (/)  ( E `  i )  =  (/)
7573, 74eqtri 2644 . . . . . . . . . . 11  |-  U_ i  e.  ( M..^ M ) ( E `  i
)  =  (/)
7675difeq2i 3725 . . . . . . . . . 10  |-  ( ( E `  M ) 
\  U_ i  e.  ( M..^ M ) ( E `  i ) )  =  ( ( E `  M ) 
\  (/) )
7776a1i 11 . . . . . . . . 9  |-  ( ph  ->  ( ( E `  M )  \  U_ i  e.  ( M..^ M ) ( E `
 i ) )  =  ( ( E `
 M )  \  (/) ) )
78 dif0 3950 . . . . . . . . . 10  |-  ( ( E `  M ) 
\  (/) )  =  ( E `  M )
7978a1i 11 . . . . . . . . 9  |-  ( ph  ->  ( ( E `  M )  \  (/) )  =  ( E `  M
) )
8070, 77, 793eqtrd 2660 . . . . . . . 8  |-  ( ph  ->  ( F `  M
)  =  ( E `
 M ) )
8180ineq2d 3814 . . . . . . 7  |-  ( ph  ->  ( A  i^i  ( F `  M )
)  =  ( A  i^i  ( E `  M ) ) )
8281fveq2d 6195 . . . . . 6  |-  ( ph  ->  ( O `  ( A  i^i  ( F `  M ) ) )  =  ( O `  ( A  i^i  ( E `  M )
) ) )
83 carageniuncllem1.g . . . . . . . . . . 11  |-  G  =  ( n  e.  Z  |-> 
U_ i  e.  ( M ... n ) ( E `  i
) )
8483a1i 11 . . . . . . . . . 10  |-  ( ph  ->  G  =  ( n  e.  Z  |->  U_ i  e.  ( M ... n
) ( E `  i ) ) )
85 oveq2 6658 . . . . . . . . . . . 12  |-  ( n  =  M  ->  ( M ... n )  =  ( M ... M
) )
8685iuneq1d 4545 . . . . . . . . . . 11  |-  ( n  =  M  ->  U_ i  e.  ( M ... n
) ( E `  i )  =  U_ i  e.  ( M ... M ) ( E `
 i ) )
8786adantl 482 . . . . . . . . . 10  |-  ( (
ph  /\  n  =  M )  ->  U_ i  e.  ( M ... n
) ( E `  i )  =  U_ i  e.  ( M ... M ) ( E `
 i ) )
88 ovex 6678 . . . . . . . . . . . 12  |-  ( M ... M )  e. 
_V
89 fvex 6201 . . . . . . . . . . . 12  |-  ( E `
 i )  e. 
_V
9088, 89iunex 7147 . . . . . . . . . . 11  |-  U_ i  e.  ( M ... M
) ( E `  i )  e.  _V
9190a1i 11 . . . . . . . . . 10  |-  ( ph  ->  U_ i  e.  ( M ... M ) ( E `  i
)  e.  _V )
9284, 87, 65, 91fvmptd 6288 . . . . . . . . 9  |-  ( ph  ->  ( G `  M
)  =  U_ i  e.  ( M ... M
) ( E `  i ) )
9338iuneq1d 4545 . . . . . . . . 9  |-  ( ph  ->  U_ i  e.  ( M ... M ) ( E `  i
)  =  U_ i  e.  { M }  ( E `  i )
)
94 fveq2 6191 . . . . . . . . . . 11  |-  ( i  =  M  ->  ( E `  i )  =  ( E `  M ) )
9594iunxsng 4602 . . . . . . . . . 10  |-  ( M  e.  ZZ  ->  U_ i  e.  { M }  ( E `  i )  =  ( E `  M ) )
9636, 95syl 17 . . . . . . . . 9  |-  ( ph  ->  U_ i  e.  { M }  ( E `  i )  =  ( E `  M ) )
9792, 93, 963eqtrd 2660 . . . . . . . 8  |-  ( ph  ->  ( G `  M
)  =  ( E `
 M ) )
9897ineq2d 3814 . . . . . . 7  |-  ( ph  ->  ( A  i^i  ( G `  M )
)  =  ( A  i^i  ( E `  M ) ) )
9998fveq2d 6195 . . . . . 6  |-  ( ph  ->  ( O `  ( A  i^i  ( G `  M ) ) )  =  ( O `  ( A  i^i  ( E `  M )
) ) )
10053, 82, 993eqtr4d 2666 . . . . 5  |-  ( ph  ->  ( O `  ( A  i^i  ( F `  M ) ) )  =  ( O `  ( A  i^i  ( G `  M )
) ) )
10139, 52, 1003eqtrd 2660 . . . 4  |-  ( ph  -> 
sum_ n  e.  ( M ... M ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  M )
) ) )
102101a1i 11 . . 3  |-  ( K  e.  ( ZZ>= `  M
)  ->  ( ph  -> 
sum_ n  e.  ( M ... M ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  M )
) ) ) )
103 simp3 1063 . . . . 5  |-  ( ( j  e.  ( M..^ K )  /\  ( ph  ->  sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  /\  ph )  ->  ph )
104 simp1 1061 . . . . 5  |-  ( ( j  e.  ( M..^ K )  /\  ( ph  ->  sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  /\  ph )  ->  j  e.  ( M..^ K ) )
105 id 22 . . . . . . 7  |-  ( (
ph  ->  sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  -> 
( ph  ->  sum_ n  e.  ( M ... j
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  j ) ) ) ) )
106105imp 445 . . . . . 6  |-  ( ( ( ph  ->  sum_ n  e.  ( M ... j
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  j ) ) ) )  /\  ph )  -> 
sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )
1071063adant1 1079 . . . . 5  |-  ( ( j  e.  ( M..^ K )  /\  ( ph  ->  sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  /\  ph )  ->  sum_ n  e.  ( M ... j
) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  j ) ) ) )
108 elfzouz 12474 . . . . . . . . 9  |-  ( j  e.  ( M..^ K
)  ->  j  e.  ( ZZ>= `  M )
)
109108adantl 482 . . . . . . . 8  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  j  e.  (
ZZ>= `  M ) )
11040adantr 481 . . . . . . . . . . 11  |-  ( (
ph  /\  n  e.  ( M ... ( j  +  1 ) ) )  ->  O  e. OutMeas )
11142adantr 481 . . . . . . . . . . 11  |-  ( (
ph  /\  n  e.  ( M ... ( j  +  1 ) ) )  ->  A  C_  X
)
11243adantr 481 . . . . . . . . . . 11  |-  ( (
ph  /\  n  e.  ( M ... ( j  +  1 ) ) )  ->  ( O `  A )  e.  RR )
113 inss1 3833 . . . . . . . . . . . 12  |-  ( A  i^i  ( F `  n ) )  C_  A
114113a1i 11 . . . . . . . . . . 11  |-  ( (
ph  /\  n  e.  ( M ... ( j  +  1 ) ) )  ->  ( A  i^i  ( F `  n
) )  C_  A
)
115110, 41, 111, 112, 114omessre 40724 . . . . . . . . . 10  |-  ( (
ph  /\  n  e.  ( M ... ( j  +  1 ) ) )  ->  ( O `  ( A  i^i  ( F `  n )
) )  e.  RR )
116115recnd 10068 . . . . . . . . 9  |-  ( (
ph  /\  n  e.  ( M ... ( j  +  1 ) ) )  ->  ( O `  ( A  i^i  ( F `  n )
) )  e.  CC )
117116adantlr 751 . . . . . . . 8  |-  ( ( ( ph  /\  j  e.  ( M..^ K ) )  /\  n  e.  ( M ... (
j  +  1 ) ) )  ->  ( O `  ( A  i^i  ( F `  n
) ) )  e.  CC )
118 fveq2 6191 . . . . . . . . . 10  |-  ( n  =  ( j  +  1 )  ->  ( F `  n )  =  ( F `  ( j  +  1 ) ) )
119118ineq2d 3814 . . . . . . . . 9  |-  ( n  =  ( j  +  1 )  ->  ( A  i^i  ( F `  n ) )  =  ( A  i^i  ( F `  ( j  +  1 ) ) ) )
120119fveq2d 6195 . . . . . . . 8  |-  ( n  =  ( j  +  1 )  ->  ( O `  ( A  i^i  ( F `  n
) ) )  =  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) )
121109, 117, 120fsump1 14487 . . . . . . 7  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  sum_ n  e.  ( M ... ( j  +  1 ) ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( sum_ n  e.  ( M ... j
) ( O `  ( A  i^i  ( F `  n )
) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) ) )
1221213adant3 1081 . . . . . 6  |-  ( (
ph  /\  j  e.  ( M..^ K )  /\  sum_
n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  ->  sum_ n  e.  ( M ... ( j  +  1 ) ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( sum_ n  e.  ( M ... j
) ( O `  ( A  i^i  ( F `  n )
) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) ) )
123 oveq1 6657 . . . . . . 7  |-  ( sum_ n  e.  ( M ... j ) ( O `
 ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j ) ) )  ->  ( sum_ n  e.  ( M ... j
) ( O `  ( A  i^i  ( F `  n )
) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) )  =  ( ( O `  ( A  i^i  ( G `  j ) ) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) ) )
1241233ad2ant3 1084 . . . . . 6  |-  ( (
ph  /\  j  e.  ( M..^ K )  /\  sum_
n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  -> 
( sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) )  =  ( ( O `  ( A  i^i  ( G `  j )
) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) ) )
125 fzssp1 12384 . . . . . . . . . . . . . . . 16  |-  ( M ... j )  C_  ( M ... ( j  +  1 ) )
126 iunss1 4532 . . . . . . . . . . . . . . . 16  |-  ( ( M ... j ) 
C_  ( M ... ( j  +  1 ) )  ->  U_ i  e.  ( M ... j
) ( E `  i )  C_  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i ) )
127125, 126ax-mp 5 . . . . . . . . . . . . . . 15  |-  U_ i  e.  ( M ... j
) ( E `  i )  C_  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i )
128127a1i 11 . . . . . . . . . . . . . 14  |-  ( j  e.  ( M..^ K
)  ->  U_ i  e.  ( M ... j
) ( E `  i )  C_  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i ) )
12983a1i 11 . . . . . . . . . . . . . . . 16  |-  ( j  e.  ( M..^ K
)  ->  G  =  ( n  e.  Z  |-> 
U_ i  e.  ( M ... n ) ( E `  i
) ) )
130 oveq2 6658 . . . . . . . . . . . . . . . . . 18  |-  ( n  =  j  ->  ( M ... n )  =  ( M ... j
) )
131130iuneq1d 4545 . . . . . . . . . . . . . . . . 17  |-  ( n  =  j  ->  U_ i  e.  ( M ... n
) ( E `  i )  =  U_ i  e.  ( M ... j ) ( E `
 i ) )
132131adantl 482 . . . . . . . . . . . . . . . 16  |-  ( ( j  e.  ( M..^ K )  /\  n  =  j )  ->  U_ i  e.  ( M ... n ) ( E `  i )  =  U_ i  e.  ( M ... j
) ( E `  i ) )
133108, 2syl6eleqr 2712 . . . . . . . . . . . . . . . 16  |-  ( j  e.  ( M..^ K
)  ->  j  e.  Z )
134 ovex 6678 . . . . . . . . . . . . . . . . . 18  |-  ( M ... j )  e. 
_V
135134, 89iunex 7147 . . . . . . . . . . . . . . . . 17  |-  U_ i  e.  ( M ... j
) ( E `  i )  e.  _V
136135a1i 11 . . . . . . . . . . . . . . . 16  |-  ( j  e.  ( M..^ K
)  ->  U_ i  e.  ( M ... j
) ( E `  i )  e.  _V )
137129, 132, 133, 136fvmptd 6288 . . . . . . . . . . . . . . 15  |-  ( j  e.  ( M..^ K
)  ->  ( G `  j )  =  U_ i  e.  ( M ... j ) ( E `
 i ) )
138 oveq2 6658 . . . . . . . . . . . . . . . . . 18  |-  ( n  =  ( j  +  1 )  ->  ( M ... n )  =  ( M ... (
j  +  1 ) ) )
139138iuneq1d 4545 . . . . . . . . . . . . . . . . 17  |-  ( n  =  ( j  +  1 )  ->  U_ i  e.  ( M ... n
) ( E `  i )  =  U_ i  e.  ( M ... ( j  +  1 ) ) ( E `
 i ) )
140139adantl 482 . . . . . . . . . . . . . . . 16  |-  ( ( j  e.  ( M..^ K )  /\  n  =  ( j  +  1 ) )  ->  U_ i  e.  ( M ... n ) ( E `  i )  =  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i ) )
141 peano2uz 11741 . . . . . . . . . . . . . . . . . 18  |-  ( j  e.  ( ZZ>= `  M
)  ->  ( j  +  1 )  e.  ( ZZ>= `  M )
)
142108, 141syl 17 . . . . . . . . . . . . . . . . 17  |-  ( j  e.  ( M..^ K
)  ->  ( j  +  1 )  e.  ( ZZ>= `  M )
)
1432eqcomi 2631 . . . . . . . . . . . . . . . . 17  |-  ( ZZ>= `  M )  =  Z
144142, 143syl6eleq 2711 . . . . . . . . . . . . . . . 16  |-  ( j  e.  ( M..^ K
)  ->  ( j  +  1 )  e.  Z )
145 ovex 6678 . . . . . . . . . . . . . . . . . 18  |-  ( M ... ( j  +  1 ) )  e. 
_V
146145, 89iunex 7147 . . . . . . . . . . . . . . . . 17  |-  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i )  e.  _V
147146a1i 11 . . . . . . . . . . . . . . . 16  |-  ( j  e.  ( M..^ K
)  ->  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i )  e.  _V )
148129, 140, 144, 147fvmptd 6288 . . . . . . . . . . . . . . 15  |-  ( j  e.  ( M..^ K
)  ->  ( G `  ( j  +  1 ) )  =  U_ i  e.  ( M ... ( j  +  1 ) ) ( E `
 i ) )
149137, 148sseq12d 3634 . . . . . . . . . . . . . 14  |-  ( j  e.  ( M..^ K
)  ->  ( ( G `  j )  C_  ( G `  (
j  +  1 ) )  <->  U_ i  e.  ( M ... j ) ( E `  i
)  C_  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i ) ) )
150128, 149mpbird 247 . . . . . . . . . . . . 13  |-  ( j  e.  ( M..^ K
)  ->  ( G `  j )  C_  ( G `  ( j  +  1 ) ) )
151 inabs3 39224 . . . . . . . . . . . . 13  |-  ( ( G `  j ) 
C_  ( G `  ( j  +  1 ) )  ->  (
( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) )  =  ( A  i^i  ( G `  j ) ) )
152150, 151syl 17 . . . . . . . . . . . 12  |-  ( j  e.  ( M..^ K
)  ->  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `  j
) )  =  ( A  i^i  ( G `
 j ) ) )
153152fveq2d 6195 . . . . . . . . . . 11  |-  ( j  e.  ( M..^ K
)  ->  ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) )  =  ( O `
 ( A  i^i  ( G `  j ) ) ) )
154153eqcomd 2628 . . . . . . . . . 10  |-  ( j  e.  ( M..^ K
)  ->  ( O `  ( A  i^i  ( G `  j )
) )  =  ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) )  i^i  ( G `  j ) ) ) )
155154adantl 482 . . . . . . . . 9  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( O `  ( A  i^i  ( G `  j )
) )  =  ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) )  i^i  ( G `  j ) ) ) )
156 elfzoelz 12470 . . . . . . . . . . . . . . . . . 18  |-  ( j  e.  ( M..^ K
)  ->  j  e.  ZZ )
157 fzval3 12536 . . . . . . . . . . . . . . . . . 18  |-  ( j  e.  ZZ  ->  ( M ... j )  =  ( M..^ ( j  +  1 ) ) )
158156, 157syl 17 . . . . . . . . . . . . . . . . 17  |-  ( j  e.  ( M..^ K
)  ->  ( M ... j )  =  ( M..^ ( j  +  1 ) ) )
159158eqcomd 2628 . . . . . . . . . . . . . . . 16  |-  ( j  e.  ( M..^ K
)  ->  ( M..^ ( j  +  1 ) )  =  ( M ... j ) )
160159iuneq1d 4545 . . . . . . . . . . . . . . 15  |-  ( j  e.  ( M..^ K
)  ->  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i
)  =  U_ i  e.  ( M ... j
) ( E `  i ) )
161160difeq2d 3728 . . . . . . . . . . . . . 14  |-  ( j  e.  ( M..^ K
)  ->  ( ( E `  ( j  +  1 ) ) 
\  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i ) )  =  ( ( E `  ( j  +  1 ) ) 
\  U_ i  e.  ( M ... j ) ( E `  i
) ) )
162161adantl 482 . . . . . . . . . . . . 13  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( E `
 ( j  +  1 ) )  \  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `
 i ) )  =  ( ( E `
 ( j  +  1 ) )  \  U_ i  e.  ( M ... j ) ( E `  i ) ) )
16354a1i 11 . . . . . . . . . . . . . . 15  |-  ( j  e.  ( M..^ K
)  ->  F  =  ( n  e.  Z  |->  ( ( E `  n )  \  U_ i  e.  ( M..^ n ) ( E `
 i ) ) ) )
164 fveq2 6191 . . . . . . . . . . . . . . . . 17  |-  ( n  =  ( j  +  1 )  ->  ( E `  n )  =  ( E `  ( j  +  1 ) ) )
165 oveq2 6658 . . . . . . . . . . . . . . . . . 18  |-  ( n  =  ( j  +  1 )  ->  ( M..^ n )  =  ( M..^ ( j  +  1 ) ) )
166165iuneq1d 4545 . . . . . . . . . . . . . . . . 17  |-  ( n  =  ( j  +  1 )  ->  U_ i  e.  ( M..^ n ) ( E `  i
)  =  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i
) )
167164, 166difeq12d 3729 . . . . . . . . . . . . . . . 16  |-  ( n  =  ( j  +  1 )  ->  (
( E `  n
)  \  U_ i  e.  ( M..^ n ) ( E `  i
) )  =  ( ( E `  (
j  +  1 ) )  \  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i
) ) )
168167adantl 482 . . . . . . . . . . . . . . 15  |-  ( ( j  e.  ( M..^ K )  /\  n  =  ( j  +  1 ) )  -> 
( ( E `  n )  \  U_ i  e.  ( M..^ n ) ( E `
 i ) )  =  ( ( E `
 ( j  +  1 ) )  \  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `
 i ) ) )
169 fvex 6201 . . . . . . . . . . . . . . . . 17  |-  ( E `
 ( j  +  1 ) )  e. 
_V
170 difexg 4808 . . . . . . . . . . . . . . . . 17  |-  ( ( E `  ( j  +  1 ) )  e.  _V  ->  (
( E `  (
j  +  1 ) )  \  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i
) )  e.  _V )
171169, 170ax-mp 5 . . . . . . . . . . . . . . . 16  |-  ( ( E `  ( j  +  1 ) ) 
\  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i ) )  e.  _V
172171a1i 11 . . . . . . . . . . . . . . 15  |-  ( j  e.  ( M..^ K
)  ->  ( ( E `  ( j  +  1 ) ) 
\  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i ) )  e.  _V )
173163, 168, 144, 172fvmptd 6288 . . . . . . . . . . . . . 14  |-  ( j  e.  ( M..^ K
)  ->  ( F `  ( j  +  1 ) )  =  ( ( E `  (
j  +  1 ) )  \  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i
) ) )
174173adantl 482 . . . . . . . . . . . . 13  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( F `  ( j  +  1 ) )  =  ( ( E `  (
j  +  1 ) )  \  U_ i  e.  ( M..^ ( j  +  1 ) ) ( E `  i
) ) )
175 nfcv 2764 . . . . . . . . . . . . . . . . . 18  |-  F/_ i
( E `  (
j  +  1 ) )
176 fveq2 6191 . . . . . . . . . . . . . . . . . 18  |-  ( i  =  ( j  +  1 )  ->  ( E `  i )  =  ( E `  ( j  +  1 ) ) )
177175, 108, 176iunp1 39235 . . . . . . . . . . . . . . . . 17  |-  ( j  e.  ( M..^ K
)  ->  U_ i  e.  ( M ... (
j  +  1 ) ) ( E `  i )  =  (
U_ i  e.  ( M ... j ) ( E `  i
)  u.  ( E `
 ( j  +  1 ) ) ) )
178148, 177eqtrd 2656 . . . . . . . . . . . . . . . 16  |-  ( j  e.  ( M..^ K
)  ->  ( G `  ( j  +  1 ) )  =  (
U_ i  e.  ( M ... j ) ( E `  i
)  u.  ( E `
 ( j  +  1 ) ) ) )
179178, 137difeq12d 3729 . . . . . . . . . . . . . . 15  |-  ( j  e.  ( M..^ K
)  ->  ( ( G `  ( j  +  1 ) ) 
\  ( G `  j ) )  =  ( ( U_ i  e.  ( M ... j
) ( E `  i )  u.  ( E `  ( j  +  1 ) ) )  \  U_ i  e.  ( M ... j
) ( E `  i ) ) )
180 difundir 3880 . . . . . . . . . . . . . . . . 17  |-  ( (
U_ i  e.  ( M ... j ) ( E `  i
)  u.  ( E `
 ( j  +  1 ) ) ) 
\  U_ i  e.  ( M ... j ) ( E `  i
) )  =  ( ( U_ i  e.  ( M ... j
) ( E `  i )  \  U_ i  e.  ( M ... j ) ( E `
 i ) )  u.  ( ( E `
 ( j  +  1 ) )  \  U_ i  e.  ( M ... j ) ( E `  i ) ) )
181 difid 3948 . . . . . . . . . . . . . . . . . 18  |-  ( U_ i  e.  ( M ... j ) ( E `
 i )  \  U_ i  e.  ( M ... j ) ( E `  i ) )  =  (/)
182181uneq1i 3763 . . . . . . . . . . . . . . . . 17  |-  ( (
U_ i  e.  ( M ... j ) ( E `  i
)  \  U_ i  e.  ( M ... j
) ( E `  i ) )  u.  ( ( E `  ( j  +  1 ) )  \  U_ i  e.  ( M ... j ) ( E `
 i ) ) )  =  ( (/)  u.  ( ( E `  ( j  +  1 ) )  \  U_ i  e.  ( M ... j ) ( E `
 i ) ) )
183 0un 39215 . . . . . . . . . . . . . . . . 17  |-  ( (/)  u.  ( ( E `  ( j  +  1 ) )  \  U_ i  e.  ( M ... j ) ( E `
 i ) ) )  =  ( ( E `  ( j  +  1 ) ) 
\  U_ i  e.  ( M ... j ) ( E `  i
) )
184180, 182, 1833eqtri 2648 . . . . . . . . . . . . . . . 16  |-  ( (
U_ i  e.  ( M ... j ) ( E `  i
)  u.  ( E `
 ( j  +  1 ) ) ) 
\  U_ i  e.  ( M ... j ) ( E `  i
) )  =  ( ( E `  (
j  +  1 ) )  \  U_ i  e.  ( M ... j
) ( E `  i ) )
185184a1i 11 . . . . . . . . . . . . . . 15  |-  ( j  e.  ( M..^ K
)  ->  ( ( U_ i  e.  ( M ... j ) ( E `  i )  u.  ( E `  ( j  +  1 ) ) )  \  U_ i  e.  ( M ... j ) ( E `  i ) )  =  ( ( E `  ( j  +  1 ) ) 
\  U_ i  e.  ( M ... j ) ( E `  i
) ) )
186179, 185eqtrd 2656 . . . . . . . . . . . . . 14  |-  ( j  e.  ( M..^ K
)  ->  ( ( G `  ( j  +  1 ) ) 
\  ( G `  j ) )  =  ( ( E `  ( j  +  1 ) )  \  U_ i  e.  ( M ... j ) ( E `
 i ) ) )
187186adantl 482 . . . . . . . . . . . . 13  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( G `
 ( j  +  1 ) )  \ 
( G `  j
) )  =  ( ( E `  (
j  +  1 ) )  \  U_ i  e.  ( M ... j
) ( E `  i ) ) )
188162, 174, 1873eqtr4d 2666 . . . . . . . . . . . 12  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( F `  ( j  +  1 ) )  =  ( ( G `  (
j  +  1 ) )  \  ( G `
 j ) ) )
189188ineq2d 3814 . . . . . . . . . . 11  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( A  i^i  ( F `  ( j  +  1 ) ) )  =  ( A  i^i  ( ( G `
 ( j  +  1 ) )  \ 
( G `  j
) ) ) )
190 indif2 3870 . . . . . . . . . . . . 13  |-  ( A  i^i  ( ( G `
 ( j  +  1 ) )  \ 
( G `  j
) ) )  =  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \  ( G `
 j ) )
191190eqcomi 2631 . . . . . . . . . . . 12  |-  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) )  =  ( A  i^i  (
( G `  (
j  +  1 ) )  \  ( G `
 j ) ) )
192191a1i 11 . . . . . . . . . . 11  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \ 
( G `  j
) )  =  ( A  i^i  ( ( G `  ( j  +  1 ) ) 
\  ( G `  j ) ) ) )
193189, 192eqtr4d 2659 . . . . . . . . . 10  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( A  i^i  ( F `  ( j  +  1 ) ) )  =  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) ) )
194193fveq2d 6195 . . . . . . . . 9  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) )  =  ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) ) ) )
195155, 194oveq12d 6668 . . . . . . . 8  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( O `
 ( A  i^i  ( G `  j ) ) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) )  =  ( ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) )  i^i  ( G `  j ) ) )  +  ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \  ( G `
 j ) ) ) ) )
196 inss1 3833 . . . . . . . . . . . . . 14  |-  ( ( A  i^i  ( G `
 ( j  +  1 ) ) )  i^i  ( G `  j ) )  C_  ( A  i^i  ( G `  ( j  +  1 ) ) )
197 inss1 3833 . . . . . . . . . . . . . 14  |-  ( A  i^i  ( G `  ( j  +  1 ) ) )  C_  A
198196, 197sstri 3612 . . . . . . . . . . . . 13  |-  ( ( A  i^i  ( G `
 ( j  +  1 ) ) )  i^i  ( G `  j ) )  C_  A
199198a1i 11 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) 
C_  A )
20040, 41, 42, 43, 199omessre 40724 . . . . . . . . . . 11  |-  ( ph  ->  ( O `  (
( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) )  e.  RR )
201200adantr 481 . . . . . . . . . 10  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) )  e.  RR )
20240adantr 481 . . . . . . . . . . 11  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  O  e. OutMeas )
20342adantr 481 . . . . . . . . . . 11  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  A  C_  X
)
20443adantr 481 . . . . . . . . . . 11  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( O `  A )  e.  RR )
205 difss 3737 . . . . . . . . . . . . 13  |-  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) )  C_  ( A  i^i  ( G `  ( j  +  1 ) ) )
206205, 197sstri 3612 . . . . . . . . . . . 12  |-  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) )  C_  A
207206a1i 11 . . . . . . . . . . 11  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \ 
( G `  j
) )  C_  A
)
208202, 41, 203, 204, 207omessre 40724 . . . . . . . . . 10  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \  ( G `
 j ) ) )  e.  RR )
209 rexadd 12063 . . . . . . . . . 10  |-  ( ( ( O `  (
( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) )  e.  RR  /\  ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) ) )  e.  RR )  -> 
( ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) ) +e ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) ) ) )  =  ( ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) )  i^i  ( G `  j ) ) )  +  ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \  ( G `
 j ) ) ) ) )
210201, 208, 209syl2anc 693 . . . . . . . . 9  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( O `
 ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `  j
) ) ) +e ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \  ( G `
 j ) ) ) )  =  ( ( O `  (
( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) )  +  ( O `
 ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \ 
( G `  j
) ) ) ) )
211210eqcomd 2628 . . . . . . . 8  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( O `
 ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `  j
) ) )  +  ( O `  (
( A  i^i  ( G `  ( j  +  1 ) ) )  \  ( G `
 j ) ) ) )  =  ( ( O `  (
( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `
 j ) ) ) +e ( O `  ( ( A  i^i  ( G `
 ( j  +  1 ) ) ) 
\  ( G `  j ) ) ) ) )
212 carageniuncllem1.s . . . . . . . . 9  |-  S  =  (CaraGen `  O )
213137adantl 482 . . . . . . . . . 10  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( G `  j )  =  U_ i  e.  ( M ... j ) ( E `
 i ) )
214 nfv 1843 . . . . . . . . . . . 12  |-  F/ i
ph
215 fzfid 12772 . . . . . . . . . . . 12  |-  ( ph  ->  ( M ... j
)  e.  Fin )
216 carageniuncllem1.e . . . . . . . . . . . . . 14  |-  ( ph  ->  E : Z --> S )
217216adantr 481 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( M ... j ) )  ->  E : Z
--> S )
218 elfzuz 12338 . . . . . . . . . . . . . . 15  |-  ( i  e.  ( M ... j )  ->  i  e.  ( ZZ>= `  M )
)
219143a1i 11 . . . . . . . . . . . . . . 15  |-  ( i  e.  ( M ... j )  ->  ( ZZ>=
`  M )  =  Z )
220218, 219eleqtrd 2703 . . . . . . . . . . . . . 14  |-  ( i  e.  ( M ... j )  ->  i  e.  Z )
221220adantl 482 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( M ... j ) )  ->  i  e.  Z )
222217, 221ffvelrnd 6360 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( M ... j ) )  ->  ( E `  i )  e.  S
)
223214, 40, 212, 215, 222caragenfiiuncl 40729 . . . . . . . . . . 11  |-  ( ph  ->  U_ i  e.  ( M ... j ) ( E `  i
)  e.  S )
224223adantr 481 . . . . . . . . . 10  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  U_ i  e.  ( M ... j ) ( E `  i
)  e.  S )
225213, 224eqeltrd 2701 . . . . . . . . 9  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( G `  j )  e.  S
)
22642ssinss1d 39214 . . . . . . . . . 10  |-  ( ph  ->  ( A  i^i  ( G `  ( j  +  1 ) ) )  C_  X )
227226adantr 481 . . . . . . . . 9  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( A  i^i  ( G `  ( j  +  1 ) ) )  C_  X )
228202, 212, 41, 225, 227caragensplit 40714 . . . . . . . 8  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( O `
 ( ( A  i^i  ( G `  ( j  +  1 ) ) )  i^i  ( G `  j
) ) ) +e ( O `  ( ( A  i^i  ( G `  ( j  +  1 ) ) )  \  ( G `
 j ) ) ) )  =  ( O `  ( A  i^i  ( G `  ( j  +  1 ) ) ) ) )
229195, 211, 2283eqtrd 2660 . . . . . . 7  |-  ( (
ph  /\  j  e.  ( M..^ K ) )  ->  ( ( O `
 ( A  i^i  ( G `  j ) ) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) )  =  ( O `
 ( A  i^i  ( G `  ( j  +  1 ) ) ) ) )
2302293adant3 1081 . . . . . 6  |-  ( (
ph  /\  j  e.  ( M..^ K )  /\  sum_
n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  -> 
( ( O `  ( A  i^i  ( G `  j )
) )  +  ( O `  ( A  i^i  ( F `  ( j  +  1 ) ) ) ) )  =  ( O `
 ( A  i^i  ( G `  ( j  +  1 ) ) ) ) )
231122, 124, 2303eqtrd 2660 . . . . 5  |-  ( (
ph  /\  j  e.  ( M..^ K )  /\  sum_
n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  ->  sum_ n  e.  ( M ... ( j  +  1 ) ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  ( j  +  1 ) ) ) ) )
232103, 104, 107, 231syl3anc 1326 . . . 4  |-  ( ( j  e.  ( M..^ K )  /\  ( ph  ->  sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  /\  ph )  ->  sum_ n  e.  ( M ... (
j  +  1 ) ) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  ( j  +  1 ) ) ) ) )
2332323exp 1264 . . 3  |-  ( j  e.  ( M..^ K
)  ->  ( ( ph  ->  sum_ n  e.  ( M ... j ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  j )
) ) )  -> 
( ph  ->  sum_ n  e.  ( M ... (
j  +  1 ) ) ( O `  ( A  i^i  ( F `  n )
) )  =  ( O `  ( A  i^i  ( G `  ( j  +  1 ) ) ) ) ) ) )
23413, 20, 27, 34, 102, 233fzind2 12586 . 2  |-  ( K  e.  ( M ... K )  ->  ( ph  ->  sum_ n  e.  ( M ... K ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  K )
) ) ) )
2355, 6, 234sylc 65 1  |-  ( ph  -> 
sum_ n  e.  ( M ... K ) ( O `  ( A  i^i  ( F `  n ) ) )  =  ( O `  ( A  i^i  ( G `  K )
) ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    /\ wa 384    /\ w3a 1037    = wceq 1483    e. wcel 1990   _Vcvv 3200    \ cdif 3571    u. cun 3572    i^i cin 3573    C_ wss 3574   (/)c0 3915   {csn 4177   U.cuni 4436   U_ciun 4520    |-> cmpt 4729   dom cdm 5114   -->wf 5884   ` cfv 5888  (class class class)co 6650   CCcc 9934   RRcr 9935   1c1 9937    + caddc 9939   ZZcz 11377   ZZ>=cuz 11687   +ecxad 11944   ...cfz 12326  ..^cfzo 12465   sum_csu 14416  OutMeascome 40703  CaraGenccaragen 40705
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-om 7066  df-1st 7168  df-2nd 7169  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-oadd 7564  df-er 7742  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-sup 8348  df-oi 8415  df-card 8765  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-n0 11293  df-z 11378  df-uz 11688  df-rp 11833  df-xadd 11947  df-ico 12181  df-icc 12182  df-fz 12327  df-fzo 12466  df-seq 12802  df-exp 12861  df-hash 13118  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-clim 14219  df-sum 14417  df-ome 40704  df-caragen 40706
This theorem is referenced by:  carageniuncllem2  40736
  Copyright terms: Public domain W3C validator