Step | Hyp | Ref
| Expression |
1 | | carageniuncllem1.k |
. . . 4
β’ (π β πΎ β π) |
2 | | carageniuncllem1.z |
. . . 4
β’ π =
(β€β₯βπ) |
3 | 1, 2 | eleqtrdi 2844 |
. . 3
β’ (π β πΎ β (β€β₯βπ)) |
4 | | eluzfz2 13505 |
. . 3
β’ (πΎ β
(β€β₯βπ) β πΎ β (π...πΎ)) |
5 | 3, 4 | syl 17 |
. 2
β’ (π β πΎ β (π...πΎ)) |
6 | | id 22 |
. 2
β’ (π β π) |
7 | | oveq2 7412 |
. . . . . 6
β’ (π = π β (π...π) = (π...π)) |
8 | 7 | sumeq1d 15643 |
. . . . 5
β’ (π = π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ)))) |
9 | | fveq2 6888 |
. . . . . . 7
β’ (π = π β (πΊβπ) = (πΊβπ)) |
10 | 9 | ineq2d 4211 |
. . . . . 6
β’ (π = π β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
11 | 10 | fveq2d 6892 |
. . . . 5
β’ (π = π β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβπ)))) |
12 | 8, 11 | eqeq12d 2749 |
. . . 4
β’ (π = π β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
13 | 12 | imbi2d 341 |
. . 3
β’ (π = π β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))))) |
14 | | oveq2 7412 |
. . . . . 6
β’ (π = π β (π...π) = (π...π)) |
15 | 14 | sumeq1d 15643 |
. . . . 5
β’ (π = π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ)))) |
16 | | fveq2 6888 |
. . . . . . 7
β’ (π = π β (πΊβπ) = (πΊβπ)) |
17 | 16 | ineq2d 4211 |
. . . . . 6
β’ (π = π β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
18 | 17 | fveq2d 6892 |
. . . . 5
β’ (π = π β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβπ)))) |
19 | 15, 18 | eqeq12d 2749 |
. . . 4
β’ (π = π β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
20 | 19 | imbi2d 341 |
. . 3
β’ (π = π β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))))) |
21 | | oveq2 7412 |
. . . . . 6
β’ (π = (π + 1) β (π...π) = (π...(π + 1))) |
22 | 21 | sumeq1d 15643 |
. . . . 5
β’ (π = (π + 1) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ)))) |
23 | | fveq2 6888 |
. . . . . . 7
β’ (π = (π + 1) β (πΊβπ) = (πΊβ(π + 1))) |
24 | 23 | ineq2d 4211 |
. . . . . 6
β’ (π = (π + 1) β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβ(π + 1)))) |
25 | 24 | fveq2d 6892 |
. . . . 5
β’ (π = (π + 1) β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
26 | 22, 25 | eqeq12d 2749 |
. . . 4
β’ (π = (π + 1) β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1)))))) |
27 | 26 | imbi2d 341 |
. . 3
β’ (π = (π + 1) β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))))) |
28 | | oveq2 7412 |
. . . . . 6
β’ (π = πΎ β (π...π) = (π...πΎ)) |
29 | 28 | sumeq1d 15643 |
. . . . 5
β’ (π = πΎ β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ)))) |
30 | | fveq2 6888 |
. . . . . . 7
β’ (π = πΎ β (πΊβπ) = (πΊβπΎ)) |
31 | 30 | ineq2d 4211 |
. . . . . 6
β’ (π = πΎ β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβπΎ))) |
32 | 31 | fveq2d 6892 |
. . . . 5
β’ (π = πΎ β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβπΎ)))) |
33 | 29, 32 | eqeq12d 2749 |
. . . 4
β’ (π = πΎ β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ))))) |
34 | 33 | imbi2d 341 |
. . 3
β’ (π = πΎ β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ)))))) |
35 | | eluzel2 12823 |
. . . . . . . 8
β’ (πΎ β
(β€β₯βπ) β π β β€) |
36 | 3, 35 | syl 17 |
. . . . . . 7
β’ (π β π β β€) |
37 | | fzsn 13539 |
. . . . . . 7
β’ (π β β€ β (π...π) = {π}) |
38 | 36, 37 | syl 17 |
. . . . . 6
β’ (π β (π...π) = {π}) |
39 | 38 | sumeq1d 15643 |
. . . . 5
β’ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β {π} (πβ(π΄ β© (πΉβπ)))) |
40 | | carageniuncllem1.o |
. . . . . . . 8
β’ (π β π β OutMeas) |
41 | | carageniuncllem1.x |
. . . . . . . 8
β’ π = βͺ
dom π |
42 | | carageniuncllem1.a |
. . . . . . . 8
β’ (π β π΄ β π) |
43 | | carageniuncllem1.re |
. . . . . . . 8
β’ (π β (πβπ΄) β β) |
44 | | inss1 4227 |
. . . . . . . . 9
β’ (π΄ β© (πΉβπ)) β π΄ |
45 | 44 | a1i 11 |
. . . . . . . 8
β’ (π β (π΄ β© (πΉβπ)) β π΄) |
46 | 40, 41, 42, 43, 45 | omessre 45161 |
. . . . . . 7
β’ (π β (πβ(π΄ β© (πΉβπ))) β β) |
47 | 46 | recnd 11238 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΉβπ))) β β) |
48 | | fveq2 6888 |
. . . . . . . . 9
β’ (π = π β (πΉβπ) = (πΉβπ)) |
49 | 48 | ineq2d 4211 |
. . . . . . . 8
β’ (π = π β (π΄ β© (πΉβπ)) = (π΄ β© (πΉβπ))) |
50 | 49 | fveq2d 6892 |
. . . . . . 7
β’ (π = π β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβπ)))) |
51 | 50 | sumsn 15688 |
. . . . . 6
β’ ((π β β€ β§ (πβ(π΄ β© (πΉβπ))) β β) β Ξ£π β {π} (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβπ)))) |
52 | 36, 47, 51 | syl2anc 585 |
. . . . 5
β’ (π β Ξ£π β {π} (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβπ)))) |
53 | | eqidd 2734 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΈβπ))) = (πβ(π΄ β© (πΈβπ)))) |
54 | | carageniuncllem1.f |
. . . . . . . . . 10
β’ πΉ = (π β π β¦ ((πΈβπ) β βͺ
π β (π..^π)(πΈβπ))) |
55 | | fveq2 6888 |
. . . . . . . . . . 11
β’ (π = π β (πΈβπ) = (πΈβπ)) |
56 | | oveq2 7412 |
. . . . . . . . . . . 12
β’ (π = π β (π..^π) = (π..^π)) |
57 | 56 | iuneq1d 5023 |
. . . . . . . . . . 11
β’ (π = π β βͺ
π β (π..^π)(πΈβπ) = βͺ π β (π..^π)(πΈβπ)) |
58 | 55, 57 | difeq12d 4122 |
. . . . . . . . . 10
β’ (π = π β ((πΈβπ) β βͺ
π β (π..^π)(πΈβπ)) = ((πΈβπ) β βͺ π β (π..^π)(πΈβπ))) |
59 | | uzid 12833 |
. . . . . . . . . . . 12
β’ (π β β€ β π β
(β€β₯βπ)) |
60 | 36, 59 | syl 17 |
. . . . . . . . . . 11
β’ (π β π β (β€β₯βπ)) |
61 | 2 | a1i 11 |
. . . . . . . . . . . 12
β’ (π β π = (β€β₯βπ)) |
62 | 61 | eqcomd 2739 |
. . . . . . . . . . 11
β’ (π β
(β€β₯βπ) = π) |
63 | 60, 62 | eleqtrd 2836 |
. . . . . . . . . 10
β’ (π β π β π) |
64 | | fvex 6901 |
. . . . . . . . . . . 12
β’ (πΈβπ) β V |
65 | | difexg 5326 |
. . . . . . . . . . . 12
β’ ((πΈβπ) β V β ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) β V) |
66 | 64, 65 | ax-mp 5 |
. . . . . . . . . . 11
β’ ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) β V |
67 | 66 | a1i 11 |
. . . . . . . . . 10
β’ (π β ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) β V) |
68 | 54, 58, 63, 67 | fvmptd3 7017 |
. . . . . . . . 9
β’ (π β (πΉβπ) = ((πΈβπ) β βͺ π β (π..^π)(πΈβπ))) |
69 | | fzo0 13652 |
. . . . . . . . . . . . 13
β’ (π..^π) = β
|
70 | | iuneq1 5012 |
. . . . . . . . . . . . 13
β’ ((π..^π) = β
β βͺ π β (π..^π)(πΈβπ) = βͺ π β β
(πΈβπ)) |
71 | 69, 70 | ax-mp 5 |
. . . . . . . . . . . 12
β’ βͺ π β (π..^π)(πΈβπ) = βͺ π β β
(πΈβπ) |
72 | | 0iun 5065 |
. . . . . . . . . . . 12
β’ βͺ π β β
(πΈβπ) = β
|
73 | 71, 72 | eqtri 2761 |
. . . . . . . . . . 11
β’ βͺ π β (π..^π)(πΈβπ) = β
|
74 | 73 | difeq2i 4118 |
. . . . . . . . . 10
β’ ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) = ((πΈβπ) β β
) |
75 | 74 | a1i 11 |
. . . . . . . . 9
β’ (π β ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) = ((πΈβπ) β β
)) |
76 | | dif0 4371 |
. . . . . . . . . 10
β’ ((πΈβπ) β β
) = (πΈβπ) |
77 | 76 | a1i 11 |
. . . . . . . . 9
β’ (π β ((πΈβπ) β β
) = (πΈβπ)) |
78 | 68, 75, 77 | 3eqtrd 2777 |
. . . . . . . 8
β’ (π β (πΉβπ) = (πΈβπ)) |
79 | 78 | ineq2d 4211 |
. . . . . . 7
β’ (π β (π΄ β© (πΉβπ)) = (π΄ β© (πΈβπ))) |
80 | 79 | fveq2d 6892 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΈβπ)))) |
81 | | carageniuncllem1.g |
. . . . . . . . . 10
β’ πΊ = (π β π β¦ βͺ
π β (π...π)(πΈβπ)) |
82 | | oveq2 7412 |
. . . . . . . . . . 11
β’ (π = π β (π...π) = (π...π)) |
83 | 82 | iuneq1d 5023 |
. . . . . . . . . 10
β’ (π = π β βͺ
π β (π...π)(πΈβπ) = βͺ π β (π...π)(πΈβπ)) |
84 | | ovex 7437 |
. . . . . . . . . . . 12
β’ (π...π) β V |
85 | | fvex 6901 |
. . . . . . . . . . . 12
β’ (πΈβπ) β V |
86 | 84, 85 | iunex 7950 |
. . . . . . . . . . 11
β’ βͺ π β (π...π)(πΈβπ) β V |
87 | 86 | a1i 11 |
. . . . . . . . . 10
β’ (π β βͺ π β (π...π)(πΈβπ) β V) |
88 | 81, 83, 63, 87 | fvmptd3 7017 |
. . . . . . . . 9
β’ (π β (πΊβπ) = βͺ
π β (π...π)(πΈβπ)) |
89 | 38 | iuneq1d 5023 |
. . . . . . . . 9
β’ (π β βͺ π β (π...π)(πΈβπ) = βͺ π β {π} (πΈβπ)) |
90 | | fveq2 6888 |
. . . . . . . . . . 11
β’ (π = π β (πΈβπ) = (πΈβπ)) |
91 | 90 | iunxsng 5092 |
. . . . . . . . . 10
β’ (π β β€ β βͺ π β {π} (πΈβπ) = (πΈβπ)) |
92 | 36, 91 | syl 17 |
. . . . . . . . 9
β’ (π β βͺ π β {π} (πΈβπ) = (πΈβπ)) |
93 | 88, 89, 92 | 3eqtrd 2777 |
. . . . . . . 8
β’ (π β (πΊβπ) = (πΈβπ)) |
94 | 93 | ineq2d 4211 |
. . . . . . 7
β’ (π β (π΄ β© (πΊβπ)) = (π΄ β© (πΈβπ))) |
95 | 94 | fveq2d 6892 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΈβπ)))) |
96 | 53, 80, 95 | 3eqtr4d 2783 |
. . . . 5
β’ (π β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
97 | 39, 52, 96 | 3eqtrd 2777 |
. . . 4
β’ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
98 | 97 | a1i 11 |
. . 3
β’ (πΎ β
(β€β₯βπ) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
99 | | simp3 1139 |
. . . . 5
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β π) |
100 | | simp1 1137 |
. . . . 5
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β π β (π..^πΎ)) |
101 | | id 22 |
. . . . . . 7
β’ ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
102 | 101 | imp 408 |
. . . . . 6
β’ (((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
103 | 102 | 3adant1 1131 |
. . . . 5
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
104 | | elfzouz 13632 |
. . . . . . . . 9
β’ (π β (π..^πΎ) β π β (β€β₯βπ)) |
105 | 104 | adantl 483 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β π β (β€β₯βπ)) |
106 | 40 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β π β OutMeas) |
107 | 42 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β π΄ β π) |
108 | 43 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β (πβπ΄) β β) |
109 | | inss1 4227 |
. . . . . . . . . . . 12
β’ (π΄ β© (πΉβπ)) β π΄ |
110 | 109 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β (π΄ β© (πΉβπ)) β π΄) |
111 | 106, 41, 107, 108, 110 | omessre 45161 |
. . . . . . . . . 10
β’ ((π β§ π β (π...(π + 1))) β (πβ(π΄ β© (πΉβπ))) β β) |
112 | 111 | recnd 11238 |
. . . . . . . . 9
β’ ((π β§ π β (π...(π + 1))) β (πβ(π΄ β© (πΉβπ))) β β) |
113 | 112 | adantlr 714 |
. . . . . . . 8
β’ (((π β§ π β (π..^πΎ)) β§ π β (π...(π + 1))) β (πβ(π΄ β© (πΉβπ))) β β) |
114 | | fveq2 6888 |
. . . . . . . . . 10
β’ (π = (π + 1) β (πΉβπ) = (πΉβ(π + 1))) |
115 | 114 | ineq2d 4211 |
. . . . . . . . 9
β’ (π = (π + 1) β (π΄ β© (πΉβπ)) = (π΄ β© (πΉβ(π + 1)))) |
116 | 115 | fveq2d 6892 |
. . . . . . . 8
β’ (π = (π + 1) β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβ(π + 1))))) |
117 | 105, 113,
116 | fsump1 15698 |
. . . . . . 7
β’ ((π β§ π β (π..^πΎ)) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
118 | 117 | 3adant3 1133 |
. . . . . 6
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
119 | | oveq1 7411 |
. . . . . . 7
β’
(Ξ£π β
(π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
120 | 119 | 3ad2ant3 1136 |
. . . . . 6
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
121 | | fzssp1 13540 |
. . . . . . . . . . . . . . . 16
β’ (π...π) β (π...(π + 1)) |
122 | | iunss1 5010 |
. . . . . . . . . . . . . . . 16
β’ ((π...π) β (π...(π + 1)) β βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ)) |
123 | 121, 122 | ax-mp 5 |
. . . . . . . . . . . . . . 15
β’ βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ) |
124 | 123 | a1i 11 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β βͺ
π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ)) |
125 | | oveq2 7412 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (π...π) = (π...π)) |
126 | 125 | iuneq1d 5023 |
. . . . . . . . . . . . . . . 16
β’ (π = π β βͺ
π β (π...π)(πΈβπ) = βͺ π β (π...π)(πΈβπ)) |
127 | 104, 2 | eleqtrrdi 2845 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β π β π) |
128 | | ovex 7437 |
. . . . . . . . . . . . . . . . . 18
β’ (π...π) β V |
129 | 128, 85 | iunex 7950 |
. . . . . . . . . . . . . . . . 17
β’ βͺ π β (π...π)(πΈβπ) β V |
130 | 129 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β βͺ
π β (π...π)(πΈβπ) β V) |
131 | 81, 126, 127, 130 | fvmptd3 7017 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β (πΊβπ) = βͺ π β (π...π)(πΈβπ)) |
132 | | oveq2 7412 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π + 1) β (π...π) = (π...(π + 1))) |
133 | 132 | iuneq1d 5023 |
. . . . . . . . . . . . . . . 16
β’ (π = (π + 1) β βͺ π β (π...π)(πΈβπ) = βͺ π β (π...(π + 1))(πΈβπ)) |
134 | | peano2uz 12881 |
. . . . . . . . . . . . . . . . . 18
β’ (π β
(β€β₯βπ) β (π + 1) β
(β€β₯βπ)) |
135 | 104, 134 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π..^πΎ) β (π + 1) β
(β€β₯βπ)) |
136 | 2 | eqcomi 2742 |
. . . . . . . . . . . . . . . . 17
β’
(β€β₯βπ) = π |
137 | 135, 136 | eleqtrdi 2844 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β (π + 1) β π) |
138 | | ovex 7437 |
. . . . . . . . . . . . . . . . . 18
β’ (π...(π + 1)) β V |
139 | 138, 85 | iunex 7950 |
. . . . . . . . . . . . . . . . 17
β’ βͺ π β (π...(π + 1))(πΈβπ) β V |
140 | 139 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β βͺ
π β (π...(π + 1))(πΈβπ) β V) |
141 | 81, 133, 137, 140 | fvmptd3 7017 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β (πΊβ(π + 1)) = βͺ
π β (π...(π + 1))(πΈβπ)) |
142 | 131, 141 | sseq12d 4014 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β ((πΊβπ) β (πΊβ(π + 1)) β βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ))) |
143 | 124, 142 | mpbird 257 |
. . . . . . . . . . . . 13
β’ (π β (π..^πΎ) β (πΊβπ) β (πΊβ(π + 1))) |
144 | | inabs3 43676 |
. . . . . . . . . . . . 13
β’ ((πΊβπ) β (πΊβ(π + 1)) β ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
145 | 143, 144 | syl 17 |
. . . . . . . . . . . 12
β’ (π β (π..^πΎ) β ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
146 | 145 | fveq2d 6892 |
. . . . . . . . . . 11
β’ (π β (π..^πΎ) β (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) = (πβ(π΄ β© (πΊβπ)))) |
147 | 146 | eqcomd 2739 |
. . . . . . . . . 10
β’ (π β (π..^πΎ) β (πβ(π΄ β© (πΊβπ))) = (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)))) |
148 | 147 | adantl 483 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (πβ(π΄ β© (πΊβπ))) = (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)))) |
149 | | elfzoelz 13628 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (π..^πΎ) β π β β€) |
150 | | fzval3 13697 |
. . . . . . . . . . . . . . . . . 18
β’ (π β β€ β (π...π) = (π..^(π + 1))) |
151 | 149, 150 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π..^πΎ) β (π...π) = (π..^(π + 1))) |
152 | 151 | eqcomd 2739 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β (π..^(π + 1)) = (π...π)) |
153 | 152 | iuneq1d 5023 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β βͺ
π β (π..^(π + 1))(πΈβπ) = βͺ π β (π...π)(πΈβπ)) |
154 | 153 | difeq2d 4121 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
155 | 154 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π..^πΎ)) β ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
156 | | fveq2 6888 |
. . . . . . . . . . . . . . . 16
β’ (π = (π + 1) β (πΈβπ) = (πΈβ(π + 1))) |
157 | | oveq2 7412 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π + 1) β (π..^π) = (π..^(π + 1))) |
158 | 157 | iuneq1d 5023 |
. . . . . . . . . . . . . . . 16
β’ (π = (π + 1) β βͺ π β (π..^π)(πΈβπ) = βͺ π β (π..^(π + 1))(πΈβπ)) |
159 | 156, 158 | difeq12d 4122 |
. . . . . . . . . . . . . . 15
β’ (π = (π + 1) β ((πΈβπ) β βͺ
π β (π..^π)(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ))) |
160 | | fvex 6901 |
. . . . . . . . . . . . . . . . 17
β’ (πΈβ(π + 1)) β V |
161 | | difexg 5326 |
. . . . . . . . . . . . . . . . 17
β’ ((πΈβ(π + 1)) β V β ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ)) β V) |
162 | 160, 161 | ax-mp 5 |
. . . . . . . . . . . . . . . 16
β’ ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ)) β V |
163 | 162 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ)) β V) |
164 | 54, 159, 137, 163 | fvmptd3 7017 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β (πΉβ(π + 1)) = ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ))) |
165 | 164 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π..^πΎ)) β (πΉβ(π + 1)) = ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ))) |
166 | | nfcv 2904 |
. . . . . . . . . . . . . . . . . 18
β’
β²π(πΈβ(π + 1)) |
167 | | fveq2 6888 |
. . . . . . . . . . . . . . . . . 18
β’ (π = (π + 1) β (πΈβπ) = (πΈβ(π + 1))) |
168 | 166, 104,
167 | iunp1 43686 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π..^πΎ) β βͺ
π β (π...(π + 1))(πΈβπ) = (βͺ
π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1)))) |
169 | 141, 168 | eqtrd 2773 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β (πΊβ(π + 1)) = (βͺ
π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1)))) |
170 | 169, 131 | difeq12d 4122 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β ((πΊβ(π + 1)) β (πΊβπ)) = ((βͺ
π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ))) |
171 | | difundir 4279 |
. . . . . . . . . . . . . . . . 17
β’
((βͺ π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ)) = ((βͺ
π β (π...π)(πΈβπ) β βͺ
π β (π...π)(πΈβπ)) βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
172 | | difid 4369 |
. . . . . . . . . . . . . . . . . 18
β’ (βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...π)(πΈβπ)) = β
|
173 | 172 | uneq1i 4158 |
. . . . . . . . . . . . . . . . 17
β’
((βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...π)(πΈβπ)) βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) = (β
βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
174 | | 0un 4391 |
. . . . . . . . . . . . . . . . 17
β’ (β
βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ)) |
175 | 171, 173,
174 | 3eqtri 2765 |
. . . . . . . . . . . . . . . 16
β’
((βͺ π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ)) |
176 | 175 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β ((βͺ π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
177 | 170, 176 | eqtrd 2773 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β ((πΊβ(π + 1)) β (πΊβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
178 | 177 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π..^πΎ)) β ((πΊβ(π + 1)) β (πΊβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
179 | 155, 165,
178 | 3eqtr4d 2783 |
. . . . . . . . . . . 12
β’ ((π β§ π β (π..^πΎ)) β (πΉβ(π + 1)) = ((πΊβ(π + 1)) β (πΊβπ))) |
180 | 179 | ineq2d 4211 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β (π΄ β© (πΉβ(π + 1))) = (π΄ β© ((πΊβ(π + 1)) β (πΊβπ)))) |
181 | | indif2 4269 |
. . . . . . . . . . . . 13
β’ (π΄ β© ((πΊβ(π + 1)) β (πΊβπ))) = ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) |
182 | 181 | eqcomi 2742 |
. . . . . . . . . . . 12
β’ ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) = (π΄ β© ((πΊβ(π + 1)) β (πΊβπ))) |
183 | 182 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) = (π΄ β© ((πΊβ(π + 1)) β (πΊβπ)))) |
184 | 180, 183 | eqtr4d 2776 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (π΄ β© (πΉβ(π + 1))) = ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))) |
185 | 184 | fveq2d 6892 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (πβ(π΄ β© (πΉβ(π + 1)))) = (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) |
186 | 148, 185 | oveq12d 7422 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
187 | | inss1 4227 |
. . . . . . . . . . . . . 14
β’ ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) β (π΄ β© (πΊβ(π + 1))) |
188 | | inss1 4227 |
. . . . . . . . . . . . . 14
β’ (π΄ β© (πΊβ(π + 1))) β π΄ |
189 | 187, 188 | sstri 3990 |
. . . . . . . . . . . . 13
β’ ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) β π΄ |
190 | 189 | a1i 11 |
. . . . . . . . . . . 12
β’ (π β ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) β π΄) |
191 | 40, 41, 42, 43, 190 | omessre 45161 |
. . . . . . . . . . 11
β’ (π β (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) β β) |
192 | 191 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) β β) |
193 | 40 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β π β OutMeas) |
194 | 42 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β π΄ β π) |
195 | 43 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β (πβπ΄) β β) |
196 | | difss 4130 |
. . . . . . . . . . . . 13
β’ ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) β (π΄ β© (πΊβ(π + 1))) |
197 | 196, 188 | sstri 3990 |
. . . . . . . . . . . 12
β’ ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) β π΄ |
198 | 197 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) β π΄) |
199 | 193, 41, 194, 195, 198 | omessre 45161 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))) β β) |
200 | | rexadd 13207 |
. . . . . . . . . 10
β’ (((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) β β β§ (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))) β β) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
201 | 192, 199,
200 | syl2anc 585 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
202 | 201 | eqcomd 2739 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
203 | | carageniuncllem1.s |
. . . . . . . . 9
β’ π = (CaraGenβπ) |
204 | 131 | adantl 483 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (πΊβπ) = βͺ π β (π...π)(πΈβπ)) |
205 | | nfv 1918 |
. . . . . . . . . . . 12
β’
β²ππ |
206 | | fzfid 13934 |
. . . . . . . . . . . 12
β’ (π β (π...π) β Fin) |
207 | | carageniuncllem1.e |
. . . . . . . . . . . . . 14
β’ (π β πΈ:πβΆπ) |
208 | 207 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π...π)) β πΈ:πβΆπ) |
209 | | elfzuz 13493 |
. . . . . . . . . . . . . . 15
β’ (π β (π...π) β π β (β€β₯βπ)) |
210 | 136 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β (π...π) β (β€β₯βπ) = π) |
211 | 209, 210 | eleqtrd 2836 |
. . . . . . . . . . . . . 14
β’ (π β (π...π) β π β π) |
212 | 211 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π...π)) β π β π) |
213 | 208, 212 | ffvelcdmd 7083 |
. . . . . . . . . . . 12
β’ ((π β§ π β (π...π)) β (πΈβπ) β π) |
214 | 205, 40, 203, 206, 213 | caragenfiiuncl 45166 |
. . . . . . . . . . 11
β’ (π β βͺ π β (π...π)(πΈβπ) β π) |
215 | 214 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β βͺ π β (π...π)(πΈβπ) β π) |
216 | 204, 215 | eqeltrd 2834 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (πΊβπ) β π) |
217 | 42 | ssinss1d 43668 |
. . . . . . . . . 10
β’ (π β (π΄ β© (πΊβ(π + 1))) β π) |
218 | 217 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (π΄ β© (πΊβ(π + 1))) β π) |
219 | 193, 203,
41, 216, 218 | caragensplit 45151 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
220 | 186, 202,
219 | 3eqtrd 2777 |
. . . . . . 7
β’ ((π β§ π β (π..^πΎ)) β ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
221 | 220 | 3adant3 1133 |
. . . . . 6
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
222 | 118, 120,
221 | 3eqtrd 2777 |
. . . . 5
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
223 | 99, 100, 103, 222 | syl3anc 1372 |
. . . 4
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
224 | 223 | 3exp 1120 |
. . 3
β’ (π β (π..^πΎ) β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))))) |
225 | 13, 20, 27, 34, 98, 224 | fzind2 13746 |
. 2
β’ (πΎ β (π...πΎ) β (π β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ))))) |
226 | 5, 6, 225 | sylc 65 |
1
β’ (π β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ)))) |