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 43693
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 13103 . . 3 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ (𝑀...𝑁))
31, 2syl 17 . 2 (𝜑𝑁 ∈ (𝑀...𝑁))
4 id 22 . 2 (𝜑𝜑)
5 2fveq3 6711 . . . . 5 (𝑗 = 𝑀 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑀)))
6 oveq2 7210 . . . . . . 7 (𝑗 = 𝑀 → (𝑀...𝑗) = (𝑀...𝑀))
76mpteq1d 5133 . . . . . 6 (𝑗 = 𝑀 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))
87fveq2d 6710 . . . . 5 (𝑗 = 𝑀 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))
95, 8eqeq12d 2750 . . . 4 (𝑗 = 𝑀 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))))
109imbi2d 344 . . 3 (𝑗 = 𝑀 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))))
11 2fveq3 6711 . . . . 5 (𝑗 = 𝑖 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑖)))
12 oveq2 7210 . . . . . . 7 (𝑗 = 𝑖 → (𝑀...𝑗) = (𝑀...𝑖))
1312mpteq1d 5133 . . . . . 6 (𝑗 = 𝑖 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))
1413fveq2d 6710 . . . . 5 (𝑗 = 𝑖 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
1511, 14eqeq12d 2750 . . . 4 (𝑗 = 𝑖 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))))
1615imbi2d 344 . . 3 (𝑗 = 𝑖 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))))
17 2fveq3 6711 . . . . 5 (𝑗 = (𝑖 + 1) → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺‘(𝑖 + 1))))
18 oveq2 7210 . . . . . . 7 (𝑗 = (𝑖 + 1) → (𝑀...𝑗) = (𝑀...(𝑖 + 1)))
1918mpteq1d 5133 . . . . . 6 (𝑗 = (𝑖 + 1) → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛))))
2019fveq2d 6710 . . . . 5 (𝑗 = (𝑖 + 1) → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
2117, 20eqeq12d 2750 . . . 4 (𝑗 = (𝑖 + 1) → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛))))))
2221imbi2d 344 . . 3 (𝑗 = (𝑖 + 1) → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))))
23 2fveq3 6711 . . . . 5 (𝑗 = 𝑁 → (𝑂‘(𝐺𝑗)) = (𝑂‘(𝐺𝑁)))
24 oveq2 7210 . . . . . . 7 (𝑗 = 𝑁 → (𝑀...𝑗) = (𝑀...𝑁))
2524mpteq1d 5133 . . . . . 6 (𝑗 = 𝑁 → (𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))
2625fveq2d 6710 . . . . 5 (𝑗 = 𝑁 → (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))
2723, 26eqeq12d 2750 . . . 4 (𝑗 = 𝑁 → ((𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛)))) ↔ (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))))
2827imbi2d 344 . . 3 (𝑗 = 𝑁 → ((𝜑 → (𝑂‘(𝐺𝑗)) = (Σ^‘(𝑛 ∈ (𝑀...𝑗) ↦ (𝑂‘(𝐸𝑛))))) ↔ (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))))
29 eluzel2 12426 . . . . . . . . 9 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
301, 29syl 17 . . . . . . . 8 (𝜑𝑀 ∈ ℤ)
31 fzsn 13137 . . . . . . . 8 (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
3230, 31syl 17 . . . . . . 7 (𝜑 → (𝑀...𝑀) = {𝑀})
3332mpteq1d 5133 . . . . . 6 (𝜑 → (𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))))
3433fveq2d 6710 . . . . 5 (𝜑 → (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))) = (Σ^‘(𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))))
35 caratheodorylem1.o . . . . . . . . 9 (𝜑𝑂 ∈ OutMeas)
3635adantr 484 . . . . . . . 8 ((𝜑𝑛 ∈ {𝑀}) → 𝑂 ∈ OutMeas)
37 eqid 2734 . . . . . . . 8 dom 𝑂 = dom 𝑂
38 caratheodorylem1.s . . . . . . . . . . . 12 𝑆 = (CaraGen‘𝑂)
3938caragenss 43671 . . . . . . . . . . 11 (𝑂 ∈ OutMeas → 𝑆 ⊆ dom 𝑂)
4036, 39syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ {𝑀}) → 𝑆 ⊆ dom 𝑂)
41 caratheodorylem1.e . . . . . . . . . . . 12 (𝜑𝐸:𝑍𝑆)
4241adantr 484 . . . . . . . . . . 11 ((𝜑𝑛 ∈ {𝑀}) → 𝐸:𝑍𝑆)
43 elsni 4548 . . . . . . . . . . . . 13 (𝑛 ∈ {𝑀} → 𝑛 = 𝑀)
4443adantl 485 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ {𝑀}) → 𝑛 = 𝑀)
45 uzid 12436 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ𝑀))
4630, 45syl 17 . . . . . . . . . . . . . 14 (𝜑𝑀 ∈ (ℤ𝑀))
47 caratheodorylem1.z . . . . . . . . . . . . . 14 𝑍 = (ℤ𝑀)
4846, 47eleqtrrdi 2845 . . . . . . . . . . . . 13 (𝜑𝑀𝑍)
4948adantr 484 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ {𝑀}) → 𝑀𝑍)
5044, 49eqeltrd 2834 . . . . . . . . . . 11 ((𝜑𝑛 ∈ {𝑀}) → 𝑛𝑍)
5142, 50ffvelrnd 6894 . . . . . . . . . 10 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ∈ 𝑆)
5240, 51sseldd 3892 . . . . . . . . 9 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ∈ dom 𝑂)
53 elssuni 4841 . . . . . . . . 9 ((𝐸𝑛) ∈ dom 𝑂 → (𝐸𝑛) ⊆ dom 𝑂)
5452, 53syl 17 . . . . . . . 8 ((𝜑𝑛 ∈ {𝑀}) → (𝐸𝑛) ⊆ dom 𝑂)
5536, 37, 54omecl 43670 . . . . . . 7 ((𝜑𝑛 ∈ {𝑀}) → (𝑂‘(𝐸𝑛)) ∈ (0[,]+∞))
56 eqid 2734 . . . . . . 7 (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))
5755, 56fmptd 6920 . . . . . 6 (𝜑 → (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))):{𝑀}⟶(0[,]+∞))
5830, 57sge0sn 43546 . . . . 5 (𝜑 → (Σ^‘(𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))) = ((𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))‘𝑀))
59 eqidd 2735 . . . . . 6 (𝜑 → (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))) = (𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛))))
6032iuneq1d 4921 . . . . . . . . . 10 (𝜑 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) = 𝑖 ∈ {𝑀} (𝐸𝑖))
61 fveq2 6706 . . . . . . . . . . . 12 (𝑖 = 𝑀 → (𝐸𝑖) = (𝐸𝑀))
6261iunxsng 4988 . . . . . . . . . . 11 (𝑀𝑍 𝑖 ∈ {𝑀} (𝐸𝑖) = (𝐸𝑀))
6348, 62syl 17 . . . . . . . . . 10 (𝜑 𝑖 ∈ {𝑀} (𝐸𝑖) = (𝐸𝑀))
64 eqidd 2735 . . . . . . . . . 10 (𝜑 → (𝐸𝑀) = (𝐸𝑀))
6560, 63, 643eqtrrd 2779 . . . . . . . . 9 (𝜑 → (𝐸𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
6665adantr 484 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐸𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
67 fveq2 6706 . . . . . . . . 9 (𝑛 = 𝑀 → (𝐸𝑛) = (𝐸𝑀))
6867adantl 485 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐸𝑛) = (𝐸𝑀))
69 caratheodorylem1.g . . . . . . . . . 10 𝐺 = (𝑛𝑍 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖))
70 oveq2 7210 . . . . . . . . . . 11 (𝑛 = 𝑀 → (𝑀...𝑛) = (𝑀...𝑀))
7170iuneq1d 4921 . . . . . . . . . 10 (𝑛 = 𝑀 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
72 ovex 7235 . . . . . . . . . . . 12 (𝑀...𝑀) ∈ V
73 fvex 6719 . . . . . . . . . . . 12 (𝐸𝑖) ∈ V
7472, 73iunex 7730 . . . . . . . . . . 11 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) ∈ V
7574a1i 11 . . . . . . . . . 10 (𝜑 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖) ∈ V)
7669, 71, 48, 75fvmptd3 6830 . . . . . . . . 9 (𝜑 → (𝐺𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
7776adantr 484 . . . . . . . 8 ((𝜑𝑛 = 𝑀) → (𝐺𝑀) = 𝑖 ∈ (𝑀...𝑀)(𝐸𝑖))
7866, 68, 773eqtr4d 2784 . . . . . . 7 ((𝜑𝑛 = 𝑀) → (𝐸𝑛) = (𝐺𝑀))
7978fveq2d 6710 . . . . . 6 ((𝜑𝑛 = 𝑀) → (𝑂‘(𝐸𝑛)) = (𝑂‘(𝐺𝑀)))
80 snidg 4565 . . . . . . 7 (𝑀𝑍𝑀 ∈ {𝑀})
8148, 80syl 17 . . . . . 6 (𝜑𝑀 ∈ {𝑀})
82 fvexd 6721 . . . . . 6 (𝜑 → (𝑂‘(𝐺𝑀)) ∈ V)
8359, 79, 81, 82fvmptd 6814 . . . . 5 (𝜑 → ((𝑛 ∈ {𝑀} ↦ (𝑂‘(𝐸𝑛)))‘𝑀) = (𝑂‘(𝐺𝑀)))
8434, 58, 833eqtrrd 2779 . . . 4 (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛)))))
8584a1i 11 . . 3 (𝑁 ∈ (ℤ𝑀) → (𝜑 → (𝑂‘(𝐺𝑀)) = (Σ^‘(𝑛 ∈ (𝑀...𝑀) ↦ (𝑂‘(𝐸𝑛))))))
86 simp3 1140 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → 𝜑)
87 simp1 1138 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → 𝑖 ∈ (𝑀..^𝑁))
88 id 22 . . . . . . 7 ((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))))
8988imp 410 . . . . . 6 (((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
90893adant1 1132 . . . . 5 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
91 elfzoel1 13224 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ∈ ℤ)
92 elfzoelz 13226 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ ℤ)
9392peano2zd 12268 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ ℤ)
9491zred 12265 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ∈ ℝ)
9593zred 12265 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ ℝ)
9692zred 12265 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ ℝ)
97 elfzole1 13234 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑀𝑖)
9896ltp1d 11745 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 < (𝑖 + 1))
9994, 96, 95, 97, 98lelttrd 10973 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 < (𝑖 + 1))
10094, 95, 99ltled 10963 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑀 ≤ (𝑖 + 1))
101 leid 10911 . . . . . . . . . . . . . . 15 ((𝑖 + 1) ∈ ℝ → (𝑖 + 1) ≤ (𝑖 + 1))
10295, 101syl 17 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ≤ (𝑖 + 1))
10391, 93, 93, 100, 102elfzd 13086 . . . . . . . . . . . . 13 (𝑖 ∈ (𝑀..^𝑁) → (𝑖 + 1) ∈ (𝑀...(𝑖 + 1)))
104103adantl 485 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (𝑀...(𝑖 + 1)))
105 fveq2 6706 . . . . . . . . . . . . 13 (𝑗 = (𝑖 + 1) → (𝐸𝑗) = (𝐸‘(𝑖 + 1)))
106105ssiun2s 4947 . . . . . . . . . . . 12 ((𝑖 + 1) ∈ (𝑀...(𝑖 + 1)) → (𝐸‘(𝑖 + 1)) ⊆ 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
107104, 106syl 17 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
108 fveq2 6706 . . . . . . . . . . . . . . . 16 (𝑖 = 𝑗 → (𝐸𝑖) = (𝐸𝑗))
109108cbviunv 4939 . . . . . . . . . . . . . . 15 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖) = 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗)
110109mpteq2i 5136 . . . . . . . . . . . . . 14 (𝑛𝑍 𝑖 ∈ (𝑀...𝑛)(𝐸𝑖)) = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗))
11169, 110eqtri 2762 . . . . . . . . . . . . 13 𝐺 = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗))
112 oveq2 7210 . . . . . . . . . . . . . 14 (𝑛 = (𝑖 + 1) → (𝑀...𝑛) = (𝑀...(𝑖 + 1)))
113112iuneq1d 4921 . . . . . . . . . . . . 13 (𝑛 = (𝑖 + 1) → 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗) = 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
11430adantr 484 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ∈ ℤ)
11592adantl 485 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ ℤ)
116115peano2zd 12268 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ ℤ)
117114zred 12265 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ∈ ℝ)
118116zred 12265 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ ℝ)
119115zred 12265 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ ℝ)
12097adantl 485 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀𝑖)
121119ltp1d 11745 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 < (𝑖 + 1))
122117, 119, 118, 120, 121lelttrd 10973 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 < (𝑖 + 1))
123117, 118, 122ltled 10963 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑀 ≤ (𝑖 + 1))
124114, 116, 1233jca 1130 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑀 ∈ ℤ ∧ (𝑖 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑖 + 1)))
125 eluz2 12427 . . . . . . . . . . . . . . 15 ((𝑖 + 1) ∈ (ℤ𝑀) ↔ (𝑀 ∈ ℤ ∧ (𝑖 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑖 + 1)))
126124, 125sylibr 237 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (ℤ𝑀))
12747eqcomi 2743 . . . . . . . . . . . . . 14 (ℤ𝑀) = 𝑍
128126, 127eleqtrdi 2844 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ 𝑍)
129 ovex 7235 . . . . . . . . . . . . . . 15 (𝑀...(𝑖 + 1)) ∈ V
130 fvex 6719 . . . . . . . . . . . . . . 15 (𝐸𝑗) ∈ V
131129, 130iunex 7730 . . . . . . . . . . . . . 14 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ∈ V
132131a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ∈ V)
133111, 113, 128, 132fvmptd3 6830 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) = 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗))
134133eqcomd 2740 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) = (𝐺‘(𝑖 + 1)))
135107, 134sseqtrd 3931 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)))
136 sseqin2 4120 . . . . . . . . . . 11 ((𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)) ↔ ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
137136biimpi 219 . . . . . . . . . 10 ((𝐸‘(𝑖 + 1)) ⊆ (𝐺‘(𝑖 + 1)) → ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
138135, 137syl 17 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1))) = (𝐸‘(𝑖 + 1)))
139138fveq2d 6710 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) = (𝑂‘(𝐸‘(𝑖 + 1))))
140 nfcv 2900 . . . . . . . . . . . . 13 𝑗(𝐸‘(𝑖 + 1))
141 elfzouz 13230 . . . . . . . . . . . . . 14 (𝑖 ∈ (𝑀..^𝑁) → 𝑖 ∈ (ℤ𝑀))
142141adantl 485 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖 ∈ (ℤ𝑀))
143140, 142, 105iunp1 42239 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))))
144133, 143eqtrd 2774 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))))
145144difeq1d 4026 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
146 caratheodorylem1.dj . . . . . . . . . . . . . . 15 (𝜑Disj 𝑛𝑍 (𝐸𝑛))
147 fveq2 6706 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑗 → (𝐸𝑛) = (𝐸𝑗))
148147cbvdisjv 5019 . . . . . . . . . . . . . . 15 (Disj 𝑛𝑍 (𝐸𝑛) ↔ Disj 𝑗𝑍 (𝐸𝑗))
149146, 148sylib 221 . . . . . . . . . . . . . 14 (𝜑Disj 𝑗𝑍 (𝐸𝑗))
150149adantr 484 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → Disj 𝑗𝑍 (𝐸𝑗))
151 fzssuz 13136 . . . . . . . . . . . . . . 15 (𝑀...𝑖) ⊆ (ℤ𝑀)
152151, 127sseqtri 3927 . . . . . . . . . . . . . 14 (𝑀...𝑖) ⊆ 𝑍
153152a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑀...𝑖) ⊆ 𝑍)
154 fzp1nel 13179 . . . . . . . . . . . . . . . 16 ¬ (𝑖 + 1) ∈ (𝑀...𝑖)
155154a1i 11 . . . . . . . . . . . . . . 15 (𝑖 ∈ (𝑀..^𝑁) → ¬ (𝑖 + 1) ∈ (𝑀...𝑖))
156155adantl 485 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ¬ (𝑖 + 1) ∈ (𝑀...𝑖))
157128, 156eldifd 3868 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑖 + 1) ∈ (𝑍 ∖ (𝑀...𝑖)))
158150, 153, 157, 105disjiun2 42231 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∩ (𝐸‘(𝑖 + 1))) = ∅)
159 undif4 4371 . . . . . . . . . . . 12 (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∩ (𝐸‘(𝑖 + 1))) = ∅ → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
160158, 159syl 17 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))))
161160eqcomd 2740 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ (𝐸‘(𝑖 + 1))) ∖ (𝐸‘(𝑖 + 1))) = ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))))
162 simpl 486 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝜑)
163142, 127eleqtrdi 2844 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑖𝑍)
164111a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝐺 = (𝑛𝑍 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗)))
165 simpr 488 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → 𝑛 = 𝑖)
166165oveq2d 7218 . . . . . . . . . . . . . . . 16 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → (𝑀...𝑛) = (𝑀...𝑖))
167166iuneq1d 4921 . . . . . . . . . . . . . . 15 (((𝜑𝑖𝑍) ∧ 𝑛 = 𝑖) → 𝑗 ∈ (𝑀...𝑛)(𝐸𝑗) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
168 simpr 488 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝑖𝑍)
169 ovex 7235 . . . . . . . . . . . . . . . . 17 (𝑀...𝑖) ∈ V
170169, 130iunex 7730 . . . . . . . . . . . . . . . 16 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∈ V
171170a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖𝑍) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∈ V)
172164, 167, 168, 171fvmptd 6814 . . . . . . . . . . . . . 14 ((𝜑𝑖𝑍) → (𝐺𝑖) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
173162, 163, 172syl2anc 587 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺𝑖) = 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗))
174173eqcomd 2740 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) = (𝐺𝑖))
175 difid 4275 . . . . . . . . . . . . 13 ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = ∅
176175a1i 11 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = ∅)
177174, 176uneq12d 4068 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = ((𝐺𝑖) ∪ ∅))
178 un0 4295 . . . . . . . . . . . 12 ((𝐺𝑖) ∪ ∅) = (𝐺𝑖)
179178a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺𝑖) ∪ ∅) = (𝐺𝑖))
180177, 179eqtrd 2774 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ∪ ((𝐸‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (𝐺𝑖))
181145, 161, 1803eqtrd 2778 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))) = (𝐺𝑖))
182181fveq2d 6710 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1)))) = (𝑂‘(𝐺𝑖)))
183139, 182oveq12d 7220 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
1841833adant3 1134 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
18535adantr 484 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑂 ∈ OutMeas)
18641adantr 484 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝐸:𝑍𝑆)
187186, 128ffvelrnd 6894 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ∈ 𝑆)
188 simpll 767 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝜑)
18991adantr 484 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑀 ∈ ℤ)
190 elfzelz 13095 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (𝑀...(𝑖 + 1)) → 𝑗 ∈ ℤ)
191190adantl 485 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗 ∈ ℤ)
192 elfzle1 13098 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (𝑀...(𝑖 + 1)) → 𝑀𝑗)
193192adantl 485 . . . . . . . . . . . . . . . . 17 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑀𝑗)
194189, 191, 1933jca 1130 . . . . . . . . . . . . . . . 16 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → (𝑀 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 𝑀𝑗))
195 eluz2 12427 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (ℤ𝑀) ↔ (𝑀 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 𝑀𝑗))
196194, 195sylibr 237 . . . . . . . . . . . . . . 15 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗 ∈ (ℤ𝑀))
197196, 127eleqtrdi 2844 . . . . . . . . . . . . . 14 ((𝑖 ∈ (𝑀..^𝑁) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗𝑍)
198197adantll 714 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → 𝑗𝑍)
19935, 39syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝑆 ⊆ dom 𝑂)
200199adantr 484 . . . . . . . . . . . . . . 15 ((𝜑𝑗𝑍) → 𝑆 ⊆ dom 𝑂)
20141ffvelrnda 6893 . . . . . . . . . . . . . . 15 ((𝜑𝑗𝑍) → (𝐸𝑗) ∈ 𝑆)
202200, 201sseldd 3892 . . . . . . . . . . . . . 14 ((𝜑𝑗𝑍) → (𝐸𝑗) ∈ dom 𝑂)
203 elssuni 4841 . . . . . . . . . . . . . 14 ((𝐸𝑗) ∈ dom 𝑂 → (𝐸𝑗) ⊆ dom 𝑂)
204202, 203syl 17 . . . . . . . . . . . . 13 ((𝜑𝑗𝑍) → (𝐸𝑗) ⊆ dom 𝑂)
205188, 198, 204syl2anc 587 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑗 ∈ (𝑀...(𝑖 + 1))) → (𝐸𝑗) ⊆ dom 𝑂)
206205ralrimiva 3098 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ∀𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
207 iunss 4944 . . . . . . . . . . 11 ( 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂 ↔ ∀𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
208206, 207sylibr 237 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → 𝑗 ∈ (𝑀...(𝑖 + 1))(𝐸𝑗) ⊆ dom 𝑂)
209133, 208eqsstrd 3929 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑖 + 1)) ⊆ dom 𝑂)
210185, 38, 37, 187, 209caragensplit 43667 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))) = (𝑂‘(𝐺‘(𝑖 + 1))))
211210eqcomd 2740 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐺‘(𝑖 + 1))) = ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))))
2122113adant3 1134 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝑂‘(𝐺‘(𝑖 + 1))) = ((𝑂‘((𝐺‘(𝑖 + 1)) ∩ (𝐸‘(𝑖 + 1)))) +𝑒 (𝑂‘((𝐺‘(𝑖 + 1)) ∖ (𝐸‘(𝑖 + 1))))))
213185adantr 484 . . . . . . . . . 10 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝑂 ∈ OutMeas)
214162adantr 484 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝜑)
215 elfzuz 13091 . . . . . . . . . . . . 13 (𝑛 ∈ (𝑀...(𝑖 + 1)) → 𝑛 ∈ (ℤ𝑀))
216215, 127eleqtrdi 2844 . . . . . . . . . . . 12 (𝑛 ∈ (𝑀...(𝑖 + 1)) → 𝑛𝑍)
217216adantl 485 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → 𝑛𝑍)
21841, 199fssd 6552 . . . . . . . . . . . . 13 (𝜑𝐸:𝑍⟶dom 𝑂)
219218ffvelrnda 6893 . . . . . . . . . . . 12 ((𝜑𝑛𝑍) → (𝐸𝑛) ∈ dom 𝑂)
220219, 53syl 17 . . . . . . . . . . 11 ((𝜑𝑛𝑍) → (𝐸𝑛) ⊆ dom 𝑂)
221214, 217, 220syl2anc 587 . . . . . . . . . 10 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → (𝐸𝑛) ⊆ dom 𝑂)
222213, 37, 221omecl 43670 . . . . . . . . 9 (((𝜑𝑖 ∈ (𝑀..^𝑁)) ∧ 𝑛 ∈ (𝑀...(𝑖 + 1))) → (𝑂‘(𝐸𝑛)) ∈ (0[,]+∞))
223 2fveq3 6711 . . . . . . . . 9 (𝑛 = (𝑖 + 1) → (𝑂‘(𝐸𝑛)) = (𝑂‘(𝐸‘(𝑖 + 1))))
224142, 222, 223sge0p1 43581 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
2252243adant3 1134 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
226 id 22 . . . . . . . . . 10 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))))
227226eqcomd 2740 . . . . . . . . 9 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) = (𝑂‘(𝐺𝑖)))
228227oveq1d 7217 . . . . . . . 8 ((𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) → ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
2292283ad2ant3 1137 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛)))) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))))
230 simpl 486 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ (𝑀...𝑖)) → 𝜑)
231152sseli 3887 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (𝑀...𝑖) → 𝑗𝑍)
232231adantl 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ (𝑀...𝑖)) → 𝑗𝑍)
233230, 232, 204syl2anc 587 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ (𝑀...𝑖)) → (𝐸𝑗) ⊆ dom 𝑂)
234233adantlr 715 . . . . . . . . . . . . . 14 (((𝜑𝑖𝑍) ∧ 𝑗 ∈ (𝑀...𝑖)) → (𝐸𝑗) ⊆ dom 𝑂)
235234ralrimiva 3098 . . . . . . . . . . . . 13 ((𝜑𝑖𝑍) → ∀𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
236 iunss 4944 . . . . . . . . . . . . 13 ( 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂 ↔ ∀𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
237235, 236sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑖𝑍) → 𝑗 ∈ (𝑀...𝑖)(𝐸𝑗) ⊆ dom 𝑂)
238172, 237eqsstrd 3929 . . . . . . . . . . 11 ((𝜑𝑖𝑍) → (𝐺𝑖) ⊆ dom 𝑂)
239162, 163, 238syl2anc 587 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐺𝑖) ⊆ dom 𝑂)
240185, 37, 239omexrcl 43674 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐺𝑖)) ∈ ℝ*)
241107, 208sstrd 3901 . . . . . . . . . 10 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝐸‘(𝑖 + 1)) ⊆ dom 𝑂)
242185, 37, 241omexrcl 43674 . . . . . . . . 9 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → (𝑂‘(𝐸‘(𝑖 + 1))) ∈ ℝ*)
243240, 242xaddcomd 42488 . . . . . . . 8 ((𝜑𝑖 ∈ (𝑀..^𝑁)) → ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
2442433adant3 1134 . . . . . . 7 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → ((𝑂‘(𝐺𝑖)) +𝑒 (𝑂‘(𝐸‘(𝑖 + 1)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
245225, 229, 2443eqtrd 2778 . . . . . 6 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))) = ((𝑂‘(𝐸‘(𝑖 + 1))) +𝑒 (𝑂‘(𝐺𝑖))))
246184, 212, 2453eqtr4d 2784 . . . . 5 ((𝜑𝑖 ∈ (𝑀..^𝑁) ∧ (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
24786, 87, 90, 246syl3anc 1373 . . . 4 ((𝑖 ∈ (𝑀..^𝑁) ∧ (𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) ∧ 𝜑) → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))
2482473exp 1121 . . 3 (𝑖 ∈ (𝑀..^𝑁) → ((𝜑 → (𝑂‘(𝐺𝑖)) = (Σ^‘(𝑛 ∈ (𝑀...𝑖) ↦ (𝑂‘(𝐸𝑛))))) → (𝜑 → (𝑂‘(𝐺‘(𝑖 + 1))) = (Σ^‘(𝑛 ∈ (𝑀...(𝑖 + 1)) ↦ (𝑂‘(𝐸𝑛)))))))
24910, 16, 22, 28, 85, 248fzind2 13343 . 2 (𝑁 ∈ (𝑀...𝑁) → (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛))))))
2503, 4, 249sylc 65 1 (𝜑 → (𝑂‘(𝐺𝑁)) = (Σ^‘(𝑛 ∈ (𝑀...𝑁) ↦ (𝑂‘(𝐸𝑛)))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 399  w3a 1089   = wceq 1543  wcel 2110  wral 3054  Vcvv 3401  cdif 3854  cun 3855  cin 3856  wss 3857  c0 4227  {csn 4531   cuni 4809   ciun 4894  Disj wdisj 5008   class class class wbr 5043  cmpt 5124  dom cdm 5540  wf 6365  cfv 6369  (class class class)co 7202  cr 10711  0cc0 10712  1c1 10713   + caddc 10715  +∞cpnf 10847  cle 10851  cz 12159  cuz 12421   +𝑒 cxad 12685  [,]cicc 12921  ...cfz 13078  ..^cfzo 13221  Σ^csumge0 43529  OutMeascome 43656  CaraGenccaragen 43658
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2706  ax-rep 5168  ax-sep 5181  ax-nul 5188  ax-pow 5247  ax-pr 5311  ax-un 7512  ax-inf2 9245  ax-cnex 10768  ax-resscn 10769  ax-1cn 10770  ax-icn 10771  ax-addcl 10772  ax-addrcl 10773  ax-mulcl 10774  ax-mulrcl 10775  ax-mulcom 10776  ax-addass 10777  ax-mulass 10778  ax-distr 10779  ax-i2m1 10780  ax-1ne0 10781  ax-1rid 10782  ax-rnegex 10783  ax-rrecex 10784  ax-cnre 10785  ax-pre-lttri 10786  ax-pre-lttrn 10787  ax-pre-ltadd 10788  ax-pre-mulgt0 10789  ax-pre-sup 10790
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2537  df-eu 2566  df-clab 2713  df-cleq 2726  df-clel 2812  df-nfc 2882  df-ne 2936  df-nel 3040  df-ral 3059  df-rex 3060  df-reu 3061  df-rmo 3062  df-rab 3063  df-v 3403  df-sbc 3688  df-csb 3803  df-dif 3860  df-un 3862  df-in 3864  df-ss 3874  df-pss 3876  df-nul 4228  df-if 4430  df-pw 4505  df-sn 4532  df-pr 4534  df-tp 4536  df-op 4538  df-uni 4810  df-int 4850  df-iun 4896  df-disj 5009  df-br 5044  df-opab 5106  df-mpt 5125  df-tr 5151  df-id 5444  df-eprel 5449  df-po 5457  df-so 5458  df-fr 5498  df-se 5499  df-we 5500  df-xp 5546  df-rel 5547  df-cnv 5548  df-co 5549  df-dm 5550  df-rn 5551  df-res 5552  df-ima 5553  df-pred 6149  df-ord 6205  df-on 6206  df-lim 6207  df-suc 6208  df-iota 6327  df-fun 6371  df-fn 6372  df-f 6373  df-f1 6374  df-fo 6375  df-f1o 6376  df-fv 6377  df-isom 6378  df-riota 7159  df-ov 7205  df-oprab 7206  df-mpo 7207  df-om 7634  df-1st 7750  df-2nd 7751  df-wrecs 8036  df-recs 8097  df-rdg 8135  df-1o 8191  df-er 8380  df-en 8616  df-dom 8617  df-sdom 8618  df-fin 8619  df-sup 9047  df-oi 9115  df-card 9538  df-pnf 10852  df-mnf 10853  df-xr 10854  df-ltxr 10855  df-le 10856  df-sub 11047  df-neg 11048  df-div 11473  df-nn 11814  df-2 11876  df-3 11877  df-n0 12074  df-z 12160  df-uz 12422  df-rp 12570  df-xadd 12688  df-ico 12924  df-icc 12925  df-fz 13079  df-fzo 13222  df-seq 13558  df-exp 13619  df-hash 13880  df-cj 14645  df-re 14646  df-im 14647  df-sqrt 14781  df-abs 14782  df-clim 15032  df-sum 15233  df-sumge0 43530  df-ome 43657  df-caragen 43659
This theorem is referenced by:  caratheodorylem2  43694
  Copyright terms: Public domain W3C validator