Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  carsgclctunlem2 Structured version   Visualization version   GIF version

Theorem carsgclctunlem2 34817
Description: Lemma for carsgclctun 34819. (Contributed by Thierry Arnoux, 25-May-2020.)
Hypotheses
Ref Expression
carsgval.1 (𝜑𝑂𝑉)
carsgval.2 (𝜑𝑀:𝒫 𝑂⟶(0[,]+∞))
carsgsiga.1 (𝜑 → (𝑀‘∅) = 0)
carsgsiga.2 ((𝜑𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦))
carsgsiga.3 ((𝜑𝑥𝑦𝑦 ∈ 𝒫 𝑂) → (𝑀𝑥) ≤ (𝑀𝑦))
carsgclctunlem2.1 (𝜑Disj 𝑘 ∈ ℕ 𝐴)
carsgclctunlem2.2 ((𝜑𝑘 ∈ ℕ) → 𝐴 ∈ (toCaraSiga‘𝑀))
carsgclctunlem2.3 (𝜑𝐸 ∈ 𝒫 𝑂)
carsgclctunlem2.4 (𝜑 → (𝑀𝐸) ≠ +∞)
Assertion
Ref Expression
carsgclctunlem2 (𝜑 → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ≤ (𝑀𝐸))
Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐸,𝑦   𝑥,𝑀,𝑦   𝑥,𝑂,𝑦   𝜑,𝑥,𝑦,𝑘   𝑘,𝐸   𝑘,𝑀   𝑘,𝑂   𝜑,𝑘
Allowed substitution hints:   𝐴(𝑘)   𝑉(𝑥, 𝑦, 𝑘)

