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 47268
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 13566 . . 3 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ (𝑀...𝑁))
31, 2syl 18 . 2 (𝜑𝑁 ∈ (𝑀...𝑁))
4 id 23 . 2 (𝜑𝜑)
5 2fveq3 6886 . . . . 5 (𝑗 = 𝑀 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑀)))
6 oveq2 7420 . . . . . . 7 (𝑗 = 𝑀 → (𝑀...𝑗) = (𝑀...𝑀))
76mpteq1d 5200 . . . . . 6 (𝑗 = 𝑀 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))
87fveq2d 6885 . . . . 5 (𝑗 = 𝑀 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))
95, 8eqeq12d 2778 . . . 4 (𝑗 = 𝑀 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))))
109imbi2d 343 . . 3 (𝑗 = 𝑀 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))))
11 2fveq3 6886 . . . . 5 (𝑗 = 𝑖 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑖)))
12 oveq2 7420 . . . . . . 7 (𝑗 = 𝑖 → (𝑀...𝑗) = (𝑀...𝑖))
1312mpteq1d 5200 . . . . . 6 (𝑗 = 𝑖 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))
1413fveq2d 6885 . . . . 5 (𝑗 = 𝑖 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
1511, 14eqeq12d 2778 . . . 4 (𝑗 = 𝑖 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))))
1615imbi2d 343 . . 3 (𝑗 = 𝑖 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))))
17 2fveq3 6886 . . . . 5 (𝑗 = (𝑖 + 1) → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺‘(𝑖 + 1))))
18 oveq2 7420 . . . . . . 7 (𝑗 = (𝑖 + 1) → (𝑀...𝑗) = (𝑀...(𝑖 + 1)))
1918mpteq1d 5200 . . . . . 6 (𝑗 = (𝑖 + 1) → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛))))
2019fveq2d 6885 . . . . 5 (𝑗 = (𝑖 + 1) → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
2117, 20eqeq12d 2778 . . . 4 (𝑗 = (𝑖 + 1) → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛))))))
2221imbi2d 343 . . 3 (𝑗 = (𝑖 + 1) → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))))
23 2fveq3 6886 . . . . 5 (𝑗 = 𝑁 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑁)))
24 oveq2 7420 . . . . . . 7 (𝑗 = 𝑁 → (𝑀...𝑗) = (𝑀...𝑁))
2524mpteq1d 5200 . . . . . 6 (𝑗 = 𝑁 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))
2625fveq2d 6885 . . . . 5 (𝑗 = 𝑁 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))
2723, 26eqeq12d 2778 . . . 4 (𝑗 = 𝑁 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))))
2827imbi2d 343 . . 3 (𝑗 = 𝑁 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))))
29 eluzel2 12873 . . . . . . . . 9 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
301, 29syl 18 . . . . . . . 8 (𝜑𝑀 ∈ ℤ)
31 fzsn 13601 . . . . . . . 8 (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
3230, 31syl 18 . . . . . . 7 (𝜑 → (𝑀...𝑀) = {𝑀})
3332mpteq1d 5200 . . . . . 6 (𝜑 → (𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))))
3433fveq2d 6885 . . . . 5 (𝜑 → (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))))
35 caratheodorylem1.o . . . . . . . . 9 (𝜑𝑂 ∈ OutMeas)
3635adantr 485 . . . . . . . 8 ((𝜑𝑛 ∈ {𝑀}) → 𝑂 ∈ OutMeas)
37 eqid 2762 . . . . . . . 8 dom 𝑂 = dom 𝑂
38 caratheodorylem1.s . . . . . . . . . . . 12 𝑆 = (CaraGen‘𝑂)
3938caragenss 47246 . . . . . . . . . . 11 (𝑂 ∈ OutMeas → 𝑆 ⊆ dom 𝑂)
4036, 39syl 18 . . . . . . . . . 10 ((𝜑𝑛 ∈ {𝑀}) → 𝑆 ⊆ dom 𝑂)
41 caratheodorylem1.e . . . . . . . . . . . 12 (𝜑𝐸:𝑍𝑆)
4241adantr 485 . . . . . . . . . . 11 ((𝜑𝑛 ∈ {𝑀}) → 𝐸:𝑍𝑆)
43 elsni 4605 . . . . . . . . . . . . 13 (𝑛 ∈ {𝑀} → 𝑛 = 𝑀)
4443adantl 486 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ {𝑀}) → 𝑛 = 𝑀)
45 uzid 12883 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ𝑀))
4630, 45syl 18 . . . . . . . . . . . . . 14 (𝜑𝑀 ∈ (ℤ𝑀))
47 caratheodorylem1.z . . . . . . . . . . . . . 14 𝑍 = (ℤ𝑀)
4846, 47eleqtrrdi 2873 . . . . . . . . . . . . 13 (𝜑𝑀𝑍)
4948adantr 485 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ {𝑀}) → 𝑀𝑍)
5044, 49eqeltrd 2862 . . . . . . . . . . 11 ((𝜑𝑛 ∈ {𝑀}) → 𝑛𝑍)
5142, 50ffvelcdmd 7080 . . . . . . . . . 10 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ∈ 𝑆)
5240, 51sseldd 3937 . . . . . . . . 9 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ∈ dom 𝑂)
53 elssuni 4903 . . . . . . . . 9 ((𝐸𝑛) ∈ dom 𝑂 → (𝐸𝑛) ⊆ dom 𝑂)
5452, 53syl 18 . . . . . . . 8 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ⊆ dom 𝑂)
5536, 37, 54omecl 47245 . . . . . . 7 ((𝜑𝑛 ∈ {𝑀}) → (𝑂‘(𝐸𝑛)) ∈ (0[,]+∞))
56 eqid 2762 . . . . . . 7 (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))
5755, 56fmptd 7109 . . . . . 6 (𝜑 → (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))):{𝑀}⟶(0[,]+∞))
5830, 57sge0sn 47121 . . . . 5 (𝜑 → (Σ^‘(𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))) = ((𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))‘𝑀))
59 eqidd 2763 . . . . . 6 (𝜑 → (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))))
6032iuneq1d 4983 . . . . . . . . . 10 (𝜑 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) = 𝑖 ∈ {𝑀} (𝐸𝑖))
61 fveq2 6881 . . . . . . . . . . . 12 (𝑖 = 𝑀 → (𝐸𝑖) = (𝐸𝑀))
6261iunxsng 5055 . . . . . . . . . . 11 (𝑀𝑍 𝑖 ∈ {𝑀} (𝐸𝑖) = (𝐸𝑀))
6348, 62syl 18 . . . . . . . . . 10 (𝜑 𝑖 ∈ {𝑀} (𝐸𝑖) = (𝐸𝑀))
64 eqidd 2763 . . . . . . . . . 10 (𝜑 → (𝐸𝑀) = (𝐸𝑀))
6560, 63, 643eqtrrd 2802 . . . . . . . . 9 (𝜑 → (𝐸𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
6665adantr 485 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐸𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
67 fveq2 6881 . . . . . . . . 9 (𝑛 = 𝑀 → (𝐸𝑛) = (𝐸𝑀))
6867adantl 486 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐸𝑛) = (𝐸𝑀))
69 caratheodorylem1.g . . . . . . . . . 10 𝐺 = (𝑛𝑍 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖))
70 oveq2 7420 . . . . . . . . . . 11 (𝑛 = 𝑀 → (𝑀...𝑛) = (𝑀...𝑀))
7170iuneq1d 4983 . . . . . . . . . 10 (𝑛 = 𝑀 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
72 ovex 7445 . . . . . . . . . . . 12 (𝑀...𝑀) ∈ V
73 fvex 6894 . . . . . . . . . . . 12 (𝐸𝑖) ∈ V
7472, 73iunex 7963 . . . . . . . . . . 11 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) ∈ V
7574a1i 11 . . . . . . . . . 10 (𝜑 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) ∈ V)
7669, 71, 48, 75fvmptd3 7013 . . . . . . . . 9 (𝜑 → (𝐺𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
7776adantr 485 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐺𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
7866, 68, 773eqtr4d 2807 . . . . . . 7 ((𝜑𝑛 = 𝑀) → (𝐸𝑛) = (𝐺𝑀))
7978fveq2d 6885 . . . . . 6 ((𝜑𝑛 = 𝑀) → (𝑂‘(𝐸𝑛)) = (𝑂‘(𝐺𝑀)))
80 snidg 4625 . . . . . . 7 (𝑀𝑍𝑀 ∈ {𝑀})
8148, 80syl 18 . . . . . 6 (𝜑𝑀 ∈ {𝑀})
82 fvexd 6896 . . . . . 6 (𝜑 → (𝑂‘(𝐺𝑀)) ∈ V)
8359, 79, 81, 82fvmptd 6997 . . . . 5 (𝜑 → ((𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))‘𝑀) = (𝑂‘(𝐺𝑀)))
8434, 58, 833eqtrrd 2802 . . . 4 (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))
8584a1i 11 . . 3 (𝑁 ∈ (ℤ𝑀) → (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))))
86 simp3 1155 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → 𝜑)
87 simp1 1153 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → 𝑖 ∈ (𝑀..^𝑁))
88 id 23 . . . . . . 7 ((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))))
8988imp 411 . . . . . 6 (((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
90893adant1 1147 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
91 elfzoel1 13692 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ∈ ℤ)
92 elfzoelz 13694 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ ℤ)
9392peano2zd 12709 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ ℤ)
9491zred 12706 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ∈ ℝ)
9593zred 12706 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ ℝ)
9692zred 12706 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ ℝ)
97 elfzole1 13703 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑀𝑖)
9896ltp1d 12151 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 < (𝑖 + 1))
9994, 96, 95, 97, 98lelttrd 11374 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 < (𝑖 + 1))
10094, 95, 99ltled 11364 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ≤ (𝑖 + 1))
101 leid 11312 . . . . . . . . . . . . . . 15 ((𝑖 + 1) ∈ ℝ → (𝑖 + 1) ≤ (𝑖 + 1))
10295, 101syl 18 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ≤ (𝑖 + 1))
10391, 93, 93, 100, 102elfzd 13549 . . . . . . . . . . . . 13 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ (𝑀...(𝑖 + 1)))
104103adantl 486 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (𝑀...(𝑖 + 1)))
105 fveq2 6881 . . . . . . . . . . . . 13 (𝑗 = (𝑖 + 1) → (𝐸𝑗) = (𝐸‘(𝑖 + 1)))
106105ssiun2s 5012 . . . . . . . . . . . 12 ((𝑖 + 1) ∈ (𝑀...(𝑖 + 1)) → (𝐸‘(𝑖 + 1)) ⊆ 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
107104, 106syl 18 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
108 fveq2 6881 . . . . . . . . . . . . . . . 16 (𝑖 = 𝑗 → (𝐸𝑖) = (𝐸𝑗))
109108cbviunv 5002 . . . . . . . . . . . . . . 15 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖) = 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗)
110109mpteq2i 5206 . . . . . . . . . . . . . 14 (𝑛𝑍 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖)) = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗))
11169, 110eqtri 2785 . . . . . . . . . . . . 13 𝐺 = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗))
112 oveq2 7420 . . . . . . . . . . . . . 14 (𝑛 = (𝑖 + 1) → (𝑀...𝑛) = (𝑀...(𝑖 + 1)))
113112iuneq1d 4983 . . . . . . . . . . . . 13 (𝑛 = (𝑖 + 1) → 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗) = 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
11430adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ∈ ℤ)
11592adantl 486 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ ℤ)
116115peano2zd 12709 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ ℤ)
117114zred 12706 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ∈ ℝ)
118116zred 12706 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ ℝ)
119115zred 12706 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ ℝ)
12097adantl 486 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀𝑖)
121119ltp1d 12151 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 < (𝑖 + 1))
122117, 119, 118, 120, 121lelttrd 11374 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 < (𝑖 + 1))
123117, 118, 122ltled 11364 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ≤ (𝑖 + 1))
124114, 116, 1233jca 1145 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑀 ∈ ℤ ∧ (𝑖 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑖 + 1)))
125 eluz2 12874 . . . . . . . . . . . . . . 15 ((𝑖 + 1) ∈ (ℤ𝑀) ↔ (𝑀 ∈ ℤ ∧ (𝑖 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑖 + 1)))
126124, 125sylibr 237 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (ℤ𝑀))
12747eqcomi 2771 . . . . . . . . . . . . . 14 (ℤ𝑀) = 𝑍
128126, 127eleqtrdi 2872 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ 𝑍)
129 ovex 7445 . . . . . . . . . . . . . . 15 (𝑀...(𝑖 + 1)) ∈ V
130 fvex 6894 . . . . . . . . . . . . . . 15 (𝐸𝑗) ∈ V
131129, 130iunex 7963 . . . . . . . . . . . . . 14 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ∈ V
132131a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ∈ V)
133111, 113, 128, 132fvmptd3 7013 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) = 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
134133eqcomd 2768 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) = (𝐺‘(𝑖 + 1)))
135107, 134sseqtrd 3972 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)))
136 sseqin2 4175 . . . . . . . . . . 11 ((𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)) ↔ ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
137136biimpi 219 . . . . . . . . . 10 ((𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)) → ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
138135, 137syl 18 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
139138fveq2d 6885 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) = (𝑂‘(𝐸‘(𝑖 + 1))))
140 nfcv 2924 . . . . . . . . . . . . 13 𝑗(𝐸‘(𝑖 + 1))
141 elfzouz 13699 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ (ℤ𝑀))
142141adantl 486 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ (ℤ𝑀))
143140, 142, 105iunp1 45814 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))))
144133, 143eqtrd 2797 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))))
145144difeq1d 4079 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
146 caratheodorylem1.dj . . . . . . . . . . . . . . 15 (𝜑Disj 𝑛𝑍 (𝐸𝑛))
147 fveq2 6881 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑗 → (𝐸𝑛) = (𝐸𝑗))
148147cbvdisjv 5086 . . . . . . . . . . . . . . 15 (Disj 𝑛𝑍 (𝐸𝑛) ↔ Disj 𝑗𝑍 (𝐸𝑗))
149146, 148sylib 221 . . . . . . . . . . . . . 14 (𝜑Disj 𝑗𝑍 (𝐸𝑗))
150149adantr 485 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → Disj 𝑗𝑍 (𝐸𝑗))
151 fzssuz 13600 . . . . . . . . . . . . . . 15 (𝑀...𝑖) ⊆ (ℤ𝑀)
152151, 127sseqtri 3984 . . . . . . . . . . . . . 14 (𝑀...𝑖) ⊆ 𝑍
153152a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑀...𝑖) ⊆ 𝑍)
154 fzp1nel 13646 . . . . . . . . . . . . . . . 16 ¬ (𝑖 + 1) ∈ (𝑀...𝑖)
155154a1i 11 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → ¬ (𝑖 + 1) ∈ (𝑀...𝑖))
156155adantl 486 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ¬ (𝑖 + 1) ∈ (𝑀...𝑖))
157128, 156eldifd 3915 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (𝑍 ∖ (𝑀...𝑖)))
158150, 153, 157, 105disjiun2 45806 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∩ (𝐸‘(𝑖 + 1))) = ∅)
159 undif4 4426 . . . . . . . . . . . 12 (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∩ (𝐸‘(𝑖 + 1))) = ∅ → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
160158, 159syl 18 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
161160eqcomd 2768 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))))
162 simpl 487 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝜑)
163142, 127eleqtrdi 2872 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖𝑍)
164111a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝐺 = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗)))
165 simpr 489 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → 𝑛 = 𝑖)
166165oveq2d 7428 . . . . . . . . . . . . . . . 16 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → (𝑀...𝑛) = (𝑀...𝑖))
167166iuneq1d 4983 . . . . . . . . . . . . . . 15 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
168 simpr 489 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝑖𝑍)
169 ovex 7445 . . . . . . . . . . . . . . . . 17 (𝑀...𝑖) ∈ V
170169, 130iunex 7963 . . . . . . . . . . . . . . . 16 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∈ V
171170a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∈ V)
172164, 167, 168, 171fvmptd 6997 . . . . . . . . . . . . . 14 ((𝜑𝑖𝑍) → (𝐺𝑖) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
173162, 163, 172syl2anc 595 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺𝑖) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
174173eqcomd 2768 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) = (𝐺𝑖))
175 difid 4331 . . . . . . . . . . . . 13 ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = ∅
176175a1i 11 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = ∅)
177174, 176uneq12d 4122 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = ((𝐺𝑖) ∪ ∅))
178 un0 4350 . . . . . . . . . . . 12 ((𝐺𝑖) ∪ ∅) = (𝐺𝑖)
179178a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺𝑖) ∪ ∅) = (𝐺𝑖))
180177, 179eqtrd 2797 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (𝐺𝑖))
181145, 161, 1803eqtrd 2801 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = (𝐺𝑖))
182181fveq2d 6885 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (𝑂‘(𝐺𝑖)))
183139, 182oveq12d 7430 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
1841833adant3 1149 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
18535adantr 485 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑂 ∈ OutMeas)
18641adantr 485 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝐸:𝑍𝑆)
187186, 128ffvelcdmd 7080 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ∈ 𝑆)
188 simpll 778 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝜑)
18991adantr 485 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑀 ∈ ℤ)
190 elfzelz 13558 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (𝑀...(𝑖 + 1)) → 𝑗 ∈ ℤ)
191190adantl 486 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗 ∈ ℤ)
192 elfzle1 13561 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (𝑀...(𝑖 + 1)) → 𝑀𝑗)
193192adantl 486 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑀𝑗)
194189, 191, 1933jca 1145 . . . . . . . . . . . . . . . 16 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → (𝑀 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 𝑀𝑗))
195 eluz2 12874 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (ℤ𝑀) ↔ (𝑀 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 𝑀𝑗))
196194, 195sylibr 237 . . . . . . . . . . . . . . 15 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗 ∈ (ℤ𝑀))
197196, 127eleqtrdi 2872 . . . . . . . . . . . . . 14 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗𝑍)
198197adantll 726 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗𝑍)
19935, 39syl 18 . . . . . . . . . . . . . . . 16 (𝜑𝑆 ⊆ dom 𝑂)
200199adantr 485 . . . . . . . . . . . . . . 15 ((𝜑𝑗𝑍) → 𝑆 ⊆ dom 𝑂)
20141ffvelcdmda 7079 . . . . . . . . . . . . . . 15 ((𝜑𝑗𝑍) → (𝐸𝑗) ∈ 𝑆)
202200, 201sseldd 3937 . . . . . . . . . . . . . 14 ((𝜑𝑗𝑍) → (𝐸𝑗) ∈ dom 𝑂)
203 elssuni 4903 . . . . . . . . . . . . . 14 ((𝐸𝑗) ∈ dom 𝑂 → (𝐸𝑗) ⊆ dom 𝑂)
204202, 203syl 18 . . . . . . . . . . . . 13 ((𝜑𝑗𝑍) → (𝐸𝑗) ⊆ dom 𝑂)
205188, 198, 204syl2anc 595 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → (𝐸𝑗) ⊆ dom 𝑂)
206205ralrimiva 3156 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ∀𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
207 iunss 5008 . . . . . . . . . . 11 ( 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂 ↔ ∀𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
208206, 207sylibr 237 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
209133, 208eqsstrd 3970 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) ⊆ dom 𝑂)
210185, 38, 37, 187, 209caragensplit 47242 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = (𝑂‘(𝐺‘(𝑖 + 1))))
211210eqcomd 2768 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐺‘(𝑖 + 1))) = ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))))
2122113adant3 1149 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝑂‘(𝐺‘(𝑖 + 1))) = ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))))
213185adantr 485 . . . . . . . . . 10 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝑂 ∈ OutMeas)
214162adantr 485 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝜑)
215 elfzuz 13554 . . . . . . . . . . . . 13 (𝑛 ∈ (𝑀...(𝑖 + 1)) → 𝑛 ∈ (ℤ𝑀))
216215, 127eleqtrdi 2872 . . . . . . . . . . . 12 (𝑛 ∈ (𝑀...(𝑖 + 1)) → 𝑛𝑍)
217216adantl 486 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝑛𝑍)
21841, 199fssd 6723 . . . . . . . . . . . . 13 (𝜑𝐸:𝑍⟶dom 𝑂)
219218ffvelcdmda 7079 . . . . . . . . . . . 12 ((𝜑𝑛𝑍) → (𝐸𝑛) ∈ dom 𝑂)
220219, 53syl 18 . . . . . . . . . . 11 ((𝜑𝑛𝑍) → (𝐸𝑛) ⊆ dom 𝑂)
221214, 217, 220syl2anc 595 . . . . . . . . . 10 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → (𝐸𝑛) ⊆ dom 𝑂)
222213, 37, 221omecl 47245 . . . . . . . . 9 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → (𝑂‘(𝐸𝑛)) ∈ (0[,]+∞))
223 2fveq3 6886 . . . . . . . . 9 (𝑛 = (𝑖 + 1) → (𝑂‘(𝐸𝑛)) = (𝑂‘(𝐸‘(𝑖 + 1))))
224142, 222, 223sge0p1 47156 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
2252243adant3 1149 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
226 id 23 . . . . . . . . . 10 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
227226eqcomd 2768 . . . . . . . . 9 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) = (𝑂‘(𝐺𝑖)))
228227oveq1d 7427 . . . . . . . 8 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
2292283ad2ant3 1152 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
230 simpl 487 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ (𝑀...𝑖)) → 𝜑)
231152sseli 3932 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (𝑀...𝑖) → 𝑗𝑍)
232231adantl 486 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ (𝑀...𝑖)) → 𝑗𝑍)
233230, 232, 204syl2anc 595 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ (𝑀...𝑖)) → (𝐸𝑗) ⊆ dom 𝑂)
234233adantlr 727 . . . . . . . . . . . . . 14 (((𝜑𝑖𝑍) ∧ 𝑗 ∈ (𝑀...𝑖)) → (𝐸𝑗) ⊆ dom 𝑂)
235234ralrimiva 3156 . . . . . . . . . . . . 13 ((𝜑𝑖𝑍) → ∀𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
236 iunss 5008 . . . . . . . . . . . . 13 ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂 ↔ ∀𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
237235, 236sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑖𝑍) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
238172, 237eqsstrd 3970 . . . . . . . . . . 11 ((𝜑𝑖𝑍) → (𝐺𝑖) ⊆ dom 𝑂)
239162, 163, 238syl2anc 595 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺𝑖) ⊆ dom 𝑂)
240185, 37, 239omexrcl 47249 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐺𝑖)) ∈ ℝ*)
241107, 208sstrd 3946 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ dom 𝑂)
242185, 37, 241omexrcl 47249 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐸‘(𝑖 + 1))) ∈ ℝ*)
243240, 242xaddcomd 46068 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
2442433adant3 1149 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
245225, 229, 2443eqtrd 2801 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
246184, 212, 2453eqtr4d 2807 . . . . 5 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
24786, 87, 90, 246syl3anc 1397 . . . 4 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
2482473exp 1136 . . 3 (𝑖 ∈ (𝑀..^𝑁) → ((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝜑 → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))))
24910, 16, 22, 28, 85, 248fzind2 13824 . 2 (𝑁 ∈ (𝑀...𝑁) → (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))))
2503, 4, 249sylc 66 1 (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wa 400  w3a 1102   = wceq 1569  wcel 2142  wral 3078  Vcvv 3454  cdif 3901  cun 3902  cin 3903  wss 3904  c0 4285  {csn 4588   cuni 4871   ciun 4955  Disj wdisj 5075   class class class wbr 5108  cmpt 5191  dom cdm 5660  wf 6532  cfv 6536  (class class class)co 7412  cr 11105  0cc0 11106  1c1 11107   + caddc 11109  +∞cpnf 11246  cle 11250  cz 12597  cuz 12868   +𝑒 cxad 13141  [,]cicc 13381  ...cfz 13541  ..^cfzo 13689  Σ^csumge0 47104  OutMeascome 47231  CaraGenccaragen 47233
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734  ax-inf2 9608  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1103  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-int 4912  df-iun 4957  df-disj 5076  df-br 5109  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5555  df-eprel 5560  df-po 5568  df-so 5569  df-fr 5613  df-se 5614  df-we 5615  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7861  df-1st 7984  df-2nd 7985  df-frecs 8276  df-wrecs 8307  df-recs 8356  df-rdg 8395  df-1o 8451  df-er 8692  df-en 8942  df-dom 8943  df-sdom 8944  df-fin 8945  df-sup 9400  df-oi 9470  df-card 9932  df-pnf 11251  df-mnf 11252  df-xr 11253  df-ltxr 11254  df-le 11255  df-sub 11449  df-neg 11450  df-div 11878  df-nn 12240  df-2 12309  df-3 12310  df-n0 12511  df-z 12598  df-uz 12869  df-rp 13023  df-xadd 13144  df-ico 13384  df-icc 13385  df-fz 13542  df-fzo 13690  df-seq 14045  df-exp 14105  df-hash 14374  df-cj 15157  df-re 15158  df-im 15159  df-sqrt 15293  df-abs 15294  df-clim 15546  df-sum 15745  df-sumge0 47105  df-ome 47232  df-caragen 47234
This theorem is used by:  caratheodorylem2  47269
  Copyright terms: Public domain W3C validator