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

Theorem caratheodorylem1 46977
Description: Lemma used to prove that Caratheodory's construction is sigma-additive. This is the proof of the statement in the middle of Step (e) in the proof of Theorem 113C of [Fremlin1] p. 21. (Contributed by Glauco Siliprandi, 17-Aug-2020.)
Hypotheses
Ref Expression
caratheodorylem1.o (𝜑𝑂 ∈ OutMeas)
caratheodorylem1.s 𝑆 = (CaraGen‘𝑂)
caratheodorylem1.z 𝑍 = (ℤ𝑀)
caratheodorylem1.e (𝜑𝐸:𝑍𝑆)
caratheodorylem1.dj (𝜑Disj 𝑛𝑍 (𝐸𝑛))
caratheodorylem1.g 𝐺 = (𝑛𝑍 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖))
caratheodorylem1.n (𝜑𝑁 ∈ (ℤ𝑀))
Assertion
Ref Expression
caratheodorylem1 (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))
Distinct variable groups:   𝑖,𝐸,𝑛   𝑖,𝐺,𝑛   𝑖,𝑀,𝑛   𝑖,𝑁,𝑛   𝑖,𝑂,𝑛   𝑛,𝑍   𝜑,𝑖,𝑛
Allowed substitution hints:   𝑆(𝑖,𝑛)   𝑍(𝑖)

