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 34993
Description: Lemma for carsgclctun 34995. (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 5028 . . . . 5 ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) = (𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)
21fveq2i 6888 . . . 4 (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴))
3 iccssxr 13561 . . . . 5 (0[,]+∞) ⊆ ℝ*
4 carsgval.2 . . . . . 6 (𝜑 → 𝑀:𝒫 𝑂⟶(0[,]+∞))
5 nnex 12341 . . . . . . . 8 ℕ ∈ V
65a1i 11 . . . . . . 7 (𝜑 → ℕ ∈ V)
7 carsgclctunlem2.3 . . . . . . . . 9 (𝜑 → 𝐸 ∈ 𝒫 𝑂)
87adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
98elpwincl1 33163 . . . . . . 7 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂)
106, 9elpwiuncl 33165 . . . . . 6 (𝜑 → ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂)
114, 10ffvelcdmd 7085 . . . . 5 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
123, 11sselid 3906 . . . 4 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ∈ ℝ*)
132, 12eqeltrrid 2865 . . 3 (𝜑 → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
144, 7ffvelcdmd 7085 . . . . 5 (𝜑 → (𝑀‘𝐸) ∈ (0[,]+∞))
153, 14sselid 3906 . . . 4 (𝜑 → (𝑀‘𝐸) ∈ ℝ*)
167elpwdifcl 33164 . . . . . . 7 (𝜑 → (𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴) ∈ 𝒫 𝑂)
174, 16ffvelcdmd 7085 . . . . . 6 (𝜑 → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
183, 17sselid 3906 . . . . 5 (𝜑 → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
1918xnegcld 13430 . . . 4 (𝜑 → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
2015, 19xaddcld 13431 . . 3 (𝜑 → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ∈ ℝ*)
214adantr 486 . . . . . . . . 9 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
2221, 9ffvelcdmd 7085 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
2322ralrimiva 3154 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
24 nfcv 2922 . . . . . . . 8 Ⅎ𝑘ℕ
2524esumcl 34704 . . . . . . 7 ((ℕ ∈ V ∧ ∀𝑘 ∈ ℕ (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞)) → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
266, 23, 25syl2anc 596 . . . . . 6 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
273, 26sselid 3906 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ∈ ℝ*)
289ralrimiva 3154 . . . . . . . . 9 (𝜑 → ∀𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂)
29 dfiun3g 5949 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂 → ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) = ∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)))
3028, 29syl 18 . . . . . . . 8 (𝜑 → ∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴) = ∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)))
3130fveq2d 6889 . . . . . . 7 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) = (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))))
32 nnct 14124 . . . . . . . . . 10 ℕ ≼ ω
33 mptct 10622 . . . . . . . . . 10 (ℕ ≼ ω → (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω)
34 rnct 10604 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω)
3532, 33, 34mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω
3635a1i 11 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω)
37 eqid 2760 . . . . . . . . . 10 (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) = (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))
3837rnmptss 7123 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐸 ∩ 𝐴) ∈ 𝒫 𝑂 → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂)
3928, 38syl 18 . . . . . . . 8 (𝜑 → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂)
40 mptexg 7227 . . . . . . . . . 10 (ℕ ∈ V → (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V)
41 rnexg 7914 . . . . . . . . . 10 ((𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V → ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V)
425, 40, 41mp2b 10 . . . . . . . . 9 ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ∈ V
43 breq1 5105 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (𝑥 ≼ ω ↔ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω))
44 sseq1 3933 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (𝑥 ⊆ 𝒫 𝑂 ↔ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂))
4543, 443anbi23d 1467 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → ((𝜑 ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) ↔ (𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂)))
46 unieq 4877 . . . . . . . . . . . . 13 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → ∪ 𝑥 = ∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)))
4746fveq2d 6889 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (𝑀‘∪ 𝑥) = (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))))
48 esumeq1 34708 . . . . . . . . . . . 12 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → Σ*𝑦 ∈ 𝑥(𝑀‘𝑦) = Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))
4947, 48breq12d 5115 . . . . . . . . . . 11 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → ((𝑀‘∪ 𝑥) ≤ Σ*𝑦 ∈ 𝑥(𝑀‘𝑦) ↔ (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦)))
5045, 49imbi12d 347 . . . . . . . . . 10 (𝑥 = ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) → (((𝜑 ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀‘∪ 𝑥) ≤ Σ*𝑦 ∈ 𝑥(𝑀‘𝑦)) ↔ ((𝜑 ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ≼ ω ∧ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴)) ⊆ 𝒫 𝑂) → (𝑀‘∪ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))))
51 carsgsiga.2 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 ≼ ω ∧ 𝑥 ⊆ 𝒫 𝑂) → (𝑀‘∪ 𝑥) ≤ Σ*𝑦 ∈ 𝑥(𝑀‘𝑦))
5250, 51vtoclg 3517 . . . . . . . . 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 5126 . . . . . 6 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ≤ Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦))
56 fveq2 6885 . . . . . . 7 (𝑦 = (𝐸 ∩ 𝐴) → (𝑀‘𝑦) = (𝑀‘(𝐸 ∩ 𝐴)))
57 simpr 490 . . . . . . . . 9 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝐸 ∩ 𝐴) = ∅)
5857fveq2d 6889 . . . . . . . 8 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = (𝑀‘∅))
59 carsgsiga.1 . . . . . . . . 9 (𝜑 → (𝑀‘∅) = 0)
6059ad2antrr 739 . . . . . . . 8 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝑀‘∅) = 0)
6158, 60eqtrd 2795 . . . . . . 7 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ (𝐸 ∩ 𝐴) = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = 0)
62 carsgclctunlem2.1 . . . . . . . . 9 (𝜑 → Disj 𝑘 ∈ ℕ 𝐴)
63 disjin 33222 . . . . . . . . 9 (Disj 𝑘 ∈ ℕ 𝐴 → Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸))
6462, 63syl 18 . . . . . . . 8 (𝜑 → Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸))
65 incom 4106 . . . . . . . . . 10 (𝐴 ∩ 𝐸) = (𝐸 ∩ 𝐴)
6665rgenw 3080 . . . . . . . . 9 ∀𝑘 ∈ ℕ (𝐴 ∩ 𝐸) = (𝐸 ∩ 𝐴)
67 disjeq2 5073 . . . . . . . . 9 (∀𝑘 ∈ ℕ (𝐴 ∩ 𝐸) = (𝐸 ∩ 𝐴) → (Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)))
6866, 67ax-mp 5 . . . . . . . 8 (Disj 𝑘 ∈ ℕ (𝐴 ∩ 𝐸) ↔ Disj 𝑘 ∈ ℕ (𝐸 ∩ 𝐴))
6964, 68sylib 221 . . . . . . 7 (𝜑 → Disj 𝑘 ∈ ℕ (𝐸 ∩ 𝐴))
7056, 6, 22, 9, 61, 69esumrnmpt2 34742 . . . . . 6 (𝜑 → Σ*𝑦 ∈ ran (𝑘 ∈ ℕ ↦ (𝐸 ∩ 𝐴))(𝑀‘𝑦) = Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)))
7155, 70breqtrd 5130 . . . . 5 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ≤ Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)))
72 carsgval.1 . . . . . . . 8 (𝜑 → 𝑂 ∈ 𝑉)
73 difssd 4073 . . . . . . . 8 (𝜑 → (𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴) ⊆ 𝐸)
74 carsgsiga.3 . . . . . . . 8 ((𝜑 ∧ 𝑥 ⊆ 𝑦 ∧ 𝑦 ∈ 𝒫 𝑂) → (𝑀‘𝑥) ≤ (𝑀‘𝑦))
7572, 4, 73, 7, 74carsgmon 34988 . . . . . . 7 (𝜑 → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘𝐸))
7614, 17, 75xrge0subcld 33397 . . . . . 6 (𝜑 → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ∈ (0[,]+∞))
774adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
787adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐸 ∈ 𝒫 𝑂)
7978elpwincl1 33163 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8077, 79ffvelcdmd 7085 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
813, 80sselid 3906 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
82 xrge0neqmnf 13583 . . . . . . . . . . 11 ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8380, 82syl 18 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8478elpwdifcl 33164 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴) ∈ 𝒫 𝑂)
8577, 84ffvelcdmd 7085 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞))
863, 85sselid 3906 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
87 xrge0neqmnf 13583 . . . . . . . . . . 11 ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ (0[,]+∞) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8885, 87syl 18 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
8986xnegcld 13430 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ*)
90 xnegneg 13344 . . . . . . . . . . . . . . . . 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 13337 . . . . . . . . . . . . . . . . 17 ( -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞ → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -e-∞)
9493adantl 487 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -e-∞)
95 xnegmnf 13340 . . . . . . . . . . . . . . . 16 -e-∞ = +∞
9694, 95eqtrdi 2811 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → -e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9792, 96eqtr3d 2797 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = +∞)
9897oveq2d 7436 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞))
99 simpll 779 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝜑)
100 fz1ssnn 13689 . . . . . . . . . . . . . . . . . . . . . . 23 (1...𝑛) ⊆ ℕ
101100a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑛 ∈ ℕ) → (1...𝑛) ⊆ ℕ)
102101sselda 3908 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝑘 ∈ ℕ)
103 carsgclctunlem2.2 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐴 ∈ (toCaraSiga‘𝑀))
10499, 102, 103syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → 𝐴 ∈ (toCaraSiga‘𝑀))
105104ralrimiva 3154 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
106 dfiun3g 5949 . . . . . . . . . . . . . . . . . . 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 14115 . . . . . . . . . . . . . . . . . . . . 21 (1...𝑛) ∈ Fin
112 mptfi 9340 . . . . . . . . . . . . . . . . . . . . 21 ((1...𝑛) ∈ Fin → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
113 rnfi 9329 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
114111, 112, 113mp2b 10 . . . . . . . . . . . . . . . . . . . 20 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin
115114a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ Fin)
116 eqid 2760 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝑛) ↦ 𝐴) = (𝑘 ∈ (1...𝑛) ↦ 𝐴)
117116rnmptss 7123 . . . . . . . . . . . . . . . . . . . 20 (∀𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
118105, 117syl 18 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (toCaraSiga‘𝑀))
119108, 77, 109, 110, 115, 118fiunelcarsg 34990 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ∈ (toCaraSiga‘𝑀))
120107, 119eqeltrd 2860 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀))
121108, 77elcarsg 34979 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑛 ∈ ℕ) → (∪ 𝑘 ∈ (1...𝑛)𝐴 ∈ (toCaraSiga‘𝑀) ↔ (∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒))))
122120, 121mpbid 235 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑛 ∈ ℕ) → (∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒)))
123122simprd 501 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒))
124 ineq1 4110 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴))
125124fveq2d 6889 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
126 difeq1 4056 . . . . . . . . . . . . . . . . . . 19 (𝑒 = 𝐸 → (𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))
127126fveq2d 6889 . . . . . . . . . . . . . . . . . 18 (𝑒 = 𝐸 → (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
128125, 127oveq12d 7438 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → ((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))))
129 fveq2 6885 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝐸 → (𝑀‘𝑒) = (𝑀‘𝐸))
130128, 129eqeq12d 2776 . . . . . . . . . . . . . . . 16 (𝑒 = 𝐸 → (((𝑀‘(𝑒 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝑒 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝑒) ↔ ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘𝐸)))
131130rspcv 3572 . . . . . . . . . . . . . . 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 13356 . . . . . . . . . . . . . . 15 (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞) = +∞)
13581, 83, 134syl2anc 596 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞) = +∞)
136135adantr 486 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e +∞) = +∞)
13798, 133, 1363eqtr3d 2803 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘𝐸) = +∞)
138 carsgclctunlem2.4 . . . . . . . . . . . . . 14 (𝜑 → (𝑀‘𝐸) ≠ +∞)
139138ad2antrr 739 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → (𝑀‘𝐸) ≠ +∞)
140139neneqd 2960 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞) → ¬ (𝑀‘𝐸) = +∞)
141137, 140pm2.65da 829 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → ¬ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = -∞)
142141neqned 2962 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≠ -∞)
143 xaddass 13379 . . . . . . . . . 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 1413 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))))
145 xnegid 13368 . . . . . . . . . . 11 ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = 0)
14686, 145syl 18 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = 0)
147146oveq2d 7436 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e ((𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))) = ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e 0))
148 xaddrid 13371 . . . . . . . . . 10 ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e 0) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
14981, 148syl 18 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e 0) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
150144, 147, 1493eqtrd 2799 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
151132oveq1d 7435 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) = ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))))
152107ineq2d 4117 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴) = (𝐸 ∩ ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)))
153152fveq2d 6889 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = (𝑀‘(𝐸 ∩ ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))))
154 mptss 6033 . . . . . . . . . . . . 13 ((1...𝑛) ⊆ ℕ → (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴))
155 rnss 5920 . . . . . . . . . . . . 13 ((𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ (𝑘 ∈ ℕ ↦ 𝐴) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
156100, 154, 155mp2b 10 . . . . . . . . . . . 12 ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴)
157156a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → ran (𝑘 ∈ (1...𝑛) ↦ 𝐴) ⊆ ran (𝑘 ∈ ℕ ↦ 𝐴))
158 disjrnmpt 33221 . . . . . . . . . . . . 13 (Disj 𝑘 ∈ ℕ 𝐴 → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
15962, 158syl 18 . . . . . . . . . . . 12 (𝜑 → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
160159adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑦 ∈ ran (𝑘 ∈ ℕ ↦ 𝐴)𝑦)
161 disjss1 5075 . . . . . . . . . . 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 34991 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴))) = Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸 ∩ 𝑦)))
164 ineq2 4111 . . . . . . . . . . 11 (𝑦 = 𝐴 → (𝐸 ∩ 𝑦) = (𝐸 ∩ 𝐴))
165164fveq2d 6889 . . . . . . . . . 10 (𝑦 = 𝐴 → (𝑀‘(𝐸 ∩ 𝑦)) = (𝑀‘(𝐸 ∩ 𝐴)))
166111elexi 3472 . . . . . . . . . . 11 (1...𝑛) ∈ V
167166a1i 11 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (1...𝑛) ∈ V)
16899, 102, 22syl2anc 596 . . . . . . . . . 10 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) → (𝑀‘(𝐸 ∩ 𝐴)) ∈ (0[,]+∞))
169 inss2 4134 . . . . . . . . . . . . . . 15 (𝐸 ∩ 𝐴) ⊆ 𝐴
170 sseq2 3934 . . . . . . . . . . . . . . 15 (𝐴 = ∅ → ((𝐸 ∩ 𝐴) ⊆ 𝐴 ↔ (𝐸 ∩ 𝐴) ⊆ ∅))
171169, 170mpbii 236 . . . . . . . . . . . . . 14 (𝐴 = ∅ → (𝐸 ∩ 𝐴) ⊆ ∅)
172 ss0 4351 . . . . . . . . . . . . . 14 ((𝐸 ∩ 𝐴) ⊆ ∅ → (𝐸 ∩ 𝐴) = ∅)
173171, 172syl 18 . . . . . . . . . . . . 13 (𝐴 = ∅ → (𝐸 ∩ 𝐴) = ∅)
174173adantl 487 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝐸 ∩ 𝐴) = ∅)
175174fveq2d 6889 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = (𝑀‘∅))
176109ad2antrr 739 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘∅) = 0)
177175, 176eqtrd 2795 . . . . . . . . . 10 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ (1...𝑛)) ∧ 𝐴 = ∅) → (𝑀‘(𝐸 ∩ 𝐴)) = 0)
17862adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑘 ∈ ℕ 𝐴)
179 disjss1 5075 . . . . . . . . . . 11 ((1...𝑛) ⊆ ℕ → (Disj 𝑘 ∈ ℕ 𝐴 → Disj 𝑘 ∈ (1...𝑛)𝐴))
180101, 178, 179sylc 66 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑘 ∈ (1...𝑛)𝐴)
181165, 167, 168, 104, 177, 180esumrnmpt2 34742 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → Σ*𝑦 ∈ ran (𝑘 ∈ (1...𝑛) ↦ 𝐴)(𝑀‘(𝐸 ∩ 𝑦)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)))
182153, 163, 1813eqtrd 2799 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ (1...𝑛)𝐴)) = Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)))
183150, 151, 1823eqtr3rd 2804 . . . . . . 7 ((𝜑 ∧ 𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)) = ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))))
18417adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞))
1853, 184sselid 3906 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
186185xnegcld 13430 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*)
18715adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘𝐸) ∈ ℝ*)
188 iunss1 4965 . . . . . . . . . . . 12 ((1...𝑛) ⊆ ℕ → ∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ ∪ 𝑘 ∈ ℕ 𝐴)
189100, 188mp1i 14 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑘 ∈ (1...𝑛)𝐴 ⊆ ∪ 𝑘 ∈ ℕ 𝐴)
190189sscond 4082 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴) ⊆ (𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))
191743adant1r 1196 . . . . . . . . . 10 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ⊆ 𝑦 ∧ 𝑦 ∈ 𝒫 𝑂) → (𝑀‘𝑥) ≤ (𝑀‘𝑦))
192108, 77, 190, 84, 191carsgmon 34988 . . . . . . . . 9 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)))
193 xleneg 13348 . . . . . . . . . 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 13384 . . . . . . . 8 ((( -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ∈ ℝ* ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ (𝑀‘𝐸) ∈ ℝ*) ∧ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴)) ≤ -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
19789, 186, 187, 195, 196syl31anc 1400 . . . . . . 7 ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ (1...𝑛)𝐴))) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
198183, 197eqbrtrd 5126 . . . . . 6 ((𝜑 ∧ 𝑛 ∈ ℕ) → Σ*𝑘 ∈ (1...𝑛)(𝑀‘(𝐸 ∩ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
19976, 22, 198esumgect 34764 . . . . 5 (𝜑 → Σ*𝑘 ∈ ℕ(𝑀‘(𝐸 ∩ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
20012, 27, 20, 71, 199xrletrd 13291 . . . 4 (𝜑 → (𝑀‘∪ 𝑘 ∈ ℕ (𝐸 ∩ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
2012, 200eqbrtrrid 5140 . . 3 (𝜑 → (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
202 xleadd1a 13383 . . 3 ((((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ* ∧ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ∈ ℝ* ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ ℝ*) ∧ (𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ ((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)))) → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
20313, 20, 18, 201, 202syl31anc 1400 . 2 (𝜑 → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ≤ (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))))
204 xrge0npcan 33623 . . 3 (((𝑀‘𝐸) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ∈ (0[,]+∞) ∧ (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴)) ≤ (𝑀‘𝐸)) → (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) = (𝑀‘𝐸))
20514, 17, 75, 204syl3anc 1398 . 2 (𝜑 → (((𝑀‘𝐸) +e -e(𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) = (𝑀‘𝐸))
206203, 205breqtrd 5130 1 (𝜑 → ((𝑀‘(𝐸 ∩ ∪ 𝑘 ∈ ℕ 𝐴)) +e (𝑀‘(𝐸 ∖ ∪ 𝑘 ∈ ℕ 𝐴))) ≤ (𝑀‘𝐸))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1569   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  Vcvv 3450   ⊆ wss 3895   ∖ cdif 4045   ∩ cin 4089  ∅c0 4278  𝒫 cpw 4556  ∪ cuni 4866  ∪ ciun 4950  Disj wdisj 5069   class class class wbr 5102   ↦ cmpt 5185  ran crn 5651  ⟶wf 6534  ‘cfv 6538  (class class class)co 7420  ωcom 7877   ≼ cdom 8971  Fincfn 8973  0cc0 11200  1c1 11201  +∞cpnf 11340  -∞cmnf 11341  ℝ*cxr 11342   ≤ cle 11344  ℕcn 12335   -ecxne 13238   +e cxad 13239  [,]cicc 13479  ...cfz 13639  Σ*cesum 34701  toCaraSigaccarsg 34975
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-inf2 9642  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-pre-sup 11278  ax-addf 11279  ax-mulf 11280
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-disj 5070  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-se 5604  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-om 7878  df-1st 8001  df-2nd 8002  df-supp 8178  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-2o 8477  df-er 8717  df-map 8849  df-pm 8850  df-ixp 8926  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-fsupp 9354  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9504  df-dju 9982  df-card 10020  df-acn 10023  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-4 12407  df-5 12408  df-6 12409  df-7 12410  df-8 12411  df-9 12412  df-n0 12607  df-z 12694  df-dec 12815  df-uz 12966  df-q 13076  df-rp 13121  df-xneg 13241  df-xadd 13242  df-xmul 13243  df-ioo 13480  df-ioc 13481  df-ico 13482  df-icc 13483  df-fz 13640  df-fzo 13789  df-fl 13932  df-mod 14010  df-seq 14145  df-exp 14205  df-fac 14418  df-bc 14447  df-hash 14475  df-shft 15220  df-cj 15266  df-re 15267  df-im 15268  df-sqrt 15402  df-abs 15403  df-limsup 15638  df-clim 15655  df-rlim 15656  df-sum 15854  df-ef 16233  df-sin 16235  df-cos 16236  df-pi 16238  df-struct 17325  df-sets 17342  df-slot 17360  df-ndx 17372  df-base 17388  df-ress 17409  df-plusg 17441  df-mulr 17442  df-starv 17443  df-sca 17444  df-vsca 17445  df-ip 17446  df-tset 17447  df-ple 17448  df-ds 17450  df-unif 17451  df-hom 17452  df-cco 17453  df-rest 17593  df-topn 17594  df-0g 17612  df-gsum 17613  df-topgen 17614  df-pt 17615  df-prds 17618  df-ordt 17673  df-xrs 17674  df-qtop 17679  df-imas 17680  df-xps 17682  df-mre 17756  df-mrc 17757  df-acs 17759  df-ps 18740  df-tsr 18741  df-plusf 18815  df-mgm 18816  df-sgrp 18908  df-mnd 18924  df-mhm 18978  df-submnd 18979  df-grp 19147  df-minusg 19148  df-sbg 19149  df-mulg 19278  df-subg 19333  df-cntz 19531  df-cmn 19996  df-abl 19997  df-mgp 20361  df-rng 20375  df-ur 20408  df-ring 20461  df-cring 20462  df-subrng 20798  df-subrg 20822  df-abv 21066  df-lmod 21137  df-scaf 21138  df-sra 21448  df-rgmod 21449  df-psmet 21670  df-xmet 21671  df-met 21672  df-bl 21673  df-mopn 21674  df-fbas 21675  df-fg 21676  df-cnfld 21679  df-top 23212  df-topon 23229  df-topsp 23251  df-bases 23264  df-cld 23337  df-ntr 23338  df-cls 23339  df-nei 23416  df-lp 23454  df-perf 23455  df-cn 23545  df-cnp 23546  df-haus 23633  df-tx 23881  df-hmeo 24074  df-fil 24165  df-fm 24257  df-flim 24258  df-flf 24259  df-tmd 24391  df-tgp 24392  df-tsms 24446  df-trg 24479  df-xms 24639  df-ms 24640  df-tms 24641  df-nm 24901  df-ngp 24902  df-nrg 24904  df-nlm 24905  df-ii 25198  df-cncf 25199  df-limc 26186  df-dv 26187  df-log 26884  df-esum 34702  df-carsg 34976
This theorem is used by:  carsgclctunlem3  34994
  Copyright terms: Public domain W3C validator