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 34460
Description: Lemma for carsgclctun 34462. (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 5014 . . . . 5 𝑘 ∈ ℕ (𝐸𝐴) = (𝐸 𝑘 ∈ ℕ 𝐴)
21fveq2i 6841 . . . 4 (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) = (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))
3 iccssxr 13380 . . . . 5 (0[,]+∞) ⊆ ℝ*
4 carsgval.2 . . . . . 6 (𝜑𝑀:𝒫 𝑂⟶(0[,]+∞))
5 nnex 12177 . . . . . . . 8 ℕ ∈ V
65a1i 11 . . . . . . 7 (𝜑 → ℕ ∈ V)
7 carsgclctunlem2.3 . . . . . . . . 9 (𝜑𝐸 ∈ 𝒫 𝑂)
87adantr 480 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
98elpwincl1 32592 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (𝐸𝐴) ∈ 𝒫 𝑂)
106, 9elpwiuncl 32594 . . . . . 6 (𝜑 𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂)
114, 10ffvelcdmd 7035 . . . . 5 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ∈ (0[,]+∞))
123, 11sselid 3920 . . . 4 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ∈ ℝ*)
132, 12eqeltrrid 2842 . . 3 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
144, 7ffvelcdmd 7035 . . . . 5 (𝜑 → (𝑀𝐸) ∈ (0[,]+∞))
153, 14sselid 3920 . . . 4 (𝜑 → (𝑀𝐸) ∈ ℝ*)
167elpwdifcl 32593 . . . . . . 7 (𝜑 → (𝐸 𝑘 ∈ ℕ 𝐴) ∈ 𝒫 𝑂)
174, 16ffvelcdmd 7035 . . . . . 6 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
183, 17sselid 3920 . . . . 5 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
1918xnegcld 13249 . . . 4 (𝜑 → -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
2015, 19xaddcld 13250 . . 3 (𝜑 → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ∈ ℝ*)
214adantr 480 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
2221, 9ffvelcdmd 7035 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
2322ralrimiva 3130 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
24 nfcv 2899 . . . . . . . 8 𝑘
2524esumcl 34171 . . . . . . 7 ((ℕ ∈ V ∧ ∀𝑘 ∈ ℕ (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞)) → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
266, 23, 25syl2anc 585 . . . . . 6 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
273, 26sselid 3920 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ∈ ℝ*)
289ralrimiva 3130 . . . . . . . . 9 (𝜑 → ∀𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂)
29 dfiun3g 5921 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂 𝑘 ∈ ℕ (𝐸𝐴) = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)))
3028, 29syl 17 . . . . . . . 8 (𝜑 𝑘 ∈ ℕ (𝐸𝐴) = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)))
3130fveq2d 6842 . . . . . . 7 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) = (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))))
32 nnct 13940 . . . . . . . . . 10 ℕ ≼ ω
33 mptct 10457 . . . . . . . . . 10 (ℕ ≼ ω → (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω)
34 rnct 10444 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω)
3532, 33, 34mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω
3635a1i 11 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω)
37 eqid 2737 . . . . . . . . . 10 (𝑘 ∈ ℕ ↦ (𝐸𝐴)) = (𝑘 ∈ ℕ ↦ (𝐸𝐴))
3837rnmptss 7073 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸𝐴) ∈ 𝒫 𝑂 → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂)
3928, 38syl 17 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂)
40 mptexg 7173 . . . . . . . . . 10 (ℕ ∈ V → (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V)
41 rnexg 7850 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V → ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V)
425, 40, 41mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V
43 breq1 5089 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (𝑥 ≼ ω ↔ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω))
44 sseq1 3948 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (𝑥 ⊆ 𝒫 𝑂 ↔ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂))
4543, 443anbi23d 1442 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → ((𝜑𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) ↔ (𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂)))
46 unieq 4862 . . . . . . . . . . . . 13 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → 𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)))
4746fveq2d 6842 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (𝑀 𝑥) = (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))))
48 esumeq1 34175 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → Σ*𝑦𝑥(𝑀𝑦) = Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
4947, 48breq12d 5099 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → ((𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦) ↔ (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦)))
5045, 49imbi12d 344 . . . . . . . . . 10 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) → (((𝜑𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦)) ↔ ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂) → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))))
51 carsgsiga.2 . . . . . . . . . 10 ((𝜑𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦))
5250, 51vtoclg 3500 . . . . . . . . 9 (ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ∈ V → ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂) → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦)))
5342, 52ax-mp 5 . . . . . . . 8 ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴)) ⊆ 𝒫 𝑂) → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
5436, 39, 53mpd3an23 1466 . . . . . . 7 (𝜑 → (𝑀 ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
5531, 54eqbrtrd 5108 . . . . . 6 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦))
56 fveq2 6838 . . . . . . 7 (𝑦 = (𝐸𝐴) → (𝑀𝑦) = (𝑀‘(𝐸𝐴)))
57 simpr 484 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝐸𝐴) = ∅)
5857fveq2d 6842 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝑀‘(𝐸𝐴)) = (𝑀‘∅))
59 carsgsiga.1 . . . . . . . . 9 (𝜑 → (𝑀‘∅) = 0)
6059ad2antrr 727 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝑀‘∅) = 0)
6158, 60eqtrd 2772 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ (𝐸𝐴) = ∅) → (𝑀‘(𝐸𝐴)) = 0)
62 carsgclctunlem2.1 . . . . . . . . 9 (𝜑Disj 𝑘 ∈ ℕ 𝐴)
63 disjin 32653 . . . . . . . . 9 (Disj 𝑘 ∈ ℕ 𝐴Disj 𝑘 ∈ ℕ (𝐴𝐸))
6462, 63syl 17 . . . . . . . 8 (𝜑Disj 𝑘 ∈ ℕ (𝐴𝐸))
65 incom 4150 . . . . . . . . . 10 (𝐴𝐸) = (𝐸𝐴)
6665rgenw 3056 . . . . . . . . 9 𝑘 ∈ ℕ (𝐴𝐸) = (𝐸𝐴)
67 disjeq2 5057 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐴𝐸) = (𝐸𝐴) → (Disj 𝑘 ∈ ℕ (𝐴𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸𝐴)))
6866, 67ax-mp 5 . . . . . . . 8 (Disj 𝑘 ∈ ℕ (𝐴𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸𝐴))
6964, 68sylib 218 . . . . . . 7 (𝜑Disj 𝑘 ∈ ℕ (𝐸𝐴))
7056, 6, 22, 9, 61, 69esumrnmpt2 34209 . . . . . 6 (𝜑 → Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸𝐴))(𝑀𝑦) = Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)))
7155, 70breqtrd 5112 . . . . 5 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ≤ Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)))
72 carsgval.1 . . . . . . . 8 (𝜑𝑂𝑉)
73 difssd 4078 . . . . . . . 8 (𝜑 → (𝐸 𝑘 ∈ ℕ 𝐴) ⊆ 𝐸)
74 carsgsiga.3 . . . . . . . 8 ((𝜑𝑥𝑦𝑦 ∈ 𝒫 𝑂) → (𝑀𝑥) ≤ (𝑀𝑦))
7572, 4, 73, 7, 74carsgmon 34455 . . . . . . 7 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀𝐸))
7614, 17, 75xrge0subcld 32833 . . . . . 6 (𝜑 → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ∈ (0[,]+∞))
774adantr 480 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
787adantr 480 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
7978elpwincl1 32592 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8077, 79ffvelcdmd 7035 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
813, 80sselid 3920 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
82 xrge0neqmnf 13402 . . . . . . . . . . 11 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8380, 82syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8478elpwdifcl 32593 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8577, 84ffvelcdmd 7035 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
863, 85sselid 3920 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
87 xrge0neqmnf 13402 . . . . . . . . . . 11 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8885, 87syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8986xnegcld 13249 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
90 xnegneg 13163 . . . . . . . . . . . . . . . . 17 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
9186, 90syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
9291adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
93 xnegeq 13156 . . . . . . . . . . . . . . . . 17 (-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞ → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -𝑒-∞)
9493adantl 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -𝑒-∞)
95 xnegmnf 13159 . . . . . . . . . . . . . . . 16 -𝑒-∞ = +∞
9694, 95eqtrdi 2788 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -𝑒-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9792, 96eqtr3d 2774 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9897oveq2d 7380 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞))
99 simpll 767 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝜑)
100 fz1ssnn 13506 . . . . . . . . . . . . . . . . . . . . . . 23 (1...𝑛) ⊆ ℕ
101100a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑛 ∈ ℕ) → (1...𝑛) ⊆ ℕ)
102101sselda 3922 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝑘 ∈ ℕ)
103 carsgclctunlem2.2 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘 ∈ ℕ) → 𝐴 ∈ (toCaraSiga‘𝑀))
10499, 102, 103syl2anc 585 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝐴 ∈ (toCaraSiga‘𝑀))
105104ralrimiva 3130 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → ∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
106 dfiun3g 5921 . . . . . . . . . . . . . . . . . . 19 (∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) → 𝑘 ∈ (1...𝑛)𝐴 = ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))
107105, 106syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑛 ∈ ℕ) → 𝑘 ∈ (1...𝑛)𝐴 = ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))
10872adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → 𝑂𝑉)
10959adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → (𝑀‘∅) = 0)
110513adant1r 1179 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀 𝑥) ≤ Σ*𝑦𝑥(𝑀𝑦))
111 fzfi 13931 . . . . . . . . . . . . . . . . . . . . 21 (1...𝑛) ∈ Fin
112 mptfi 9258 . . . . . . . . . . . . . . . . . . . . 21 ((1...𝑛) ∈ Fin → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
113 rnfi 9247 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
114111, 112, 113mp2b 10 . . . . . . . . . . . . . . . . . . . 20 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin
115114a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
116 eqid 2737 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝑛) ↦ 𝐴) = (𝑘 ∈ (1...𝑛) ↦ 𝐴)
117116rnmptss 7073 . . . . . . . . . . . . . . . . . . . 20 (∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
118105, 117syl 17 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
119108, 77, 109, 110, 115, 118fiunelcarsg 34457 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ (toCaraSiga‘𝑀))
120107, 119eqeltrd 2837 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ) → 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
121108, 77elcarsg 34446 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ) → ( 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) ↔ ( 𝑘 ∈ (1...𝑛)𝐴𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒))))
122120, 121mpbid 232 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → ( 𝑘 ∈ (1...𝑛)𝐴𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒)))
123122simprd 495 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ) → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒))
124 ineq1 4154 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 𝑘 ∈ (1...𝑛)𝐴))
125124fveq2d 6842 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
126 difeq1 4060 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 𝑘 ∈ (1...𝑛)𝐴))
127126fveq2d 6842 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
128125, 127oveq12d 7382 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → ((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))))
129 fveq2 6838 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → (𝑀𝑒) = (𝑀𝐸))
130128, 129eqeq12d 2753 . . . . . . . . . . . . . . . 16 (𝑒 = 𝐸 → (((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒) ↔ ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸)))
131130rspcv 3561 . . . . . . . . . . . . . . 15 (𝐸 ∈ 𝒫 𝑂 → (∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝑒 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝑒) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸)))
13278, 123, 131sylc 65 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸))
133132adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀𝐸))
134 xaddpnf1 13175 . . . . . . . . . . . . . . 15 (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞) = +∞)
13581, 83, 134syl2anc 585 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞) = +∞)
136135adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 +∞) = +∞)
13798, 133, 1363eqtr3d 2780 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀𝐸) = +∞)
138 carsgclctunlem2.4 . . . . . . . . . . . . . 14 (𝜑 → (𝑀𝐸) ≠ +∞)
139138ad2antrr 727 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀𝐸) ≠ +∞)
140139neneqd 2938 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ¬ (𝑀𝐸) = +∞)
141137, 140pm2.65da 817 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → ¬ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = -∞)
142141neqned 2940 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
143 xaddass 13198 . . . . . . . . . 10 ((((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) ∧ ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) ∧ (-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))))
14481, 83, 86, 88, 89, 142, 143syl222anc 1389 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))))
145 xnegid 13187 . . . . . . . . . . 11 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = 0)
14686, 145syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = 0)
147146oveq2d 7380 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))) = ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 0))
148 xaddrid 13190 . . . . . . . . . 10 ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 0) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
14981, 148syl 17 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 0) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
150144, 147, 1493eqtrd 2776 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
151132oveq1d 7379 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (((𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))))
152107ineq2d 4161 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)))
153152fveq2d 6842 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))))
154 mptss 6005 . . . . . . . . . . . . 13 ((1...𝑛) ⊆ ℕ → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴))
155 rnss 5892 . . . . . . . . . . . . 13 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
156100, 154, 155mp2b 10 . . . . . . . . . . . 12 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴)
157156a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
158 disjrnmpt 32652 . . . . . . . . . . . . 13 (Disj 𝑘 ∈ ℕ 𝐴Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
15962, 158syl 17 . . . . . . . . . . . 12 (𝜑Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
160159adantr 480 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
161 disjss1 5059 . . . . . . . . . . 11 (ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴) → (Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦Disj 𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)𝑦))
162157, 160, 161sylc 65 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → Disj 𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)𝑦)
163108, 77, 109, 110, 115, 118, 162, 78carsgclctunlem1 34458 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))) = Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸𝑦)))
164 ineq2 4155 . . . . . . . . . . 11 (𝑦 = 𝐴 → (𝐸𝑦) = (𝐸𝐴))
165164fveq2d 6842 . . . . . . . . . 10 (𝑦 = 𝐴 → (𝑀‘(𝐸𝑦)) = (𝑀‘(𝐸𝐴)))
166111elexi 3453 . . . . . . . . . . 11 (1...𝑛) ∈ V
167166a1i 11 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (1...𝑛) ∈ V)
16899, 102, 22syl2anc 585 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → (𝑀‘(𝐸𝐴)) ∈ (0[,]+∞))
169 inss2 4179 . . . . . . . . . . . . . . 15 (𝐸𝐴) ⊆ 𝐴
170 sseq2 3949 . . . . . . . . . . . . . . 15 (𝐴 = ∅ → ((𝐸𝐴) ⊆ 𝐴 ↔ (𝐸𝐴) ⊆ ∅))
171169, 170mpbii 233 . . . . . . . . . . . . . 14 (𝐴 = ∅ → (𝐸𝐴) ⊆ ∅)
172 ss0 4343 . . . . . . . . . . . . . 14 ((𝐸𝐴) ⊆ ∅ → (𝐸𝐴) = ∅)
173171, 172syl 17 . . . . . . . . . . . . 13 (𝐴 = ∅ → (𝐸𝐴) = ∅)
174173adantl 481 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝐸𝐴) = ∅)
175174fveq2d 6842 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸𝐴)) = (𝑀‘∅))
176109ad2antrr 727 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘∅) = 0)
177175, 176eqtrd 2772 . . . . . . . . . 10 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸𝐴)) = 0)
17862adantr 480 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → Disj 𝑘 ∈ ℕ 𝐴)
179 disjss1 5059 . . . . . . . . . . 11 ((1...𝑛) ⊆ ℕ → (Disj 𝑘 ∈ ℕ 𝐴Disj 𝑘 ∈ (1...𝑛)𝐴))
180101, 178, 179sylc 65 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → Disj 𝑘 ∈ (1...𝑛)𝐴)
181165, 167, 168, 104, 177, 180esumrnmpt2 34209 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸𝑦)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)))
182153, 163, 1813eqtrd 2776 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)))
183150, 151, 1823eqtr3rd 2781 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)) = ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))))
18417adantr 480 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
1853, 184sselid 3920 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
186185xnegcld 13249 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
18715adantr 480 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝑀𝐸) ∈ ℝ*)
188 iunss1 4949 . . . . . . . . . . . 12 ((1...𝑛) ⊆ ℕ → 𝑘 ∈ (1...𝑛)𝐴 𝑘 ∈ ℕ 𝐴)
189100, 188mp1i 13 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝑘 ∈ (1...𝑛)𝐴 𝑘 ∈ ℕ 𝐴)
190189sscond 4087 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐸 𝑘 ∈ ℕ 𝐴) ⊆ (𝐸 𝑘 ∈ (1...𝑛)𝐴))
191743adant1r 1179 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝑦𝑦 ∈ 𝒫 𝑂) → (𝑀𝑥) ≤ (𝑀𝑦))
192108, 77, 190, 84, 191carsgmon 34455 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)))
193 xleneg 13167 . . . . . . . . . 10 (((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*) → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ↔ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
194193biimpa 476 . . . . . . . . 9 ((((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)))
195185, 86, 192, 194syl21anc 838 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)))
196 xleadd2a 13203 . . . . . . . 8 (((-𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀𝐸) ∈ ℝ*) ∧ -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴)) ≤ -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
19789, 186, 187, 195, 196syl31anc 1376 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
198183, 197eqbrtrd 5108 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
19976, 22, 198esumgect 34231 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
20012, 27, 20, 71, 199xrletrd 13110 . . . 4 (𝜑 → (𝑀 𝑘 ∈ ℕ (𝐸𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
2012, 200eqbrtrrid 5122 . . 3 (𝜑 → (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
202 xleadd1a 13202 . . 3 ((((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ∈ ℝ* ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)))) → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
20313, 20, 18, 201, 202syl31anc 1376 . 2 (𝜑 → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))))
204 xrge0npcan 33077 . . 3 (((𝑀𝐸) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀𝐸)) → (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) = (𝑀𝐸))
20514, 17, 75, 204syl3anc 1374 . 2 (𝜑 → (((𝑀𝐸) +𝑒 -𝑒(𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) = (𝑀𝐸))
206203, 205breqtrd 5112 1 (𝜑 → ((𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴)) +𝑒 (𝑀‘(𝐸 𝑘 ∈ ℕ 𝐴))) ≤ (𝑀𝐸))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2933  wral 3052  Vcvv 3430  cdif 3887  cin 3889  wss 3890  c0 4274  𝒫 cpw 4542   cuni 4851   ciun 4934  Disj wdisj 5053   class class class wbr 5086  cmpt 5167  ran crn 5629  wf 6492  cfv 6496  (class class class)co 7364  ωcom 7814  cdom 8888  Fincfn 8890  0cc0 11035  1c1 11036  +∞cpnf 11173  -∞cmnf 11174  *cxr 11175  cle 11177  cn 12171  -𝑒cxne 13057   +𝑒 cxad 13058  [,]cicc 13298  ...cfz 13458  Σ*cesum 34168  toCaraSigaccarsg 34442
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5306  ax-pr 5374  ax-un 7686  ax-inf2 9559  ax-ac2 10382  ax-cnex 11091  ax-resscn 11092  ax-1cn 11093  ax-icn 11094  ax-addcl 11095  ax-addrcl 11096  ax-mulcl 11097  ax-mulrcl 11098  ax-mulcom 11099  ax-addass 11100  ax-mulass 11101  ax-distr 11102  ax-i2m1 11103  ax-1ne0 11104  ax-1rid 11105  ax-rnegex 11106  ax-rrecex 11107  ax-cnre 11108  ax-pre-lttri 11109  ax-pre-lttrn 11110  ax-pre-ltadd 11111  ax-pre-mulgt0 11112  ax-pre-sup 11113  ax-addf 11114  ax-mulf 11115
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-iin 4937  df-disj 5054  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5523  df-eprel 5528  df-po 5536  df-so 5537  df-fr 5581  df-se 5582  df-we 5583  df-xp 5634  df-rel 5635  df-cnv 5636  df-co 5637  df-dm 5638  df-rn 5639  df-res 5640  df-ima 5641  df-pred 6263  df-ord 6324  df-on 6325  df-lim 6326  df-suc 6327  df-iota 6452  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-isom 6505  df-riota 7321  df-ov 7367  df-oprab 7368  df-mpo 7369  df-of 7628  df-om 7815  df-1st 7939  df-2nd 7940  df-supp 8108  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-2o 8403  df-er 8640  df-map 8772  df-pm 8773  df-ixp 8843  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-fsupp 9272  df-fi 9321  df-sup 9352  df-inf 9353  df-oi 9422  df-dju 9822  df-card 9860  df-acn 9863  df-ac 10035  df-pnf 11178  df-mnf 11179  df-xr 11180  df-ltxr 11181  df-le 11182  df-sub 11376  df-neg 11377  df-div 11805  df-nn 12172  df-2 12241  df-3 12242  df-4 12243  df-5 12244  df-6 12245  df-7 12246  df-8 12247  df-9 12248  df-n0 12435  df-z 12522  df-dec 12642  df-uz 12786  df-q 12896  df-rp 12940  df-xneg 13060  df-xadd 13061  df-xmul 13062  df-ioo 13299  df-ioc 13300  df-ico 13301  df-icc 13302  df-fz 13459  df-fzo 13606  df-fl 13748  df-mod 13826  df-seq 13961  df-exp 14021  df-fac 14233  df-bc 14262  df-hash 14290  df-shft 15026  df-cj 15058  df-re 15059  df-im 15060  df-sqrt 15194  df-abs 15195  df-limsup 15430  df-clim 15447  df-rlim 15448  df-sum 15646  df-ef 16029  df-sin 16031  df-cos 16032  df-pi 16034  df-struct 17114  df-sets 17131  df-slot 17149  df-ndx 17161  df-base 17177  df-ress 17198  df-plusg 17230  df-mulr 17231  df-starv 17232  df-sca 17233  df-vsca 17234  df-ip 17235  df-tset 17236  df-ple 17237  df-ds 17239  df-unif 17240  df-hom 17241  df-cco 17242  df-rest 17382  df-topn 17383  df-0g 17401  df-gsum 17402  df-topgen 17403  df-pt 17404  df-prds 17407  df-ordt 17462  df-xrs 17463  df-qtop 17468  df-imas 17469  df-xps 17471  df-mre 17545  df-mrc 17546  df-acs 17548  df-ps 18529  df-tsr 18530  df-plusf 18604  df-mgm 18605  df-sgrp 18684  df-mnd 18700  df-mhm 18748  df-submnd 18749  df-grp 18909  df-minusg 18910  df-sbg 18911  df-mulg 19041  df-subg 19096  df-cntz 19289  df-cmn 19754  df-abl 19755  df-mgp 20119  df-rng 20131  df-ur 20160  df-ring 20213  df-cring 20214  df-subrng 20520  df-subrg 20544  df-abv 20783  df-lmod 20854  df-scaf 20855  df-sra 21165  df-rgmod 21166  df-psmet 21341  df-xmet 21342  df-met 21343  df-bl 21344  df-mopn 21345  df-fbas 21346  df-fg 21347  df-cnfld 21350  df-top 22856  df-topon 22873  df-topsp 22895  df-bases 22908  df-cld 22981  df-ntr 22982  df-cls 22983  df-nei 23060  df-lp 23098  df-perf 23099  df-cn 23189  df-cnp 23190  df-haus 23277  df-tx 23524  df-hmeo 23717  df-fil 23808  df-fm 23900  df-flim 23901  df-flf 23902  df-tmd 24034  df-tgp 24035  df-tsms 24089  df-trg 24122  df-xms 24282  df-ms 24283  df-tms 24284  df-nm 24544  df-ngp 24545  df-nrg 24547  df-nlm 24548  df-ii 24841  df-cncf 24842  df-limc 25830  df-dv 25831  df-log 26517  df-esum 34169  df-carsg 34443
This theorem is referenced by:  carsgclctunlem3  34461
  Copyright terms: Public domain W3C validator