Step | Hyp | Ref
| Expression |
1 | | carageniuncllem1.k |
. . . 4
β’ (π β πΎ β π) |
2 | | carageniuncllem1.z |
. . . 4
β’ π =
(β€β₯βπ) |
3 | 1, 2 | eleqtrdi 2835 |
. . 3
β’ (π β πΎ β (β€β₯βπ)) |
4 | | eluzfz2 13506 |
. . 3
β’ (πΎ β
(β€β₯βπ) β πΎ β (π...πΎ)) |
5 | 3, 4 | syl 17 |
. 2
β’ (π β πΎ β (π...πΎ)) |
6 | | id 22 |
. 2
β’ (π β π) |
7 | | oveq2 7409 |
. . . . . 6
β’ (π = π β (π...π) = (π...π)) |
8 | 7 | sumeq1d 15644 |
. . . . 5
β’ (π = π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ)))) |
9 | | fveq2 6881 |
. . . . . . 7
β’ (π = π β (πΊβπ) = (πΊβπ)) |
10 | 9 | ineq2d 4204 |
. . . . . 6
β’ (π = π β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
11 | 10 | fveq2d 6885 |
. . . . 5
β’ (π = π β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβπ)))) |
12 | 8, 11 | eqeq12d 2740 |
. . . 4
β’ (π = π β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
13 | 12 | imbi2d 340 |
. . 3
β’ (π = π β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))))) |
14 | | oveq2 7409 |
. . . . . 6
β’ (π = π β (π...π) = (π...π)) |
15 | 14 | sumeq1d 15644 |
. . . . 5
β’ (π = π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ)))) |
16 | | fveq2 6881 |
. . . . . . 7
β’ (π = π β (πΊβπ) = (πΊβπ)) |
17 | 16 | ineq2d 4204 |
. . . . . 6
β’ (π = π β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
18 | 17 | fveq2d 6885 |
. . . . 5
β’ (π = π β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβπ)))) |
19 | 15, 18 | eqeq12d 2740 |
. . . 4
β’ (π = π β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
20 | 19 | imbi2d 340 |
. . 3
β’ (π = π β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))))) |
21 | | oveq2 7409 |
. . . . . 6
β’ (π = (π + 1) β (π...π) = (π...(π + 1))) |
22 | 21 | sumeq1d 15644 |
. . . . 5
β’ (π = (π + 1) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ)))) |
23 | | fveq2 6881 |
. . . . . . 7
β’ (π = (π + 1) β (πΊβπ) = (πΊβ(π + 1))) |
24 | 23 | ineq2d 4204 |
. . . . . 6
β’ (π = (π + 1) β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβ(π + 1)))) |
25 | 24 | fveq2d 6885 |
. . . . 5
β’ (π = (π + 1) β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
26 | 22, 25 | eqeq12d 2740 |
. . . 4
β’ (π = (π + 1) β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1)))))) |
27 | 26 | imbi2d 340 |
. . 3
β’ (π = (π + 1) β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))))) |
28 | | oveq2 7409 |
. . . . . 6
β’ (π = πΎ β (π...π) = (π...πΎ)) |
29 | 28 | sumeq1d 15644 |
. . . . 5
β’ (π = πΎ β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ)))) |
30 | | fveq2 6881 |
. . . . . . 7
β’ (π = πΎ β (πΊβπ) = (πΊβπΎ)) |
31 | 30 | ineq2d 4204 |
. . . . . 6
β’ (π = πΎ β (π΄ β© (πΊβπ)) = (π΄ β© (πΊβπΎ))) |
32 | 31 | fveq2d 6885 |
. . . . 5
β’ (π = πΎ β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΊβπΎ)))) |
33 | 29, 32 | eqeq12d 2740 |
. . . 4
β’ (π = πΎ β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ))))) |
34 | 33 | imbi2d 340 |
. . 3
β’ (π = πΎ β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ)))))) |
35 | | eluzel2 12824 |
. . . . . . . 8
β’ (πΎ β
(β€β₯βπ) β π β β€) |
36 | 3, 35 | syl 17 |
. . . . . . 7
β’ (π β π β β€) |
37 | | fzsn 13540 |
. . . . . . 7
β’ (π β β€ β (π...π) = {π}) |
38 | 36, 37 | syl 17 |
. . . . . 6
β’ (π β (π...π) = {π}) |
39 | 38 | sumeq1d 15644 |
. . . . 5
β’ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = Ξ£π β {π} (πβ(π΄ β© (πΉβπ)))) |
40 | | carageniuncllem1.o |
. . . . . . . 8
β’ (π β π β OutMeas) |
41 | | carageniuncllem1.x |
. . . . . . . 8
β’ π = βͺ
dom π |
42 | | carageniuncllem1.a |
. . . . . . . 8
β’ (π β π΄ β π) |
43 | | carageniuncllem1.re |
. . . . . . . 8
β’ (π β (πβπ΄) β β) |
44 | | inss1 4220 |
. . . . . . . . 9
β’ (π΄ β© (πΉβπ)) β π΄ |
45 | 44 | a1i 11 |
. . . . . . . 8
β’ (π β (π΄ β© (πΉβπ)) β π΄) |
46 | 40, 41, 42, 43, 45 | omessre 45711 |
. . . . . . 7
β’ (π β (πβ(π΄ β© (πΉβπ))) β β) |
47 | 46 | recnd 11239 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΉβπ))) β β) |
48 | | fveq2 6881 |
. . . . . . . . 9
β’ (π = π β (πΉβπ) = (πΉβπ)) |
49 | 48 | ineq2d 4204 |
. . . . . . . 8
β’ (π = π β (π΄ β© (πΉβπ)) = (π΄ β© (πΉβπ))) |
50 | 49 | fveq2d 6885 |
. . . . . . 7
β’ (π = π β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβπ)))) |
51 | 50 | sumsn 15689 |
. . . . . 6
β’ ((π β β€ β§ (πβ(π΄ β© (πΉβπ))) β β) β Ξ£π β {π} (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβπ)))) |
52 | 36, 47, 51 | syl2anc 583 |
. . . . 5
β’ (π β Ξ£π β {π} (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβπ)))) |
53 | | eqidd 2725 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΈβπ))) = (πβ(π΄ β© (πΈβπ)))) |
54 | | carageniuncllem1.f |
. . . . . . . . . 10
β’ πΉ = (π β π β¦ ((πΈβπ) β βͺ
π β (π..^π)(πΈβπ))) |
55 | | fveq2 6881 |
. . . . . . . . . . 11
β’ (π = π β (πΈβπ) = (πΈβπ)) |
56 | | oveq2 7409 |
. . . . . . . . . . . 12
β’ (π = π β (π..^π) = (π..^π)) |
57 | 56 | iuneq1d 5014 |
. . . . . . . . . . 11
β’ (π = π β βͺ
π β (π..^π)(πΈβπ) = βͺ π β (π..^π)(πΈβπ)) |
58 | 55, 57 | difeq12d 4115 |
. . . . . . . . . 10
β’ (π = π β ((πΈβπ) β βͺ
π β (π..^π)(πΈβπ)) = ((πΈβπ) β βͺ π β (π..^π)(πΈβπ))) |
59 | | uzid 12834 |
. . . . . . . . . . . 12
β’ (π β β€ β π β
(β€β₯βπ)) |
60 | 36, 59 | syl 17 |
. . . . . . . . . . 11
β’ (π β π β (β€β₯βπ)) |
61 | 2 | a1i 11 |
. . . . . . . . . . . 12
β’ (π β π = (β€β₯βπ)) |
62 | 61 | eqcomd 2730 |
. . . . . . . . . . 11
β’ (π β
(β€β₯βπ) = π) |
63 | 60, 62 | eleqtrd 2827 |
. . . . . . . . . 10
β’ (π β π β π) |
64 | | fvex 6894 |
. . . . . . . . . . . 12
β’ (πΈβπ) β V |
65 | | difexg 5317 |
. . . . . . . . . . . 12
β’ ((πΈβπ) β V β ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) β V) |
66 | 64, 65 | ax-mp 5 |
. . . . . . . . . . 11
β’ ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) β V |
67 | 66 | a1i 11 |
. . . . . . . . . 10
β’ (π β ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) β V) |
68 | 54, 58, 63, 67 | fvmptd3 7011 |
. . . . . . . . 9
β’ (π β (πΉβπ) = ((πΈβπ) β βͺ π β (π..^π)(πΈβπ))) |
69 | | fzo0 13653 |
. . . . . . . . . . . . 13
β’ (π..^π) = β
|
70 | | iuneq1 5003 |
. . . . . . . . . . . . 13
β’ ((π..^π) = β
β βͺ π β (π..^π)(πΈβπ) = βͺ π β β
(πΈβπ)) |
71 | 69, 70 | ax-mp 5 |
. . . . . . . . . . . 12
β’ βͺ π β (π..^π)(πΈβπ) = βͺ π β β
(πΈβπ) |
72 | | 0iun 5056 |
. . . . . . . . . . . 12
β’ βͺ π β β
(πΈβπ) = β
|
73 | 71, 72 | eqtri 2752 |
. . . . . . . . . . 11
β’ βͺ π β (π..^π)(πΈβπ) = β
|
74 | 73 | difeq2i 4111 |
. . . . . . . . . 10
β’ ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) = ((πΈβπ) β β
) |
75 | 74 | a1i 11 |
. . . . . . . . 9
β’ (π β ((πΈβπ) β βͺ π β (π..^π)(πΈβπ)) = ((πΈβπ) β β
)) |
76 | | dif0 4364 |
. . . . . . . . . 10
β’ ((πΈβπ) β β
) = (πΈβπ) |
77 | 76 | a1i 11 |
. . . . . . . . 9
β’ (π β ((πΈβπ) β β
) = (πΈβπ)) |
78 | 68, 75, 77 | 3eqtrd 2768 |
. . . . . . . 8
β’ (π β (πΉβπ) = (πΈβπ)) |
79 | 78 | ineq2d 4204 |
. . . . . . 7
β’ (π β (π΄ β© (πΉβπ)) = (π΄ β© (πΈβπ))) |
80 | 79 | fveq2d 6885 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΈβπ)))) |
81 | | carageniuncllem1.g |
. . . . . . . . . 10
β’ πΊ = (π β π β¦ βͺ
π β (π...π)(πΈβπ)) |
82 | | oveq2 7409 |
. . . . . . . . . . 11
β’ (π = π β (π...π) = (π...π)) |
83 | 82 | iuneq1d 5014 |
. . . . . . . . . 10
β’ (π = π β βͺ
π β (π...π)(πΈβπ) = βͺ π β (π...π)(πΈβπ)) |
84 | | ovex 7434 |
. . . . . . . . . . . 12
β’ (π...π) β V |
85 | | fvex 6894 |
. . . . . . . . . . . 12
β’ (πΈβπ) β V |
86 | 84, 85 | iunex 7948 |
. . . . . . . . . . 11
β’ βͺ π β (π...π)(πΈβπ) β V |
87 | 86 | a1i 11 |
. . . . . . . . . 10
β’ (π β βͺ π β (π...π)(πΈβπ) β V) |
88 | 81, 83, 63, 87 | fvmptd3 7011 |
. . . . . . . . 9
β’ (π β (πΊβπ) = βͺ
π β (π...π)(πΈβπ)) |
89 | 38 | iuneq1d 5014 |
. . . . . . . . 9
β’ (π β βͺ π β (π...π)(πΈβπ) = βͺ π β {π} (πΈβπ)) |
90 | | fveq2 6881 |
. . . . . . . . . . 11
β’ (π = π β (πΈβπ) = (πΈβπ)) |
91 | 90 | iunxsng 5083 |
. . . . . . . . . 10
β’ (π β β€ β βͺ π β {π} (πΈβπ) = (πΈβπ)) |
92 | 36, 91 | syl 17 |
. . . . . . . . 9
β’ (π β βͺ π β {π} (πΈβπ) = (πΈβπ)) |
93 | 88, 89, 92 | 3eqtrd 2768 |
. . . . . . . 8
β’ (π β (πΊβπ) = (πΈβπ)) |
94 | 93 | ineq2d 4204 |
. . . . . . 7
β’ (π β (π΄ β© (πΊβπ)) = (π΄ β© (πΈβπ))) |
95 | 94 | fveq2d 6885 |
. . . . . 6
β’ (π β (πβ(π΄ β© (πΊβπ))) = (πβ(π΄ β© (πΈβπ)))) |
96 | 53, 80, 95 | 3eqtr4d 2774 |
. . . . 5
β’ (π β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
97 | 39, 52, 96 | 3eqtrd 2768 |
. . . 4
β’ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
98 | 97 | a1i 11 |
. . 3
β’ (πΎ β
(β€β₯βπ) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
99 | | simp3 1135 |
. . . . 5
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β π) |
100 | | simp1 1133 |
. . . . 5
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β π β (π..^πΎ)) |
101 | | id 22 |
. . . . . . 7
β’ ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))))) |
102 | 101 | imp 406 |
. . . . . 6
β’ (((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
103 | 102 | 3adant1 1127 |
. . . . 5
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) |
104 | | elfzouz 13633 |
. . . . . . . . 9
β’ (π β (π..^πΎ) β π β (β€β₯βπ)) |
105 | 104 | adantl 481 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β π β (β€β₯βπ)) |
106 | 40 | adantr 480 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β π β OutMeas) |
107 | 42 | adantr 480 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β π΄ β π) |
108 | 43 | adantr 480 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β (πβπ΄) β β) |
109 | | inss1 4220 |
. . . . . . . . . . . 12
β’ (π΄ β© (πΉβπ)) β π΄ |
110 | 109 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ π β (π...(π + 1))) β (π΄ β© (πΉβπ)) β π΄) |
111 | 106, 41, 107, 108, 110 | omessre 45711 |
. . . . . . . . . 10
β’ ((π β§ π β (π...(π + 1))) β (πβ(π΄ β© (πΉβπ))) β β) |
112 | 111 | recnd 11239 |
. . . . . . . . 9
β’ ((π β§ π β (π...(π + 1))) β (πβ(π΄ β© (πΉβπ))) β β) |
113 | 112 | adantlr 712 |
. . . . . . . 8
β’ (((π β§ π β (π..^πΎ)) β§ π β (π...(π + 1))) β (πβ(π΄ β© (πΉβπ))) β β) |
114 | | fveq2 6881 |
. . . . . . . . . 10
β’ (π = (π + 1) β (πΉβπ) = (πΉβ(π + 1))) |
115 | 114 | ineq2d 4204 |
. . . . . . . . 9
β’ (π = (π + 1) β (π΄ β© (πΉβπ)) = (π΄ β© (πΉβ(π + 1)))) |
116 | 115 | fveq2d 6885 |
. . . . . . . 8
β’ (π = (π + 1) β (πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΉβ(π + 1))))) |
117 | 105, 113,
116 | fsump1 15699 |
. . . . . . 7
β’ ((π β§ π β (π..^πΎ)) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
118 | 117 | 3adant3 1129 |
. . . . . 6
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
119 | | oveq1 7408 |
. . . . . . 7
β’
(Ξ£π β
(π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ))) β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
120 | 119 | 3ad2ant3 1132 |
. . . . . 6
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1)))))) |
121 | | fzssp1 13541 |
. . . . . . . . . . . . . . . 16
β’ (π...π) β (π...(π + 1)) |
122 | | iunss1 5001 |
. . . . . . . . . . . . . . . 16
β’ ((π...π) β (π...(π + 1)) β βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ)) |
123 | 121, 122 | ax-mp 5 |
. . . . . . . . . . . . . . 15
β’ βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ) |
124 | 123 | a1i 11 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β βͺ
π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ)) |
125 | | oveq2 7409 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (π...π) = (π...π)) |
126 | 125 | iuneq1d 5014 |
. . . . . . . . . . . . . . . 16
β’ (π = π β βͺ
π β (π...π)(πΈβπ) = βͺ π β (π...π)(πΈβπ)) |
127 | 104, 2 | eleqtrrdi 2836 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β π β π) |
128 | | ovex 7434 |
. . . . . . . . . . . . . . . . . 18
β’ (π...π) β V |
129 | 128, 85 | iunex 7948 |
. . . . . . . . . . . . . . . . 17
β’ βͺ π β (π...π)(πΈβπ) β V |
130 | 129 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β βͺ
π β (π...π)(πΈβπ) β V) |
131 | 81, 126, 127, 130 | fvmptd3 7011 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β (πΊβπ) = βͺ π β (π...π)(πΈβπ)) |
132 | | oveq2 7409 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π + 1) β (π...π) = (π...(π + 1))) |
133 | 132 | iuneq1d 5014 |
. . . . . . . . . . . . . . . 16
β’ (π = (π + 1) β βͺ π β (π...π)(πΈβπ) = βͺ π β (π...(π + 1))(πΈβπ)) |
134 | | peano2uz 12882 |
. . . . . . . . . . . . . . . . . 18
β’ (π β
(β€β₯βπ) β (π + 1) β
(β€β₯βπ)) |
135 | 104, 134 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π..^πΎ) β (π + 1) β
(β€β₯βπ)) |
136 | 2 | eqcomi 2733 |
. . . . . . . . . . . . . . . . 17
β’
(β€β₯βπ) = π |
137 | 135, 136 | eleqtrdi 2835 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β (π + 1) β π) |
138 | | ovex 7434 |
. . . . . . . . . . . . . . . . . 18
β’ (π...(π + 1)) β V |
139 | 138, 85 | iunex 7948 |
. . . . . . . . . . . . . . . . 17
β’ βͺ π β (π...(π + 1))(πΈβπ) β V |
140 | 139 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β βͺ
π β (π...(π + 1))(πΈβπ) β V) |
141 | 81, 133, 137, 140 | fvmptd3 7011 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β (πΊβ(π + 1)) = βͺ
π β (π...(π + 1))(πΈβπ)) |
142 | 131, 141 | sseq12d 4007 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β ((πΊβπ) β (πΊβ(π + 1)) β βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...(π + 1))(πΈβπ))) |
143 | 124, 142 | mpbird 257 |
. . . . . . . . . . . . 13
β’ (π β (π..^πΎ) β (πΊβπ) β (πΊβ(π + 1))) |
144 | | inabs3 44231 |
. . . . . . . . . . . . 13
β’ ((πΊβπ) β (πΊβ(π + 1)) β ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
145 | 143, 144 | syl 17 |
. . . . . . . . . . . 12
β’ (π β (π..^πΎ) β ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) = (π΄ β© (πΊβπ))) |
146 | 145 | fveq2d 6885 |
. . . . . . . . . . 11
β’ (π β (π..^πΎ) β (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) = (πβ(π΄ β© (πΊβπ)))) |
147 | 146 | eqcomd 2730 |
. . . . . . . . . 10
β’ (π β (π..^πΎ) β (πβ(π΄ β© (πΊβπ))) = (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)))) |
148 | 147 | adantl 481 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (πβ(π΄ β© (πΊβπ))) = (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)))) |
149 | | elfzoelz 13629 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (π..^πΎ) β π β β€) |
150 | | fzval3 13698 |
. . . . . . . . . . . . . . . . . 18
β’ (π β β€ β (π...π) = (π..^(π + 1))) |
151 | 149, 150 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π..^πΎ) β (π...π) = (π..^(π + 1))) |
152 | 151 | eqcomd 2730 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β (π..^(π + 1)) = (π...π)) |
153 | 152 | iuneq1d 5014 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β βͺ
π β (π..^(π + 1))(πΈβπ) = βͺ π β (π...π)(πΈβπ)) |
154 | 153 | difeq2d 4114 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
155 | 154 | adantl 481 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π..^πΎ)) β ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
156 | | fveq2 6881 |
. . . . . . . . . . . . . . . 16
β’ (π = (π + 1) β (πΈβπ) = (πΈβ(π + 1))) |
157 | | oveq2 7409 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π + 1) β (π..^π) = (π..^(π + 1))) |
158 | 157 | iuneq1d 5014 |
. . . . . . . . . . . . . . . 16
β’ (π = (π + 1) β βͺ π β (π..^π)(πΈβπ) = βͺ π β (π..^(π + 1))(πΈβπ)) |
159 | 156, 158 | difeq12d 4115 |
. . . . . . . . . . . . . . 15
β’ (π = (π + 1) β ((πΈβπ) β βͺ
π β (π..^π)(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ))) |
160 | | fvex 6894 |
. . . . . . . . . . . . . . . . 17
β’ (πΈβ(π + 1)) β V |
161 | | difexg 5317 |
. . . . . . . . . . . . . . . . 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 7011 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β (πΉβ(π + 1)) = ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ))) |
165 | 164 | adantl 481 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π..^πΎ)) β (πΉβ(π + 1)) = ((πΈβ(π + 1)) β βͺ π β (π..^(π + 1))(πΈβπ))) |
166 | | nfcv 2895 |
. . . . . . . . . . . . . . . . . 18
β’
β²π(πΈβ(π + 1)) |
167 | | fveq2 6881 |
. . . . . . . . . . . . . . . . . 18
β’ (π = (π + 1) β (πΈβπ) = (πΈβ(π + 1))) |
168 | 166, 104,
167 | iunp1 44241 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π..^πΎ) β βͺ
π β (π...(π + 1))(πΈβπ) = (βͺ
π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1)))) |
169 | 141, 168 | eqtrd 2764 |
. . . . . . . . . . . . . . . 16
β’ (π β (π..^πΎ) β (πΊβ(π + 1)) = (βͺ
π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1)))) |
170 | 169, 131 | difeq12d 4115 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β ((πΊβ(π + 1)) β (πΊβπ)) = ((βͺ
π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ))) |
171 | | difundir 4272 |
. . . . . . . . . . . . . . . . 17
β’
((βͺ π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ)) = ((βͺ
π β (π...π)(πΈβπ) β βͺ
π β (π...π)(πΈβπ)) βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
172 | | difid 4362 |
. . . . . . . . . . . . . . . . . 18
β’ (βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...π)(πΈβπ)) = β
|
173 | 172 | uneq1i 4151 |
. . . . . . . . . . . . . . . . 17
β’
((βͺ π β (π...π)(πΈβπ) β βͺ
π β (π...π)(πΈβπ)) βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) = (β
βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
174 | | 0un 4384 |
. . . . . . . . . . . . . . . . 17
β’ (β
βͺ ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ)) |
175 | 171, 173,
174 | 3eqtri 2756 |
. . . . . . . . . . . . . . . 16
β’
((βͺ π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ)) |
176 | 175 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β (π..^πΎ) β ((βͺ π β (π...π)(πΈβπ) βͺ (πΈβ(π + 1))) β βͺ π β (π...π)(πΈβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
177 | 170, 176 | eqtrd 2764 |
. . . . . . . . . . . . . 14
β’ (π β (π..^πΎ) β ((πΊβ(π + 1)) β (πΊβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
178 | 177 | adantl 481 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π..^πΎ)) β ((πΊβ(π + 1)) β (πΊβπ)) = ((πΈβ(π + 1)) β βͺ π β (π...π)(πΈβπ))) |
179 | 155, 165,
178 | 3eqtr4d 2774 |
. . . . . . . . . . . 12
β’ ((π β§ π β (π..^πΎ)) β (πΉβ(π + 1)) = ((πΊβ(π + 1)) β (πΊβπ))) |
180 | 179 | ineq2d 4204 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β (π΄ β© (πΉβ(π + 1))) = (π΄ β© ((πΊβ(π + 1)) β (πΊβπ)))) |
181 | | indif2 4262 |
. . . . . . . . . . . . 13
β’ (π΄ β© ((πΊβ(π + 1)) β (πΊβπ))) = ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) |
182 | 181 | eqcomi 2733 |
. . . . . . . . . . . 12
β’ ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) = (π΄ β© ((πΊβ(π + 1)) β (πΊβπ))) |
183 | 182 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) = (π΄ β© ((πΊβ(π + 1)) β (πΊβπ)))) |
184 | 180, 183 | eqtr4d 2767 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (π΄ β© (πΉβ(π + 1))) = ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))) |
185 | 184 | fveq2d 6885 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (πβ(π΄ β© (πΉβ(π + 1)))) = (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) |
186 | 148, 185 | oveq12d 7419 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
187 | | inss1 4220 |
. . . . . . . . . . . . . 14
β’ ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) β (π΄ β© (πΊβ(π + 1))) |
188 | | inss1 4220 |
. . . . . . . . . . . . . 14
β’ (π΄ β© (πΊβ(π + 1))) β π΄ |
189 | 187, 188 | sstri 3983 |
. . . . . . . . . . . . 13
β’ ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) β π΄ |
190 | 189 | a1i 11 |
. . . . . . . . . . . 12
β’ (π β ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ)) β π΄) |
191 | 40, 41, 42, 43, 190 | omessre 45711 |
. . . . . . . . . . 11
β’ (π β (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) β β) |
192 | 191 | adantr 480 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) β β) |
193 | 40 | adantr 480 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β π β OutMeas) |
194 | 42 | adantr 480 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β π΄ β π) |
195 | 43 | adantr 480 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β (πβπ΄) β β) |
196 | | difss 4123 |
. . . . . . . . . . . . 13
β’ ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) β (π΄ β© (πΊβ(π + 1))) |
197 | 196, 188 | sstri 3983 |
. . . . . . . . . . . 12
β’ ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) β π΄ |
198 | 197 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ π β (π..^πΎ)) β ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)) β π΄) |
199 | 193, 41, 194, 195, 198 | omessre 45711 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))) β β) |
200 | | rexadd 13208 |
. . . . . . . . . 10
β’ (((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) β β β§ (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))) β β) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
201 | 192, 199,
200 | syl2anc 583 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
202 | 201 | eqcomd 2730 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) + (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ))))) |
203 | | carageniuncllem1.s |
. . . . . . . . 9
β’ π = (CaraGenβπ) |
204 | 131 | adantl 481 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β (πΊβπ) = βͺ π β (π...π)(πΈβπ)) |
205 | | nfv 1909 |
. . . . . . . . . . . 12
β’
β²ππ |
206 | | fzfid 13935 |
. . . . . . . . . . . 12
β’ (π β (π...π) β Fin) |
207 | | carageniuncllem1.e |
. . . . . . . . . . . . . 14
β’ (π β πΈ:πβΆπ) |
208 | 207 | adantr 480 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π...π)) β πΈ:πβΆπ) |
209 | | elfzuz 13494 |
. . . . . . . . . . . . . . 15
β’ (π β (π...π) β π β (β€β₯βπ)) |
210 | 136 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β (π...π) β (β€β₯βπ) = π) |
211 | 209, 210 | eleqtrd 2827 |
. . . . . . . . . . . . . 14
β’ (π β (π...π) β π β π) |
212 | 211 | adantl 481 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π...π)) β π β π) |
213 | 208, 212 | ffvelcdmd 7077 |
. . . . . . . . . . . 12
β’ ((π β§ π β (π...π)) β (πΈβπ) β π) |
214 | 205, 40, 203, 206, 213 | caragenfiiuncl 45716 |
. . . . . . . . . . 11
β’ (π β βͺ π β (π...π)(πΈβπ) β π) |
215 | 214 | adantr 480 |
. . . . . . . . . 10
β’ ((π β§ π β (π..^πΎ)) β βͺ π β (π...π)(πΈβπ) β π) |
216 | 204, 215 | eqeltrd 2825 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (πΊβπ) β π) |
217 | 42 | ssinss1d 44223 |
. . . . . . . . . 10
β’ (π β (π΄ β© (πΊβ(π + 1))) β π) |
218 | 217 | adantr 480 |
. . . . . . . . 9
β’ ((π β§ π β (π..^πΎ)) β (π΄ β© (πΊβ(π + 1))) β π) |
219 | 193, 203,
41, 216, 218 | caragensplit 45701 |
. . . . . . . 8
β’ ((π β§ π β (π..^πΎ)) β ((πβ((π΄ β© (πΊβ(π + 1))) β© (πΊβπ))) +π (πβ((π΄ β© (πΊβ(π + 1))) β (πΊβπ)))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
220 | 186, 202,
219 | 3eqtrd 2768 |
. . . . . . 7
β’ ((π β§ π β (π..^πΎ)) β ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
221 | 220 | 3adant3 1129 |
. . . . . 6
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β ((πβ(π΄ β© (πΊβπ))) + (πβ(π΄ β© (πΉβ(π + 1))))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
222 | 118, 120,
221 | 3eqtrd 2768 |
. . . . 5
β’ ((π β§ π β (π..^πΎ) β§ Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
223 | 99, 100, 103, 222 | syl3anc 1368 |
. . . 4
β’ ((π β (π..^πΎ) β§ (π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β§ π) β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))) |
224 | 223 | 3exp 1116 |
. . 3
β’ (π β (π..^πΎ) β ((π β Ξ£π β (π...π)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπ)))) β (π β Ξ£π β (π...(π + 1))(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβ(π + 1))))))) |
225 | 13, 20, 27, 34, 98, 224 | fzind2 13747 |
. 2
β’ (πΎ β (π...πΎ) β (π β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ))))) |
226 | 5, 6, 225 | sylc 65 |
1
β’ (π β Ξ£π β (π...πΎ)(πβ(π΄ β© (πΉβπ))) = (πβ(π΄ β© (πΊβπΎ)))) |