Proof of Theorem carsgclctunlem2
Dummy variables 𝑒 𝑛 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 iunin2 5033 . . . . 5 𝑘 ∈ ℕ (𝐸𝐴) = (𝐸 𝑘 ∈ ℕ 𝐴)
21fveq2i 6885 . . . 4 (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) = (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))
3 iccssxr 13485 . . . . 5 (0[,]+∞) ⊆ ℝ*
4 carsgval.2 . . . . . 6 (𝜑𝑀:𝒫 𝑂⟶(0[,]+∞))
5 nnex 12266 . . . . . . . 8 ℕ ∈ V
65a1i 11 . . . . . . 7 (𝜑 → ℕ ∈ V)
7 carsgclctunlem2.3 . . . . . . . . 9 (𝜑𝐸 ∈ 𝒫 𝑂)
87adantr 486 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
98elpwincl1 32986 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (𝐸𝐴) ∈ 𝒫 𝑂)
106, 9elpwiuncl 32988 . . . . . 6 (𝜑 𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂)
114, 10ffvelcdmd 7081 . . . . 5 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ∈ (0[,]+∞))
123, 11sselid 3932 . . . 4 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ∈ ℝ*)
132, 12eqeltrrid 2867 . . 3 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
144, 7ffvelcdmd 7081 . . . . 5 (𝜑 → (𝑀𝐸) ∈ (0[,]+∞))
153, 14sselid 3932 . . . 4 (𝜑 → (𝑀𝐸) ∈ ℝ*)
167elpwdifcl 32987 . . . . . . 7 (𝜑 → (𝐸 𝑘 ∈ ℕ 𝐴) ∈ 𝒫 𝑂)
174, 16ffvelcdmd 7081 . . . . . 6 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
183, 17sselid 3932 . . . . 5 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
1918xnegcld 13354 . . . 4 (𝜑 → -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
2015, 19xaddcld 13355 . . 3 (𝜑 → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ∈ ℝ*)
214adantr 486 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
2221, 9ffvelcdmd 7081 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
2322ralrimiva 3156 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
24 nfcv 2924 . . . . . . . 8 𝑘
2524esumcl 34527 . . . . . . 7 ((ℕ ∈ V ∧ ∀𝑘 ∈ ℕ (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞)) → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
266, 23, 25syl2anc 596 . . . . . 6 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
273, 26sselid 3932 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ∈ ℝ*)
289ralrimiva 3156 . . . . . . . . 9 (𝜑 → ∀𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂)
29 dfiun3g 5956 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂 𝑘 ∈ ℕ (𝐸𝐴) = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)))
3028, 29syl 18 . . . . . . . 8 (𝜑 𝑘 ∈ ℕ (𝐸𝐴) = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)))
3130fveq2d 6886 . . . . . . 7 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) = (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))))
32 nnct 14047 . . . . . . . . . 10 ℕ ≼ ω
33 mptct 10549 . . . . . . . . . 10 (ℕ ≼ ω → (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω)
34 rnct 10531 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω)
3532, 33, 34mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω
3635a1i 11 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω)
37 eqid 2762 . . . . . . . . . 10 (𝑘 ∈ ℕ ↦ (𝐸𝐴)) = (𝑘 ∈ ℕ ↦ (𝐸𝐴))
3837rnmptss 7119 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂 → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂)
3928, 38syl 18 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂)
40 mptexg 7223 . . . . . . . . . 10 (ℕ ∈ V → (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V)
41 rnexg 7902 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V)
425, 40, 41mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V
43 breq1 5110 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (𝑥 ≼ ω ↔ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω))
44 sseq1 3959 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (𝑥 ⊆ 𝒫 𝑂 ↔ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂))
4543, 443anbi23d 1467 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → ((𝜑𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) ↔ (𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂)))
46 unieq 4881 . . . . . . . . . . . . 13 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → 𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)))
4746fveq2d 6886 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (𝑀 𝑥) = (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))))
48 esumeq1 34531 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → Σ*𝑦𝑥(𝑀𝑦) = Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
4947, 48breq12d 5120 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → ((𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦) ↔ (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦)))
5045, 49imbi12d 347 . . . . . . . . . 10 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (((𝜑𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦)) ↔ ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂) → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))))
51 carsgsiga.2 . . . . . . . . . 10 ((𝜑𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦))
5250, 51vtoclg 3520 . . . . . . . . 9 (ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V → ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂) → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦)))
5342, 52ax-mp 5 . . . . . . . 8 ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂) → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
5436, 39, 53mpd3an23 1492 . . . . . . 7 (𝜑 → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
5531, 54eqbrtrd 5131 . . . . . 6 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
56 fveq2 6882 . . . . . . 7 (𝑦 = (𝐸𝐴) → (𝑀𝑦) = (𝑀‘(𝐸𝐴)))
57 simpr 490 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝐸𝐴) = ∅)
5857fveq2d 6886 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝑀‘(𝐸𝐴)) = (𝑀‘∅))
59 carsgsiga.1 . . . . . . . . 9 (𝜑 → (𝑀‘∅) = 0)
6059ad2antrr 739 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝑀‘∅) = 0)
6158, 60eqtrd 2797 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝑀‘(𝐸𝐴)) = 0)
62 carsgclctunlem2.1 . . . . . . . . 9 (𝜑Disj 𝑘 ∈ ℕ 𝐴)
63 disjin 33046 . . . . . . . . 9 (Disj 𝑘 ∈ ℕ 𝐴Disj 𝑘 ∈ ℕ (𝐴𝐸))
6462, 63syl 18 . . . . . . . 8 (𝜑Disj 𝑘 ∈ ℕ (𝐴𝐸))
65 incom 4158 . . . . . . . . . 10 (𝐴𝐸) = (𝐸𝐴)
6665rgenw 3082 . . . . . . . . 9 𝑘 ∈ ℕ (𝐴𝐸) = (𝐸𝐴)
67 disjeq2 5078 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐴𝐸) = (𝐸𝐴) → (Disj 𝑘 ∈ ℕ (𝐴𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸𝐴)))
6866, 67ax-mp 5 . . . . . . . 8 (Disj 𝑘 ∈ ℕ (𝐴𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸𝐴))
6964, 68sylib 221 . . . . . . 7 (𝜑Disj 𝑘 ∈ ℕ (𝐸𝐴))
7056, 6, 22, 9, 61, 69esumrnmpt2 34565 . . . . . 6 (𝜑 → Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦) = Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)))
7155, 70breqtrd 5135 . . . . 5 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ≤ Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)))
72 carsgval.1 . . . . . . . 8 (𝜑𝑂𝑉)
73 difssd 4087 . . . . . . . 8 (𝜑 → (𝐸 𝑘 ∈ ℕ 𝐴) ⊆ 𝐸)
74 carsgsiga.3 . . . . . . . 8 ((𝜑𝑥𝑦𝑦 ∈ 𝒫 𝑂) → (𝑀𝑥) ≤ (𝑀𝑦))
7572, 4, 73, 7, 74carsgmon 34812 . . . . . . 7 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀𝐸))
7614, 17, 75xrge0subcld 33221 . . . . . 6 (𝜑 → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ∈ (0[,]+∞))
774adantr 486 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
787adantr 486 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
7978elpwincl1 32986 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8077, 79ffvelcdmd 7081 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
813, 80sselid 3932 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
82 xrge0neqmnf 13507 . . . . . . . . . . 11 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8380, 82syl 18 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8478elpwdifcl 32987 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8577, 84ffvelcdmd 7081 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
863, 85sselid 3932 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
87 xrge0neqmnf 13507 . . . . . . . . . . 11 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8885, 87syl 18 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8986xnegcld 13354 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
90 xnegneg 13268 . . . . . . . . . . . . . . . . 17 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
9186, 90syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
9291adantr 486 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
93 xnegeq 13261 . . . . . . . . . . . . . . . . 17 (-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞ → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -𝑒-∞)
9493adantl 487 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -𝑒-∞)
95 xnegmnf 13264 . . . . . . . . . . . . . . . 16 -𝑒-∞ = +∞
9694, 95eqtrdi 2813 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9792, 96eqtr3d 2799 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9897oveq2d 7432 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞))
99 simpll 779 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝜑)
100 fz1ssnn 13612 . . . . . . . . . . . . . . . . . . . . . . 23 (1...𝑛) ⊆ ℕ
101100a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑛 ∈ ℕ) → (1...𝑛) ⊆ ℕ)
102101sselda 3934 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝑘 ∈ ℕ)
103 carsgclctunlem2.2 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘 ∈ ℕ) → 𝐴 ∈ (toCaraSiga‘𝑀))
10499, 102, 103syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝐴 ∈ (toCaraSiga‘𝑀))
105104ralrimiva 3156 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → ∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
106 dfiun3g 5956 . . . . . . . . . . . . . . . . . . 19 (∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) → 𝑘 ∈ (1...𝑛)𝐴 = ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))
107105, 106syl 18 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑛 ∈ ℕ) → 𝑘 ∈ (1...𝑛)𝐴 = ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))
10872adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → 𝑂𝑉)
10959adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → (𝑀‘∅) = 0)
110513adant1r 1196 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦))
111 fzfi 14038 . . . . . . . . . . . . . . . . . . . . 21 (1...𝑛) ∈ Fin
112 mptfi 9321 . . . . . . . . . . . . . . . . . . . . 21 ((1...𝑛) ∈ Fin → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
113 rnfi 9310 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
114111, 112, 113mp2b 10 . . . . . . . . . . . . . . . . . . . 20 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin
115114a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
116 eqid 2762 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝑛) ↦ 𝐴) = (𝑘 ∈ (1...𝑛) ↦ 𝐴)
117116rnmptss 7119 . . . . . . . . . . . . . . . . . . . 20 (∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
118105, 117syl 18 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
119108, 77, 109, 110, 115, 118fiunelcarsg 34814 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ (toCaraSiga‘𝑀))
120107, 119eqeltrd 2862 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ) → 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
121108, 77elcarsg 34803 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ) → ( 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) ↔ ( 𝑘 ∈ (1...𝑛)𝐴𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒))))
122120, 121mpbid 235 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → ( 𝑘 ∈ (1...𝑛)𝐴𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒)))
123122simprd 501 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ) → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒))
124 ineq1 4162 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 𝑘 ∈ (1...𝑛)𝐴))
125124fveq2d 6886 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
126 difeq1 4070 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 𝑘 ∈ (1...𝑛)𝐴))
127126fveq2d 6886 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
128125, 127oveq12d 7434 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → ((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))))
129 fveq2 6882 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → (𝑀𝑒) = (𝑀𝐸))
130128, 129eqeq12d 2778 . . . . . . . . . . . . . . . 16 (𝑒 = 𝐸 → (((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒) ↔ ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸)))
131130rspcv 3575 . . . . . . . . . . . . . . 15 (𝐸 ∈ 𝒫 𝑂 → (∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸)))
13278, 123, 131sylc 66 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸))
133132adantr 486 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸))
134 xaddpnf1 13280 . . . . . . . . . . . . . . 15 (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞) = +∞)
13581, 83, 134syl2anc 596 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞) = +∞)
136135adantr 486 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞) = +∞)
13798, 133, 1363eqtr3d 2805 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀𝐸) = +∞)
138 carsgclctunlem2.4 . . . . . . . . . . . . . 14 (𝜑 → (𝑀𝐸) ≠ +∞)
139138ad2antrr 739 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀𝐸) ≠ +∞)
140139neneqd 2962 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ¬ (𝑀𝐸) = +∞)
141137, 140pm2.65da 829 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → ¬ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞)
142141neqned 2964 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
143 xaddass 13303 . . . . . . . . . 10 ((((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) ∧ ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) ∧ (-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))))
14481, 83, 86, 88, 89, 142, 143syl222anc 1413 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))))
145 xnegid 13292 . . . . . . . . . . 11 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = 0)
14686, 145syl 18 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = 0)
147146oveq2d 7432 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 0))
148 xaddrid 13295 . . . . . . . . . 10 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 0) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
14981, 148syl 18 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 0) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
150144, 147, 1493eqtrd 2801 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
151132oveq1d 7431 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))))
152107ineq2d 4169 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)))
153152fveq2d 6886 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))))
154 mptss 6042 . . . . . . . . . . . . 13 ((1...𝑛) ⊆ ℕ → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴))
155 rnss 5927 . . . . . . . . . . . . 13 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
156100, 154, 155mp2b 10 . . . . . . . . . . . 12 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴)
157156a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
158 disjrnmpt 33045 . . . . . . . . . . . . 13 (Disj 𝑘 ∈ ℕ 𝐴Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
15962, 158syl 18 . . . . . . . . . . . 12 (𝜑Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
160159adantr 486 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
161 disjss1 5080 . . . . . . . . . . 11 (ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴) → (Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦Disj 𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)𝑦))
162157, 160, 161sylc 66 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → Disj 𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)𝑦)
163108, 77, 109, 110, 115, 118, 162, 78carsgclctunlem1 34815 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))) = Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸𝑦)))
164 ineq2 4163 . . . . . . . . . . 11 (𝑦 = 𝐴 → (𝐸𝑦) = (𝐸𝐴))
165164fveq2d 6886 . . . . . . . . . 10 (𝑦 = 𝐴 → (𝑀‘(𝐸𝑦)) = (𝑀‘(𝐸𝐴)))
166111elexi 3475 . . . . . . . . . . 11 (1...𝑛) ∈ V
167166a1i 11 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (1...𝑛) ∈ V)
16899, 102, 22syl2anc 596 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
169 inss2 4186 . . . . . . . . . . . . . . 15 (𝐸𝐴) ⊆ 𝐴
170 sseq2 3960 . . . . . . . . . . . . . . 15 (𝐴 = ∅ → ((𝐸𝐴) ⊆ 𝐴 ↔ (𝐸𝐴) ⊆ ∅))
171169, 170mpbii 236 . . . . . . . . . . . . . 14 (𝐴 = ∅ → (𝐸𝐴) ⊆ ∅)
172 ss0 4355 . . . . . . . . . . . . . 14 ((𝐸𝐴) ⊆ ∅ → (𝐸𝐴) = ∅)
173171, 172syl 18 . . . . . . . . . . . . 13 (𝐴 = ∅ → (𝐸𝐴) = ∅)
174173adantl 487 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝐸𝐴) = ∅)
175174fveq2d 6886 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸𝐴)) = (𝑀‘∅))
176109ad2antrr 739 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘∅) = 0)
177175, 176eqtrd 2797 . . . . . . . . . 10 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸𝐴)) = 0)
17862adantr 486 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → Disj 𝑘 ∈ ℕ 𝐴)
179 disjss1 5080 . . . . . . . . . . 11 ((1...𝑛) ⊆ ℕ → (Disj 𝑘 ∈ ℕ 𝐴Disj 𝑘 ∈ (1...𝑛)𝐴))
180101, 178, 179sylc 66 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → Disj 𝑘 ∈ (1...𝑛)𝐴)
181165, 167, 168, 104, 177, 180esumrnmpt2 34565 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸𝑦)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)))
182153, 163, 1813eqtrd 2801 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)))
183150, 151, 1823eqtr3rd 2806 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)) = ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))))
18417adantr 486 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
1853, 184sselid 3932 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
186185xnegcld 13354 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
18715adantr 486 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝑀𝐸) ∈ ℝ*)
188 iunss1 4969 . . . . . . . . . . . 12 ((1...𝑛) ⊆ ℕ → 𝑘 ∈ (1...𝑛)𝐴 𝑘 ∈ ℕ 𝐴)
189100, 188mp1i 14 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝑘 ∈ (1...𝑛)𝐴 𝑘 ∈ ℕ 𝐴)
190189sscond 4096 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ ℕ 𝐴) ⊆ (𝐸 𝑘 ∈ (1...𝑛)𝐴))
191743adant1r 1196 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝑦𝑦 ∈ 𝒫 𝑂) → (𝑀𝑥) ≤ (𝑀𝑦))
192108, 77, 190, 84, 191carsgmon 34812 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
193 xleneg 13272 . . . . . . . . . 10 (((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*) → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ↔ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
194193biimpa 482 . . . . . . . . 9 ((((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)))
195185, 86, 192, 194syl21anc 851 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)))
196 xleadd2a 13308 . . . . . . . 8 (((-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀𝐸) ∈ ℝ*) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
19789, 186, 187, 195, 196syl31anc 1400 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
198183, 197eqbrtrd 5131 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
19976, 22, 198esumgect 34587 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
20012, 27, 20, 71, 199xrletrd 13215 . . . 4 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
2012, 200eqbrtrrid 5145 . . 3 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
202 xleadd1a 13307 . . 3 ((((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)))) → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
20313, 20, 18, 201, 202syl31anc 1400 . 2 (𝜑 → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
204 xrge0npcan 33447 . . 3 (((𝑀𝐸) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀𝐸)) → (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) = (𝑀𝐸))
20514, 17, 75, 204syl3anc 1398 . 2 (𝜑 → (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) = (𝑀𝐸))
206203, 205breqtrd 5135 1 (𝜑 → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ≤ (𝑀𝐸))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2145  wne 2957  wral 3078  Vcvv 3453  cdif 3899  cin 3901  wss 3902  c0 4282  𝒫 cpw 4560   cuni 4870   ciun 4954  Disj wdisj 5074   class class class wbr 5107  cmpt 5190  ran crn 5660  wf 6533  cfv 6537  (class class class)co 7416  ωcom 7865  cdom 8953  Fincfn 8955  0cc0 11127  1c1 11128  +∞cpnf 11267  -∞cmnf 11268  *cxr 11269  cle 11271  cn 12260  -𝑒cxne 13162   +𝑒 cxad 13163  [,]cicc 13403  ...cfz 13563  Σ*cesum 34524  toCaraSigaccarsg 34799
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7739  ax-inf2 9623  ax-cnex 11183  ax-resscn 11184  ax-1cn 11185  ax-icn 11186  ax-addcl 11187  ax-addrcl 11188  ax-mulcl 11189  ax-mulrcl 11190  ax-mulcom 11191  ax-addass 11192  ax-mulass 11193  ax-distr 11194  ax-i2m1 11195  ax-1ne0 11196  ax-1rid 11197  ax-rnegex 11198  ax-rrecex 11199  ax-cnre 11200  ax-pre-lttri 11201  ax-pre-lttrn 11202  ax-pre-ltadd 11203  ax-pre-mulgt0 11204  ax-pre-sup 11205  ax-addf 11206  ax-mulf 11207
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  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 3367  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-tp 4592  df-op 4594  df-uni 4871  df-int 4911  df-iun 4956  df-iin 4957  df-disj 5075  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-se 5613  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-of 7681  df-om 7866  df-1st 7989  df-2nd 7990  df-supp 8162  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8458  df-2o 8459  df-er 8699  df-map 8831  df-pm 8832  df-ixp 8908  df-en 8956  df-dom 8957  df-sdom 8958  df-fin 8959  df-fsupp 9335  df-fi 9384  df-sup 9415  df-inf 9416  df-oi 9485  df-dju 9909  df-card 9947  df-acn 9950  df-pnf 11272  df-mnf 11273  df-xr 11274  df-ltxr 11275  df-le 11276  df-sub 11470  df-neg 11471  df-div 11899  df-nn 12261  df-2 12330  df-3 12331  df-4 12332  df-5 12333  df-6 12334  df-7 12335  df-8 12336  df-9 12337  df-n0 12532  df-z 12619  df-dec 12740  df-uz 12891  df-q 13001  df-rp 13045  df-xneg 13165  df-xadd 13166  df-xmul 13167  df-ioo 13404  df-ioc 13405  df-ico 13406  df-icc 13407  df-fz 13564  df-fzo 13712  df-fl 13855  df-mod 13933  df-seq 14068  df-exp 14128  df-fac 14340  df-bc 14369  df-hash 14397  df-shft 15142  df-cj 15188  df-re 15189  df-im 15190  df-sqrt 15324  df-abs 15325  df-limsup 15560  df-clim 15577  df-rlim 15578  df-sum 15776  df-ef 16157  df-sin 16159  df-cos 16160  df-pi 16162  df-struct 17243  df-sets 17260  df-slot 17278  df-ndx 17290  df-base 17306  df-ress 17327  df-plusg 17359  df-mulr 17360  df-starv 17361  df-sca 17362  df-vsca 17363  df-ip 17364  df-tset 17365  df-ple 17366  df-ds 17368  df-unif 17369  df-hom 17370  df-cco 17371  df-rest 17511  df-topn 17512  df-0g 17530  df-gsum 17531  df-topgen 17532  df-pt 17533  df-prds 17536  df-ordt 17591  df-xrs 17592  df-qtop 17597  df-imas 17598  df-xps 17600  df-mre 17674  df-mrc 17675  df-acs 17677  df-ps 18658  df-tsr 18659  df-plusf 18733  df-mgm 18734  df-sgrp 18823  df-mnd 18839  df-mhm 18892  df-submnd 18893  df-grp 19061  df-minusg 19062  df-sbg 19063  df-mulg 19192  df-subg 19247  df-cntz 19445  df-cmn 19910  df-abl 19911  df-mgp 20275  df-rng 20289  df-ur 20322  df-ring 20375  df-cring 20376  df-subrng 20709  df-subrg 20733  df-abv 20976  df-lmod 21047  df-scaf 21048  df-sra 21358  df-rgmod 21359  df-psmet 21578  df-xmet 21579  df-met 21580  df-bl 21581  df-mopn 21582  df-fbas 21583  df-fg 21584  df-cnfld 21587  df-top 23120  df-topon 23137  df-topsp 23159  df-bases 23172  df-cld 23245  df-ntr 23246  df-cls 23247  df-nei 23324  df-lp 23362  df-perf 23363  df-cn 23453  df-cnp 23454  df-haus 23541  df-tx 23789  df-hmeo 23982  df-fil 24073  df-fm 24165  df-flim 24166  df-flf 24167  df-tmd 24299  df-tgp 24300  df-tsms 24354  df-trg 24387  df-xms 24547  df-ms 24548  df-tms 24549  df-nm 24809  df-ngp 24810  df-nrg 24812  df-nlm 24813  df-ii 25106  df-cncf 25107  df-limc 26095  df-dv 26096  df-log 26791  df-esum 34525  df-carsg 34800
This theorem is used by:  carsgclctunlem3  34818
  Copyright terms: Public domain W3C validator