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 35021
Description: Lemma for carsgclctun 35023. (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 (𝜑 → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ≤ (𝑀‘𝐸))
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 5032 . . . . 5 ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) = (𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)
21fveq2i 6911 . . . 4 (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴))
3 iccssxr 13588 . . . . 5 (0[,]+∞) ⊆ ℝ*
4 carsgval.2 . . . . . 6 (𝜑 → 𝑀:𝒫 𝑂⟶(0[,]+∞))
5 nnex 12368 . . . . . . . 8 ℕ ∈ V
65a1i 11 . . . . . . 7 (𝜑 → ℕ ∈ V)
7 carsgclctunlem2.3 . . . . . . . . 9 (𝜑 → 𝐸 ∈ 𝒫 𝑂)
87adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
98elpwincl1 33193 . . . . . . 7 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂)
106, 9elpwiuncl 33195 . . . . . 6 (𝜑 → ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂)
114, 10ffvelcdmd 7109 . . . . 5 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
123, 11sselid 3911 . . . 4 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ∈ ℝ*)
132, 12eqeltrrid 2869 . . 3 (𝜑 → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
144, 7ffvelcdmd 7109 . . . . 5 (𝜑 → (𝑀‘𝐸) ∈ (0[,]+∞))
153, 14sselid 3911 . . . 4 (𝜑 → (𝑀‘𝐸) ∈ ℝ*)
167elpwdifcl 33194 . . . . . . 7 (𝜑 → (𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴) ∈ 𝒫 𝑂)
174, 16ffvelcdmd 7109 . . . . . 6 (𝜑 → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
183, 17sselid 3911 . . . . 5 (𝜑 → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
1918xnegcld 13457 . . . 4 (𝜑 → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
2015, 19xaddcld 13458 . . 3 (𝜑 → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ∈ ℝ*)
214adantr 486 . . . . . . . . 9 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
2221, 9ffvelcdmd 7109 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
2322ralrimiva 3158 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
24 nfcv 2926 . . . . . . . 8 Ⅎ𝑘ℕ
2524esumcl 34732 . . . . . . 7 ((ℕ ∈ V ∧ ∀𝑘 ∈ ℕ (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞)) → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
266, 23, 25syl2anc 596 . . . . . 6 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
273, 26sselid 3911 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ∈ ℝ*)
289ralrimiva 3158 . . . . . . . . 9 (𝜑 → ∀𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂)
29 dfiun3g 5957 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂 → ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) = ∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)))
3028, 29syl 18 . . . . . . . 8 (𝜑 → ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) = ∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)))
3130fveq2d 6912 . . . . . . 7 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) = (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))))
32 nnct 14151 . . . . . . . . . 10 ℕ ≼ ω
33 mptct 10649 . . . . . . . . . 10 (ℕ ≼ ω → (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω)
34 rnct 10631 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω)
3532, 33, 34mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω
3635a1i 11 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω)
37 eqid 2763 . . . . . . . . . 10 (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) = (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))
3837rnmptss 7147 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂 → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂)
3928, 38syl 18 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂)
40 mptexg 7250 . . . . . . . . . 10 (ℕ ∈ V → (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V)
41 rnexg 7938 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V)
425, 40, 41mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V
43 breq1 5109 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (𝑥 ≼ ω ↔ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω))
44 sseq1 3938 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (𝑥 ⊆ 𝒫 𝑂 ↔ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂))
4543, 443anbi23d 1468 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → ((𝜑 ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) ↔ (𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂)))
46 unieq 4881 . . . . . . . . . . . . 13 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → ∪ 𝑥 = ∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)))
4746fveq2d 6912 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (𝑀‘∪ 𝑥) = (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))))
48 esumeq1 34736 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → Σ*𝑦 ∈ 𝑥(𝑀‘𝑦) = Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))
4947, 48breq12d 5119 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → ((𝑀‘∪ 𝑥) ≤ Σ*𝑦 ∈ 𝑥(𝑀‘𝑦) ↔ (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦)))
5045, 49imbi12d 347 . . . . . . . . . 10 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (((𝜑 ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀‘∪ 𝑥) ≤ Σ*𝑦 ∈ 𝑥(𝑀‘𝑦)) ↔ ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂) → (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))))
51 carsgsiga.2 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀‘∪ 𝑥) ≤ Σ*𝑦 ∈ 𝑥(𝑀‘𝑦))
5250, 51vtoclg 3521 . . . . . . . . 9 (ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V → ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂) → (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦)))
5342, 52ax-mp 5 . . . . . . . 8 ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂) → (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))
5436, 39, 53mpd3an23 1493 . . . . . . 7 (𝜑 → (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))
5531, 54eqbrtrd 5130 . . . . . 6 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))
56 fveq2 6908 . . . . . . 7 (𝑦 = (𝐸 ∩ 𝐴) → (𝑀‘𝑦) = (𝑀‘(𝐸 ∩ 𝐴)))
57 simpr 490 . . . . . . . . 9 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝐸 ∩ 𝐴) = ∅)
5857fveq2d 6912 . . . . . . . 8 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = (𝑀‘∅))
59 carsgsiga.1 . . . . . . . . 9 (𝜑 → (𝑀‘∅) = 0)
6059ad2antrr 739 . . . . . . . 8 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝑀‘∅) = 0)
6158, 60eqtrd 2798 . . . . . . 7 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = 0)
62 carsgclctunlem2.1 . . . . . . . . 9 (𝜑 → Disj 𝑘 ∈ ℕ 𝐴)
63 disjin 33252 . . . . . . . . 9 (Disj 𝑘 ∈ ℕ 𝐴 → Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸))
6462, 63syl 18 . . . . . . . 8 (𝜑 → Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸))
65 incom 4109 . . . . . . . . . 10 (𝐴 ∩ 𝐸) = (𝐸 ∩ 𝐴)
6665rgenw 3084 . . . . . . . . 9 ∀𝑘 ∈ ℕ (𝐴 ∩ 𝐸) = (𝐸 ∩ 𝐴)
67 disjeq2 5077 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐴 ∩ 𝐸) = (𝐸 ∩ 𝐴) → (Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)))
6866, 67ax-mp 5 . . . . . . . 8 (Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸 ∩ 𝐴))
6964, 68sylib 221 . . . . . . 7 (𝜑 → Disj 𝑘 ∈ ℕ (𝐸 ∩ 𝐴))
7056, 6, 22, 9, 61, 69esumrnmpt2 34770 . . . . . 6 (𝜑 → Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦) = Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)))
7155, 70breqtrd 5134 . . . . 5 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ≤ Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)))
72 carsgval.1 . . . . . . . 8 (𝜑 → 𝑂 ∈ 𝑉)
73 difssd 4076 . . . . . . . 8 (𝜑 → (𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴) ⊆ 𝐸)
74 carsgsiga.3 . . . . . . . 8 ((𝜑 ∧ 𝑥 ⊆ 𝑦 ∧ 𝑦 ∈ 𝒫 𝑂) → (𝑀‘𝑥) ≤ (𝑀‘𝑦))
7572, 4, 73, 7, 74carsgmon 35016 . . . . . . 7 (𝜑 → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘𝐸))
7614, 17, 75xrge0subcld 33425 . . . . . 6 (𝜑 → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ∈ (0[,]+∞))
774adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
787adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
7978elpwincl1 33193 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8077, 79ffvelcdmd 7109 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
813, 80sselid 3911 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
82 xrge0neqmnf 13610 . . . . . . . . . . 11 ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8380, 82syl 18 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8478elpwdifcl 33194 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8577, 84ffvelcdmd 7109 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
863, 85sselid 3911 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
87 xrge0neqmnf 13610 . . . . . . . . . . 11 ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8885, 87syl 18 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8986xnegcld 13457 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
90 xnegneg 13371 . . . . . . . . . . . . . . . . 17 ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
9186, 90syl 18 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
9291adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
93 xnegeq 13364 . . . . . . . . . . . . . . . . 17 ( -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞ → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -e-∞)
9493adantl 487 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -e-∞)
95 xnegmnf 13367 . . . . . . . . . . . . . . . 16 -e-∞ = +∞
9694, 95eqtrdi 2814 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9792, 96eqtr3d 2800 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9897oveq2d 7459 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞))
99 simpll 779 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝜑)
100 fz1ssnn 13716 . . . . . . . . . . . . . . . . . . . . . . 23 (1...𝑛) ⊆ ℕ
101100a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑛 ∈ ℕ) → (1...𝑛) ⊆ ℕ)
102101sselda 3913 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝑘 ∈ ℕ)
103 carsgclctunlem2.2 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐴 ∈ (toCaraSiga‘𝑀))
10499, 102, 103syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝐴 ∈ (toCaraSiga‘𝑀))
105104ralrimiva 3158 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
106 dfiun3g 5957 . . . . . . . . . . . . . . . . . . 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 14142 . . . . . . . . . . . . . . . . . . . . 21 (1...𝑛) ∈ Fin
112 mptfi 9368 . . . . . . . . . . . . . . . . . . . . 21 ((1...𝑛) ∈ Fin → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
113 rnfi 9357 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
114111, 112, 113mp2b 10 . . . . . . . . . . . . . . . . . . . 20 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin
115114a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
116 eqid 2763 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝑛) ↦ 𝐴) = (𝑘 ∈ (1...𝑛) ↦ 𝐴)
117116rnmptss 7147 . . . . . . . . . . . . . . . . . . . 20 (∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
118105, 117syl 18 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
119108, 77, 109, 110, 115, 118fiunelcarsg 35018 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ (toCaraSiga‘𝑀))
120107, 119eqeltrd 2864 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
121108, 77elcarsg 35007 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑛 ∈ ℕ) → (∪ 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) ↔ (∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒))))
122120, 121mpbid 235 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑛 ∈ ℕ) → (∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒)))
123122simprd 501 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒))
124 ineq1 4113 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴))
125124fveq2d 6912 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
126 difeq1 4059 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))
127126fveq2d 6912 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
128125, 127oveq12d 7461 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → ((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))))
129 fveq2 6908 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → (𝑀‘𝑒) = (𝑀‘𝐸))
130128, 129eqeq12d 2779 . . . . . . . . . . . . . . . 16 (𝑒 = 𝐸 → (((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒) ↔ ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝐸)))
131130rspcv 3576 . . . . . . . . . . . . . . 15 (𝐸 ∈ 𝒫 𝑂 → (∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝐸)))
13278, 123, 131sylc 66 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝐸))
133132adantr 486 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝐸))
134 xaddpnf1 13383 . . . . . . . . . . . . . . 15 (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞) = +∞)
13581, 83, 134syl2anc 596 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞) = +∞)
136135adantr 486 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞) = +∞)
13798, 133, 1363eqtr3d 2806 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘𝐸) = +∞)
138 carsgclctunlem2.4 . . . . . . . . . . . . . 14 (𝜑 → (𝑀‘𝐸) ≠ +∞)
139138ad2antrr 739 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘𝐸) ≠ +∞)
140139neneqd 2964 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ¬ (𝑀‘𝐸) = +∞)
141137, 140pm2.65da 829 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → ¬ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞)
142141neqned 2966 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
143 xaddass 13406 . . . . . . . . . 10 ((((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) ∧ ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) ∧ ( -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)) → (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))))
14481, 83, 86, 88, 89, 142, 143syl222anc 1414 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))))
145 xnegid 13395 . . . . . . . . . . 11 ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = 0)
14686, 145syl 18 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = 0)
147146oveq2d 7459 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e 0))
148 xaddrid 13398 . . . . . . . . . 10 ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e 0) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
14981, 148syl 18 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e 0) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
150144, 147, 1493eqtrd 2802 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
151132oveq1d 7458 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))))
152107ineq2d 4120 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ∩ ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)))
153152fveq2d 6912 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∩ ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))))
154 mptss 6046 . . . . . . . . . . . . 13 ((1...𝑛) ⊆ ℕ → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴))
155 rnss 5928 . . . . . . . . . . . . 13 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
156100, 154, 155mp2b 10 . . . . . . . . . . . 12 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴)
157156a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
158 disjrnmpt 33251 . . . . . . . . . . . . 13 (Disj 𝑘 ∈ ℕ 𝐴 → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
15962, 158syl 18 . . . . . . . . . . . 12 (𝜑 → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
160159adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
161 disjss1 5079 . . . . . . . . . . 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 35019 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))) = Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸 ∩ 𝑦)))
164 ineq2 4114 . . . . . . . . . . 11 (𝑦 = 𝐴 → (𝐸 ∩ 𝑦) = (𝐸 ∩ 𝐴))
165164fveq2d 6912 . . . . . . . . . 10 (𝑦 = 𝐴 → (𝑀‘(𝐸 ∩ 𝑦)) = (𝑀‘(𝐸 ∩ 𝐴)))
166111elexi 3476 . . . . . . . . . . 11 (1...𝑛) ∈ V
167166a1i 11 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (1...𝑛) ∈ V)
16899, 102, 22syl2anc 596 . . . . . . . . . 10 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
169 inss2 4137 . . . . . . . . . . . . . . 15 (𝐸 ∩ 𝐴) ⊆ 𝐴
170 sseq2 3939 . . . . . . . . . . . . . . 15 (𝐴 = ∅ → ((𝐸 ∩ 𝐴) ⊆ 𝐴 ↔ (𝐸 ∩ 𝐴) ⊆ ∅))
171169, 170mpbii 236 . . . . . . . . . . . . . 14 (𝐴 = ∅ → (𝐸 ∩ 𝐴) ⊆ ∅)
172 ss0 4355 . . . . . . . . . . . . . 14 ((𝐸 ∩ 𝐴) ⊆ ∅ → (𝐸 ∩ 𝐴) = ∅)
173171, 172syl 18 . . . . . . . . . . . . 13 (𝐴 = ∅ → (𝐸 ∩ 𝐴) = ∅)
174173adantl 487 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝐸 ∩ 𝐴) = ∅)
175174fveq2d 6912 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = (𝑀‘∅))
176109ad2antrr 739 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘∅) = 0)
177175, 176eqtrd 2798 . . . . . . . . . 10 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = 0)
17862adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑘 ∈ ℕ 𝐴)
179 disjss1 5079 . . . . . . . . . . 11 ((1...𝑛) ⊆ ℕ → (Disj 𝑘 ∈ ℕ 𝐴 → Disj 𝑘 ∈ (1...𝑛)𝐴))
180101, 178, 179sylc 66 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑘 ∈ (1...𝑛)𝐴)
181165, 167, 168, 104, 177, 180esumrnmpt2 34770 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸 ∩ 𝑦)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)))
182153, 163, 1813eqtrd 2802 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)))
183150, 151, 1823eqtr3rd 2807 . . . . . . 7 ((𝜑 ∧ 𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)) = ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))))
18417adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
1853, 184sselid 3911 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
186185xnegcld 13457 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
18715adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘𝐸) ∈ ℝ*)
188 iunss1 4969 . . . . . . . . . . . 12 ((1...𝑛) ⊆ ℕ → ∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ ∪ 𝑘 ∈ ℕ 𝐴)
189100, 188mp1i 14 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ ∪ 𝑘 ∈ ℕ 𝐴)
190189sscond 4085 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴) ⊆ (𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))
191743adant1r 1196 . . . . . . . . . 10 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ⊆ 𝑦 ∧ 𝑦 ∈ 𝒫 𝑂) → (𝑀‘𝑥) ≤ (𝑀‘𝑦))
192108, 77, 190, 84, 191carsgmon 35016 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
193 xleneg 13375 . . . . . . . . . 10 (((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*) → ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ↔ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≤ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
194193biimpa 482 . . . . . . . . 9 ((((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*) ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≤ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)))
195185, 86, 192, 194syl21anc 851 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≤ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)))
196 xleadd2a 13411 . . . . . . . 8 ((( -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘𝐸) ∈ ℝ*) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≤ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
19789, 186, 187, 195, 196syl31anc 1401 . . . . . . 7 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
198183, 197eqbrtrd 5130 . . . . . 6 ((𝜑 ∧ 𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
19976, 22, 198esumgect 34792 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
20012, 27, 20, 71, 199xrletrd 13318 . . . 4 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
2012, 200eqbrtrrid 5144 . . 3 (𝜑 → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
202 xleadd1a 13410 . . 3 ((((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ∈ ℝ* ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*) ∧ (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)))) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
20313, 20, 18, 201, 202syl31anc 1401 . 2 (𝜑 → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
204 xrge0npcan 33651 . . 3 (((𝑀‘𝐸) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘𝐸)) → (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) = (𝑀‘𝐸))
20514, 17, 75, 204syl3anc 1399 . 2 (𝜑 → (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) = (𝑀‘𝐸))
206203, 205breqtrd 5134 1 (𝜑 → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ≤ (𝑀‘𝐸))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147   ≠ wne 2959  ∀wral 3080  Vcvv 3454   ⊆ wss 3900   ∖ cdif 4048   ∩ cin 4092  ∅c0 4281  𝒫 cpw 4560  ∪ cuni 4870  ∪ ciun 4954  Disj wdisj 5073   class class class wbr 5106   ↦ cmpt 5189  ran crn 5656  ⟶wf 6554  ‘cfv 6558  (class class class)co 7443  ωcom 7901   ≼ cdom 8999  Fincfn 9001  0cc0 11227  1c1 11228  +∞cpnf 11367  -∞cmnf 11368  ℝ*cxr 11369   ≤ cle 11371  ℕcn 12362   -ecxne 13265   +e cxad 13266  [,]cicc 13506  ...cfz 13666  Σ*cesum 34729  toCaraSigaccarsg 35003
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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7775  ax-inf2 9669  ax-cnex 11283  ax-resscn 11284  ax-1cn 11285  ax-icn 11286  ax-addcl 11287  ax-addrcl 11288  ax-mulcl 11289  ax-mulrcl 11290  ax-mulcom 11291  ax-addass 11292  ax-mulass 11293  ax-distr 11294  ax-i2m1 11295  ax-1ne0 11296  ax-1rid 11297  ax-rnegex 11298  ax-rrecex 11299  ax-cnre 11300  ax-pre-lttri 11301  ax-pre-lttrn 11302  ax-pre-ltadd 11303  ax-pre-mulgt0 11304  ax-pre-sup 11305  ax-addf 11306  ax-mulf 11307
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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4839  df-uni 4871  df-int 4911  df-iun 4956  df-iin 4957  df-disj 5074  df-br 5107  df-opab 5171  df-mpt 5190  df-tr 5216  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6322  df-ord 6383  df-on 6384  df-lim 6385  df-suc 6386  df-iota 6512  df-fun 6560  df-fn 6561  df-f 6562  df-f1 6563  df-fo 6564  df-f1o 6565  df-fv 6566  df-isom 6567  df-riota 7400  df-ov 7446  df-oprab 7447  df-mpo 7448  df-of 7717  df-om 7902  df-1st 8025  df-2nd 8026  df-supp 8205  df-frecs 8327  df-wrecs 8358  df-recs 8407  df-rdg 8446  df-1o 8504  df-2o 8505  df-er 8745  df-map 8877  df-pm 8878  df-ixp 8954  df-en 9002  df-dom 9003  df-sdom 9004  df-fin 9005  df-fsupp 9382  df-fi 9430  df-sup 9461  df-inf 9462  df-oi 9531  df-dju 10009  df-card 10047  df-acn 10050  df-pnf 11372  df-mnf 11373  df-xr 11374  df-ltxr 11375  df-le 11376  df-sub 11570  df-neg 11571  df-div 12001  df-nn 12363  df-2 12432  df-3 12433  df-4 12434  df-5 12435  df-6 12436  df-7 12437  df-8 12438  df-9 12439  df-n0 12634  df-z 12721  df-dec 12842  df-uz 12993  df-q 13103  df-rp 13148  df-xneg 13268  df-xadd 13269  df-xmul 13270  df-ioo 13507  df-ioc 13508  df-ico 13509  df-icc 13510  df-fz 13667  df-fzo 13816  df-fl 13959  df-mod 14037  df-seq 14172  df-exp 14232  df-fac 14445  df-bc 14474  df-hash 14502  df-shft 15249  df-cj 15295  df-re 15296  df-im 15297  df-sqrt 15431  df-abs 15432  df-limsup 15667  df-clim 15684  df-rlim 15685  df-sum 15883  df-ef 16262  df-sin 16264  df-cos 16265  df-pi 16267  df-struct 17354  df-sets 17371  df-slot 17389  df-ndx 17401  df-base 17417  df-ress 17438  df-plusg 17470  df-mulr 17471  df-starv 17472  df-sca 17473  df-vsca 17474  df-ip 17475  df-tset 17476  df-ple 17477  df-ds 17479  df-unif 17480  df-hom 17481  df-cco 17482  df-rest 17622  df-topn 17623  df-0g 17641  df-gsum 17642  df-topgen 17643  df-pt 17644  df-prds 17647  df-ordt 17702  df-xrs 17703  df-qtop 17708  df-imas 17709  df-xps 17711  df-mre 17785  df-mrc 17786  df-acs 17788  df-ps 18769  df-tsr 18770  df-plusf 18844  df-mgm 18845  df-sgrp 18937  df-mnd 18953  df-mhm 19007  df-submnd 19008  df-grp 19176  df-minusg 19177  df-sbg 19178  df-mulg 19307  df-subg 19362  df-cntz 19561  df-cmn 20026  df-abl 20027  df-mgp 20391  df-rng 20405  df-ur 20438  df-ring 20491  df-cring 20492  df-subrng 20828  df-subrg 20852  df-abv 21096  df-lmod 21167  df-scaf 21168  df-sra 21478  df-rgmod 21479  df-psmet 21700  df-xmet 21701  df-met 21702  df-bl 21703  df-mopn 21704  df-fbas 21705  df-fg 21706  df-cnfld 21709  df-top 23242  df-topon 23259  df-topsp 23281  df-bases 23294  df-cld 23367  df-ntr 23368  df-cls 23369  df-nei 23446  df-lp 23484  df-perf 23485  df-cn 23575  df-cnp 23576  df-haus 23663  df-tx 23911  df-hmeo 24104  df-fil 24195  df-fm 24287  df-flim 24288  df-flf 24289  df-tmd 24421  df-tgp 24422  df-tsms 24476  df-trg 24509  df-xms 24669  df-ms 24670  df-tms 24671  df-nm 24931  df-ngp 24932  df-nrg 24934  df-nlm 24935  df-ii 25228  df-cncf 25229  df-limc 26216  df-dv 26217  df-log 26914  df-esum 34730  df-carsg 35004
This theorem is used by:  carsgclctunlem3  35022
  Copyright terms: Public domain W3C validator