Proof of Theorem caratheodorylem1
Dummy variable 𝑗 is distinct from all other variables.
StepHypRef Expression
1 caratheodorylem1.n . . 3 (𝜑𝑁 ∈ (ℤ𝑀))
2 eluzfz2 13478 . . 3 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ (𝑀...𝑁))
31, 2syl 17 . 2 (𝜑𝑁 ∈ (𝑀...𝑁))
4 id 22 . 2 (𝜑𝜑)
5 2fveq3 6833 . . . . 5 (𝑗 = 𝑀 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑀)))
6 oveq2 7365 . . . . . . 7 (𝑗 = 𝑀 → (𝑀...𝑗) = (𝑀...𝑀))
76mpteq1d 5163 . . . . . 6 (𝑗 = 𝑀 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))
87fveq2d 6832 . . . . 5 (𝑗 = 𝑀 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))
95, 8eqeq12d 2755 . . . 4 (𝑗 = 𝑀 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))))
109imbi2d 341 . . 3 (𝑗 = 𝑀 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))))
11 2fveq3 6833 . . . . 5 (𝑗 = 𝑖 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑖)))
12 oveq2 7365 . . . . . . 7 (𝑗 = 𝑖 → (𝑀...𝑗) = (𝑀...𝑖))
1312mpteq1d 5163 . . . . . 6 (𝑗 = 𝑖 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))
1413fveq2d 6832 . . . . 5 (𝑗 = 𝑖 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
1511, 14eqeq12d 2755 . . . 4 (𝑗 = 𝑖 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))))
1615imbi2d 341 . . 3 (𝑗 = 𝑖 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))))
17 2fveq3 6833 . . . . 5 (𝑗 = (𝑖 + 1) → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺‘(𝑖 + 1))))
18 oveq2 7365 . . . . . . 7 (𝑗 = (𝑖 + 1) → (𝑀...𝑗) = (𝑀...(𝑖 + 1)))
1918mpteq1d 5163 . . . . . 6 (𝑗 = (𝑖 + 1) → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛))))
2019fveq2d 6832 . . . . 5 (𝑗 = (𝑖 + 1) → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
2117, 20eqeq12d 2755 . . . 4 (𝑗 = (𝑖 + 1) → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛))))))
2221imbi2d 341 . . 3 (𝑗 = (𝑖 + 1) → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))))
23 2fveq3 6833 . . . . 5 (𝑗 = 𝑁 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑁)))
24 oveq2 7365 . . . . . . 7 (𝑗 = 𝑁 → (𝑀...𝑗) = (𝑀...𝑁))
2524mpteq1d 5163 . . . . . 6 (𝑗 = 𝑁 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))
2625fveq2d 6832 . . . . 5 (𝑗 = 𝑁 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))
2723, 26eqeq12d 2755 . . . 4 (𝑗 = 𝑁 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))))
2827imbi2d 341 . . 3 (𝑗 = 𝑁 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))))
29 eluzel2 12785 . . . . . . . . 9 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
301, 29syl 17 . . . . . . . 8 (𝜑𝑀 ∈ ℤ)
31 fzsn 13512 . . . . . . . 8 (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
3230, 31syl 17 . . . . . . 7 (𝜑 → (𝑀...𝑀) = {𝑀})
3332mpteq1d 5163 . . . . . 6 (𝜑 → (𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))))
3433fveq2d 6832 . . . . 5 (𝜑 → (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))))
35 caratheodorylem1.o . . . . . . . . 9 (𝜑𝑂 ∈ OutMeas)
3635adantr 481 . . . . . . . 8 ((𝜑𝑛 ∈ {𝑀}) → 𝑂 ∈ OutMeas)
37 eqid 2739 . . . . . . . 8 dom 𝑂 = dom 𝑂
38 caratheodorylem1.s . . . . . . . . . . . 12 𝑆 = (CaraGen‘𝑂)
3938caragenss 46955 . . . . . . . . . . 11 (𝑂 ∈ OutMeas → 𝑆 ⊆ dom 𝑂)
4036, 39syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ {𝑀}) → 𝑆 ⊆ dom 𝑂)
41 caratheodorylem1.e . . . . . . . . . . . 12 (𝜑𝐸:𝑍𝑆)
4241adantr 481 . . . . . . . . . . 11 ((𝜑𝑛 ∈ {𝑀}) → 𝐸:𝑍𝑆)
43 elsni 4573 . . . . . . . . . . . . 13 (𝑛 ∈ {𝑀} → 𝑛 = 𝑀)
4443adantl 482 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ {𝑀}) → 𝑛 = 𝑀)
45 uzid 12795 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ𝑀))
4630, 45syl 17 . . . . . . . . . . . . . 14 (𝜑𝑀 ∈ (ℤ𝑀))
47 caratheodorylem1.z . . . . . . . . . . . . . 14 𝑍 = (ℤ𝑀)
4846, 47eleqtrrdi 2850 . . . . . . . . . . . . 13 (𝜑𝑀𝑍)
4948adantr 481 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ {𝑀}) → 𝑀𝑍)
5044, 49eqeltrd 2839 . . . . . . . . . . 11 ((𝜑𝑛 ∈ {𝑀}) → 𝑛𝑍)
5142, 50ffvelcdmd 7027 . . . . . . . . . 10 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ∈ 𝑆)
5240, 51sseldd 3916 . . . . . . . . 9 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ∈ dom 𝑂)
53 elssuni 4870 . . . . . . . . 9 ((𝐸𝑛) ∈ dom 𝑂 → (𝐸𝑛) ⊆ dom 𝑂)
5452, 53syl 17 . . . . . . . 8 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ⊆ dom 𝑂)
5536, 37, 54omecl 46954 . . . . . . 7 ((𝜑𝑛 ∈ {𝑀}) → (𝑂‘(𝐸𝑛)) ∈ (0[,]+∞))
56 eqid 2739 . . . . . . 7 (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))
5755, 56fmptd 7056 . . . . . 6 (𝜑 → (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))):{𝑀}⟶(0[,]+∞))
5830, 57sge0sn 46830 . . . . 5 (𝜑 → (Σ^‘(𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))) = ((𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))‘𝑀))
59 eqidd 2740 . . . . . 6 (𝜑 → (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))))
6032iuneq1d 4950 . . . . . . . . . 10 (𝜑 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) = 𝑖 ∈ {𝑀} (𝐸𝑖))
61 fveq2 6828 . . . . . . . . . . . 12 (𝑖 = 𝑀 → (𝐸𝑖) = (𝐸𝑀))
6261iunxsng 5020 . . . . . . . . . . 11 (𝑀𝑍 𝑖 ∈ {𝑀} (𝐸𝑖) = (𝐸𝑀))
6348, 62syl 17 . . . . . . . . . 10 (𝜑 𝑖 ∈ {𝑀} (𝐸𝑖) = (𝐸𝑀))
64 eqidd 2740 . . . . . . . . . 10 (𝜑 → (𝐸𝑀) = (𝐸𝑀))
6560, 63, 643eqtrrd 2779 . . . . . . . . 9 (𝜑 → (𝐸𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
6665adantr 481 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐸𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
67 fveq2 6828 . . . . . . . . 9 (𝑛 = 𝑀 → (𝐸𝑛) = (𝐸𝑀))
6867adantl 482 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐸𝑛) = (𝐸𝑀))
69 caratheodorylem1.g . . . . . . . . . 10 𝐺 = (𝑛𝑍 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖))
70 oveq2 7365 . . . . . . . . . . 11 (𝑛 = 𝑀 → (𝑀...𝑛) = (𝑀...𝑀))
7170iuneq1d 4950 . . . . . . . . . 10 (𝑛 = 𝑀 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
72 ovex 7390 . . . . . . . . . . . 12 (𝑀...𝑀) ∈ V
73 fvex 6841 . . . . . . . . . . . 12 (𝐸𝑖) ∈ V
7472, 73iunex 7911 . . . . . . . . . . 11 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) ∈ V
7574a1i 11 . . . . . . . . . 10 (𝜑 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) ∈ V)
7669, 71, 48, 75fvmptd3 6960 . . . . . . . . 9 (𝜑 → (𝐺𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
7776adantr 481 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐺𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
7866, 68, 773eqtr4d 2784 . . . . . . 7 ((𝜑𝑛 = 𝑀) → (𝐸𝑛) = (𝐺𝑀))
7978fveq2d 6832 . . . . . 6 ((𝜑𝑛 = 𝑀) → (𝑂‘(𝐸𝑛)) = (𝑂‘(𝐺𝑀)))
80 snidg 4593 . . . . . . 7 (𝑀𝑍𝑀 ∈ {𝑀})
8148, 80syl 17 . . . . . 6 (𝜑𝑀 ∈ {𝑀})
82 fvexd 6843 . . . . . 6 (𝜑 → (𝑂‘(𝐺𝑀)) ∈ V)
8359, 79, 81, 82fvmptd 6944 . . . . 5 (𝜑 → ((𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))‘𝑀) = (𝑂‘(𝐺𝑀)))
8434, 58, 833eqtrrd 2779 . . . 4 (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))
8584a1i 11 . . 3 (𝑁 ∈ (ℤ𝑀) → (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))))
86 simp3 1144 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → 𝜑)
87 simp1 1142 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → 𝑖 ∈ (𝑀..^𝑁))
88 id 22 . . . . . . 7 ((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))))
8988imp 407 . . . . . 6 (((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
90893adant1 1136 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
91 elfzoel1 13603 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ∈ ℤ)
92 elfzoelz 13605 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ ℤ)
9392peano2zd 12628 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ ℤ)
9491zred 12625 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ∈ ℝ)
9593zred 12625 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ ℝ)
9692zred 12625 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ ℝ)
97 elfzole1 13614 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑀𝑖)
9896ltp1d 12078 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 < (𝑖 + 1))
9994, 96, 95, 97, 98lelttrd 11296 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 < (𝑖 + 1))
10094, 95, 99ltled 11286 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ≤ (𝑖 + 1))
101 leid 11234 . . . . . . . . . . . . . . 15 ((𝑖 + 1) ∈ ℝ → (𝑖 + 1) ≤ (𝑖 + 1))
10295, 101syl 17 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ≤ (𝑖 + 1))
10391, 93, 93, 100, 102elfzd 13461 . . . . . . . . . . . . 13 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ (𝑀...(𝑖 + 1)))
104103adantl 482 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (𝑀...(𝑖 + 1)))
105 fveq2 6828 . . . . . . . . . . . . 13 (𝑗 = (𝑖 + 1) → (𝐸𝑗) = (𝐸‘(𝑖 + 1)))
106105ssiun2s 4979 . . . . . . . . . . . 12 ((𝑖 + 1) ∈ (𝑀...(𝑖 + 1)) → (𝐸‘(𝑖 + 1)) ⊆ 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
107104, 106syl 17 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
108 fveq2 6828 . . . . . . . . . . . . . . . 16 (𝑖 = 𝑗 → (𝐸𝑖) = (𝐸𝑗))
109108cbviunv 4969 . . . . . . . . . . . . . . 15 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖) = 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗)
110109mpteq2i 5169 . . . . . . . . . . . . . 14 (𝑛𝑍 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖)) = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗))
11169, 110eqtri 2762 . . . . . . . . . . . . 13 𝐺 = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗))
112 oveq2 7365 . . . . . . . . . . . . . 14 (𝑛 = (𝑖 + 1) → (𝑀...𝑛) = (𝑀...(𝑖 + 1)))
113112iuneq1d 4950 . . . . . . . . . . . . 13 (𝑛 = (𝑖 + 1) → 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗) = 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
11430adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ∈ ℤ)
11592adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ ℤ)
116115peano2zd 12628 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ ℤ)
117114zred 12625 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ∈ ℝ)
118116zred 12625 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ ℝ)
119115zred 12625 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ ℝ)
12097adantl 482 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀𝑖)
121119ltp1d 12078 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 < (𝑖 + 1))
122117, 119, 118, 120, 121lelttrd 11296 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 < (𝑖 + 1))
123117, 118, 122ltled 11286 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ≤ (𝑖 + 1))
124114, 116, 1233jca 1134 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑀 ∈ ℤ ∧ (𝑖 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑖 + 1)))
125 eluz2 12786 . . . . . . . . . . . . . . 15 ((𝑖 + 1) ∈ (ℤ𝑀) ↔ (𝑀 ∈ ℤ ∧ (𝑖 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑖 + 1)))
126124, 125sylibr 235 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (ℤ𝑀))
12747eqcomi 2748 . . . . . . . . . . . . . 14 (ℤ𝑀) = 𝑍
128126, 127eleqtrdi 2849 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ 𝑍)
129 ovex 7390 . . . . . . . . . . . . . . 15 (𝑀...(𝑖 + 1)) ∈ V
130 fvex 6841 . . . . . . . . . . . . . . 15 (𝐸𝑗) ∈ V
131129, 130iunex 7911 . . . . . . . . . . . . . 14 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ∈ V
132131a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ∈ V)
133111, 113, 128, 132fvmptd3 6960 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) = 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
134133eqcomd 2745 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) = (𝐺‘(𝑖 + 1)))
135107, 134sseqtrd 3951 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)))
136 sseqin2 4153 . . . . . . . . . . 11 ((𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)) ↔ ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
137136biimpi 217 . . . . . . . . . 10 ((𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)) → ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
138135, 137syl 17 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
139138fveq2d 6832 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) = (𝑂‘(𝐸‘(𝑖 + 1))))
140 nfcv 2901 . . . . . . . . . . . . 13 𝑗(𝐸‘(𝑖 + 1))
141 elfzouz 13610 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ (ℤ𝑀))
142141adantl 482 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ (ℤ𝑀))
143140, 142, 105iunp1 45523 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))))
144133, 143eqtrd 2774 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))))
145144difeq1d 4057 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
146 caratheodorylem1.dj . . . . . . . . . . . . . . 15 (𝜑Disj 𝑛𝑍 (𝐸𝑛))
147 fveq2 6828 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑗 → (𝐸𝑛) = (𝐸𝑗))
148147cbvdisjv 5051 . . . . . . . . . . . . . . 15 (Disj 𝑛𝑍 (𝐸𝑛) ↔ Disj 𝑗𝑍 (𝐸𝑗))
149146, 148sylib 219 . . . . . . . . . . . . . 14 (𝜑Disj 𝑗𝑍 (𝐸𝑗))
150149adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → Disj 𝑗𝑍 (𝐸𝑗))
151 fzssuz 13511 . . . . . . . . . . . . . . 15 (𝑀...𝑖) ⊆ (ℤ𝑀)
152151, 127sseqtri 3963 . . . . . . . . . . . . . 14 (𝑀...𝑖) ⊆ 𝑍
153152a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑀...𝑖) ⊆ 𝑍)
154 fzp1nel 13557 . . . . . . . . . . . . . . . 16 ¬ (𝑖 + 1) ∈ (𝑀...𝑖)
155154a1i 11 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → ¬ (𝑖 + 1) ∈ (𝑀...𝑖))
156155adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ¬ (𝑖 + 1) ∈ (𝑀...𝑖))
157128, 156eldifd 3894 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (𝑍 ∖ (𝑀...𝑖)))
158150, 153, 157, 105disjiun2 45515 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∩ (𝐸‘(𝑖 + 1))) = ∅)
159 undif4 4396 . . . . . . . . . . . 12 (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∩ (𝐸‘(𝑖 + 1))) = ∅ → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
160158, 159syl 17 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
161160eqcomd 2745 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))))
162 simpl 483 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝜑)
163142, 127eleqtrdi 2849 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖𝑍)
164111a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝐺 = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗)))
165 simpr 485 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → 𝑛 = 𝑖)
166165oveq2d 7373 . . . . . . . . . . . . . . . 16 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → (𝑀...𝑛) = (𝑀...𝑖))
167166iuneq1d 4950 . . . . . . . . . . . . . . 15 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
168 simpr 485 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝑖𝑍)
169 ovex 7390 . . . . . . . . . . . . . . . . 17 (𝑀...𝑖) ∈ V
170169, 130iunex 7911 . . . . . . . . . . . . . . . 16 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∈ V
171170a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∈ V)
172164, 167, 168, 171fvmptd 6944 . . . . . . . . . . . . . 14 ((𝜑𝑖𝑍) → (𝐺𝑖) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
173162, 163, 172syl2anc 590 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺𝑖) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
174173eqcomd 2745 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) = (𝐺𝑖))
175 difid 4305 . . . . . . . . . . . . 13 ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = ∅
176175a1i 11 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = ∅)
177174, 176uneq12d 4100 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = ((𝐺𝑖) ∪ ∅))
178 un0 4323 . . . . . . . . . . . 12 ((𝐺𝑖) ∪ ∅) = (𝐺𝑖)
179178a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺𝑖) ∪ ∅) = (𝐺𝑖))
180177, 179eqtrd 2774 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (𝐺𝑖))
181145, 161, 1803eqtrd 2778 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = (𝐺𝑖))
182181fveq2d 6832 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (𝑂‘(𝐺𝑖)))
183139, 182oveq12d 7375 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
1841833adant3 1138 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
18535adantr 481 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑂 ∈ OutMeas)
18641adantr 481 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝐸:𝑍𝑆)
187186, 128ffvelcdmd 7027 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ∈ 𝑆)
188 simpll 772 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝜑)
18991adantr 481 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑀 ∈ ℤ)
190 elfzelz 13470 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (𝑀...(𝑖 + 1)) → 𝑗 ∈ ℤ)
191190adantl 482 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗 ∈ ℤ)
192 elfzle1 13473 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (𝑀...(𝑖 + 1)) → 𝑀𝑗)
193192adantl 482 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑀𝑗)
194189, 191, 1933jca 1134 . . . . . . . . . . . . . . . 16 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → (𝑀 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 𝑀𝑗))
195 eluz2 12786 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (ℤ𝑀) ↔ (𝑀 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 𝑀𝑗))
196194, 195sylibr 235 . . . . . . . . . . . . . . 15 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗 ∈ (ℤ𝑀))
197196, 127eleqtrdi 2849 . . . . . . . . . . . . . 14 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗𝑍)
198197adantll 720 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗𝑍)
19935, 39syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝑆 ⊆ dom 𝑂)
200199adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑗𝑍) → 𝑆 ⊆ dom 𝑂)
20141ffvelcdmda 7026 . . . . . . . . . . . . . . 15 ((𝜑𝑗𝑍) → (𝐸𝑗) ∈ 𝑆)
202200, 201sseldd 3916 . . . . . . . . . . . . . 14 ((𝜑𝑗𝑍) → (𝐸𝑗) ∈ dom 𝑂)
203 elssuni 4870 . . . . . . . . . . . . . 14 ((𝐸𝑗) ∈ dom 𝑂 → (𝐸𝑗) ⊆ dom 𝑂)
204202, 203syl 17 . . . . . . . . . . . . 13 ((𝜑𝑗𝑍) → (𝐸𝑗) ⊆ dom 𝑂)
205188, 198, 204syl2anc 590 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → (𝐸𝑗) ⊆ dom 𝑂)
206205ralrimiva 3131 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ∀𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
207 iunss 4975 . . . . . . . . . . 11 ( 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂 ↔ ∀𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
208206, 207sylibr 235 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
209133, 208eqsstrd 3949 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) ⊆ dom 𝑂)
210185, 38, 37, 187, 209caragensplit 46951 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = (𝑂‘(𝐺‘(𝑖 + 1))))
211210eqcomd 2745 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐺‘(𝑖 + 1))) = ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))))
2122113adant3 1138 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝑂‘(𝐺‘(𝑖 + 1))) = ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))))
213185adantr 481 . . . . . . . . . 10 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝑂 ∈ OutMeas)
214162adantr 481 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝜑)
215 elfzuz 13466 . . . . . . . . . . . . 13 (𝑛 ∈ (𝑀...(𝑖 + 1)) → 𝑛 ∈ (ℤ𝑀))
216215, 127eleqtrdi 2849 . . . . . . . . . . . 12 (𝑛 ∈ (𝑀...(𝑖 + 1)) → 𝑛𝑍)
217216adantl 482 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝑛𝑍)
21841, 199fssd 6673 . . . . . . . . . . . . 13 (𝜑𝐸:𝑍⟶dom 𝑂)
219218ffvelcdmda 7026 . . . . . . . . . . . 12 ((𝜑𝑛𝑍) → (𝐸𝑛) ∈ dom 𝑂)
220219, 53syl 17 . . . . . . . . . . 11 ((𝜑𝑛𝑍) → (𝐸𝑛) ⊆ dom 𝑂)
221214, 217, 220syl2anc 590 . . . . . . . . . 10 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → (𝐸𝑛) ⊆ dom 𝑂)
222213, 37, 221omecl 46954 . . . . . . . . 9 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → (𝑂‘(𝐸𝑛)) ∈ (0[,]+∞))
223 2fveq3 6833 . . . . . . . . 9 (𝑛 = (𝑖 + 1) → (𝑂‘(𝐸𝑛)) = (𝑂‘(𝐸‘(𝑖 + 1))))
224142, 222, 223sge0p1 46865 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
2252243adant3 1138 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
226 id 22 . . . . . . . . . 10 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
227226eqcomd 2745 . . . . . . . . 9 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) = (𝑂‘(𝐺𝑖)))
228227oveq1d 7372 . . . . . . . 8 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
2292283ad2ant3 1141 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
230 simpl 483 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ (𝑀...𝑖)) → 𝜑)
231152sseli 3911 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (𝑀...𝑖) → 𝑗𝑍)
232231adantl 482 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ (𝑀...𝑖)) → 𝑗𝑍)
233230, 232, 204syl2anc 590 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ (𝑀...𝑖)) → (𝐸𝑗) ⊆ dom 𝑂)
234233adantlr 721 . . . . . . . . . . . . . 14 (((𝜑𝑖𝑍) ∧ 𝑗 ∈ (𝑀...𝑖)) → (𝐸𝑗) ⊆ dom 𝑂)
235234ralrimiva 3131 . . . . . . . . . . . . 13 ((𝜑𝑖𝑍) → ∀𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
236 iunss 4975 . . . . . . . . . . . . 13 ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂 ↔ ∀𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
237235, 236sylibr 235 . . . . . . . . . . . 12 ((𝜑𝑖𝑍) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
238172, 237eqsstrd 3949 . . . . . . . . . . 11 ((𝜑𝑖𝑍) → (𝐺𝑖) ⊆ dom 𝑂)
239162, 163, 238syl2anc 590 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺𝑖) ⊆ dom 𝑂)
240185, 37, 239omexrcl 46958 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐺𝑖)) ∈ ℝ*)
241107, 208sstrd 3925 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ dom 𝑂)
242185, 37, 241omexrcl 46958 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐸‘(𝑖 + 1))) ∈ ℝ*)
243240, 242xaddcomd 45777 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
2442433adant3 1138 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
245225, 229, 2443eqtrd 2778 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
246184, 212, 2453eqtr4d 2784 . . . . 5 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
24786, 87, 90, 246syl3anc 1379 . . . 4 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
2482473exp 1125 . . 3 (𝑖 ∈ (𝑀..^𝑁) → ((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝜑 → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))))
24910, 16, 22, 28, 85, 248fzind2 13735 . 2 (𝑁 ∈ (𝑀...𝑁) → (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))))
2503, 4, 249sylc 65 1 (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  w3a 1092   = wceq 1547  wcel 2119  wral 3053  Vcvv 3431  cdif 3880  cun 3881  cin 3882  wss 3883  c0 4262  {csn 4556   cuni 4839   ciun 4922  Disj wdisj 5040   class class class wbr 5073  cmpt 5154  dom cdm 5619  wf 6482  cfv 6486  (class class class)co 7357  cr 11029  0cc0 11030  1c1 11031   + caddc 11033  +∞cpnf 11168  cle 11172  cz 12516  cuz 12780   +𝑒 cxad 13053  [,]cicc 13293  ...cfz 13453  ..^cfzo 13600  Σ^csumge0 46813  OutMeascome 46940  CaraGenccaragen 46942
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5200  ax-sep 5219  ax-nul 5229  ax-pow 5295  ax-pr 5363  ax-un 7679  ax-inf2 9554  ax-cnex 11086  ax-resscn 11087  ax-1cn 11088  ax-icn 11089  ax-addcl 11090  ax-addrcl 11091  ax-mulcl 11092  ax-mulrcl 11093  ax-mulcom 11094  ax-addass 11095  ax-mulass 11096  ax-distr 11097  ax-i2m1 11098  ax-1ne0 11099  ax-1rid 11100  ax-rnegex 11101  ax-rrecex 11102  ax-cnre 11103  ax-pre-lttri 11104  ax-pre-lttrn 11105  ax-pre-ltadd 11106  ax-pre-mulgt0 11107  ax-pre-sup 11108
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4263  df-if 4456  df-pw 4532  df-sn 4557  df-pr 4559  df-op 4563  df-uni 4840  df-int 4879  df-iun 4924  df-disj 5041  df-br 5074  df-opab 5136  df-mpt 5155  df-tr 5181  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-se 5573  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7314  df-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7808  df-1st 7932  df-2nd 7933  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-1o 8396  df-er 8634  df-en 8885  df-dom 8886  df-sdom 8887  df-fin 8888  df-sup 9346  df-oi 9416  df-card 9855  df-pnf 11173  df-mnf 11174  df-xr 11175  df-ltxr 11176  df-le 11177  df-sub 11371  df-neg 11372  df-div 11800  df-nn 12167  df-2 12236  df-3 12237  df-n0 12430  df-z 12517  df-uz 12781  df-rp 12935  df-xadd 13056  df-ico 13296  df-icc 13297  df-fz 13454  df-fzo 13601  df-seq 13956  df-exp 14016  df-hash 14285  df-cj 15053  df-re 15054  df-im 15055  df-sqrt 15189  df-abs 15190  df-clim 15442  df-sum 15641  df-sumge0 46814  df-ome 46941  df-caragen 46943
This theorem is referenced by:  caratheodorylem2  46978
  Copyright terms: Public domain W3C validator