Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ismeannd Structured version   Visualization version   GIF version

Theorem ismeannd 46388
Description: Sufficient condition to prove that 𝑀 is a measure. (Contributed by Glauco Siliprandi, 17-Aug-2020.)
Hypotheses
Ref Expression
ismeannd.sal (𝜑𝑆 ∈ SAlg)
ismeannd.mf (𝜑𝑀:𝑆⟶(0[,]+∞))
ismeannd.m0 (𝜑 → (𝑀‘∅) = 0)
ismeannd.iun ((𝜑𝑒:ℕ⟶𝑆Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑛 ∈ ℕ (𝑒𝑛)) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒𝑛)))))
Assertion
Ref Expression
ismeannd (𝜑𝑀 ∈ Meas)
Distinct variable groups:   𝑒,𝑀,𝑛   𝜑,𝑒,𝑛
Allowed substitution hints:   𝑆(𝑒,𝑛)

Proof of Theorem ismeannd
Dummy variables 𝑥 𝑦 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ismeannd.mf . . . . 5 (𝜑𝑀:𝑆⟶(0[,]+∞))
21fdmd 6757 . . . . . 6 (𝜑 → dom 𝑀 = 𝑆)
32feq2d 6733 . . . . 5 (𝜑 → (𝑀:dom 𝑀⟶(0[,]+∞) ↔ 𝑀:𝑆⟶(0[,]+∞)))
41, 3mpbird 257 . . . 4 (𝜑𝑀:dom 𝑀⟶(0[,]+∞))
5 ismeannd.sal . . . . 5 (𝜑𝑆 ∈ SAlg)
62, 5eqeltrd 2844 . . . 4 (𝜑 → dom 𝑀 ∈ SAlg)
74, 6jca 511 . . 3 (𝜑 → (𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg))
8 ismeannd.m0 . . 3 (𝜑 → (𝑀‘∅) = 0)
9 unieq 4942 . . . . . . . . . . . 12 (𝑥 = ∅ → 𝑥 = ∅)
10 uni0 4959 . . . . . . . . . . . . 13 ∅ = ∅
1110a1i 11 . . . . . . . . . . . 12 (𝑥 = ∅ → ∅ = ∅)
129, 11eqtrd 2780 . . . . . . . . . . 11 (𝑥 = ∅ → 𝑥 = ∅)
1312fveq2d 6924 . . . . . . . . . 10 (𝑥 = ∅ → (𝑀 𝑥) = (𝑀‘∅))
1413, 8sylan9eqr 2802 . . . . . . . . 9 ((𝜑𝑥 = ∅) → (𝑀 𝑥) = 0)
15 reseq2 6004 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑀𝑥) = (𝑀 ↾ ∅))
16 res0 6013 . . . . . . . . . . . . . 14 (𝑀 ↾ ∅) = ∅
1716a1i 11 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑀 ↾ ∅) = ∅)
1815, 17eqtrd 2780 . . . . . . . . . . . 12 (𝑥 = ∅ → (𝑀𝑥) = ∅)
1918fveq2d 6924 . . . . . . . . . . 11 (𝑥 = ∅ → (Σ^‘(𝑀𝑥)) = (Σ^‘∅))
2019adantl 481 . . . . . . . . . 10 ((𝜑𝑥 = ∅) → (Σ^‘(𝑀𝑥)) = (Σ^‘∅))
21 sge00 46297 . . . . . . . . . . 11 ^‘∅) = 0
2221a1i 11 . . . . . . . . . 10 ((𝜑𝑥 = ∅) → (Σ^‘∅) = 0)
2320, 22eqtrd 2780 . . . . . . . . 9 ((𝜑𝑥 = ∅) → (Σ^‘(𝑀𝑥)) = 0)
2414, 23eqtr4d 2783 . . . . . . . 8 ((𝜑𝑥 = ∅) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))
2524adantlr 714 . . . . . . 7 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑥 = ∅) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))
2625adantlr 714 . . . . . 6 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ 𝑥 = ∅) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))
27 simpll 766 . . . . . . . 8 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → (𝜑𝑥 ∈ 𝒫 dom 𝑀))
28 simplrr 777 . . . . . . . 8 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → Disj 𝑦𝑥 𝑦)
2927, 28jca 511 . . . . . . 7 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → ((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦))
30 simplrl 776 . . . . . . . 8 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → 𝑥 ≼ ω)
31 neqne 2954 . . . . . . . . 9 𝑥 = ∅ → 𝑥 ≠ ∅)
3231adantl 481 . . . . . . . 8 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → 𝑥 ≠ ∅)
33 id 22 . . . . . . . . . . . 12 (𝑦 = 𝑤𝑦 = 𝑤)
3433cbvdisjv 5144 . . . . . . . . . . 11 (Disj 𝑦𝑥 𝑦Disj 𝑤𝑥 𝑤)
3534biimpi 216 . . . . . . . . . 10 (Disj 𝑦𝑥 𝑦Disj 𝑤𝑥 𝑤)
3635adantl 481 . . . . . . . . 9 ((𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦) → Disj 𝑤𝑥 𝑤)
3736ad2antlr 726 . . . . . . . 8 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → Disj 𝑤𝑥 𝑤)
3830, 32, 37nnfoctbdj 46377 . . . . . . 7 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → ∃𝑒(𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)))
39 simpl 482 . . . . . . . . . 10 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛))) → ((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦))
40 simprl 770 . . . . . . . . . 10 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛))) → 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
41 simprr 772 . . . . . . . . . 10 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛))) → Disj 𝑛 ∈ ℕ (𝑒𝑛))
42 founiiun0 45097 . . . . . . . . . . . . 13 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → 𝑥 = 𝑛 ∈ ℕ (𝑒𝑛))
4342fveq2d 6924 . . . . . . . . . . . 12 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → (𝑀 𝑥) = (𝑀 𝑛 ∈ ℕ (𝑒𝑛)))
4443ad2antlr 726 . . . . . . . . . . 11 (((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑥) = (𝑀 𝑛 ∈ ℕ (𝑒𝑛)))
45 simplll 774 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → 𝜑)
46 fof 6834 . . . . . . . . . . . . . . . 16 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → 𝑒:ℕ⟶(𝑥 ∪ {∅}))
4746adantl 481 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → 𝑒:ℕ⟶(𝑥 ∪ {∅}))
48 elpwi 4629 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ 𝒫 dom 𝑀𝑥 ⊆ dom 𝑀)
4948adantl 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ⊆ dom 𝑀)
502adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → dom 𝑀 = 𝑆)
5149, 50sseqtrd 4049 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → 𝑥𝑆)
52 0sal 46241 . . . . . . . . . . . . . . . . . . . 20 (𝑆 ∈ SAlg → ∅ ∈ 𝑆)
535, 52syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∅ ∈ 𝑆)
54 snssi 4833 . . . . . . . . . . . . . . . . . . 19 (∅ ∈ 𝑆 → {∅} ⊆ 𝑆)
5553, 54syl 17 . . . . . . . . . . . . . . . . . 18 (𝜑 → {∅} ⊆ 𝑆)
5655adantr 480 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → {∅} ⊆ 𝑆)
5751, 56unssd 4215 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (𝑥 ∪ {∅}) ⊆ 𝑆)
5857adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → (𝑥 ∪ {∅}) ⊆ 𝑆)
5947, 58fssd 6764 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → 𝑒:ℕ⟶𝑆)
6059adantr 480 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → 𝑒:ℕ⟶𝑆)
61 simpr 484 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → Disj 𝑛 ∈ ℕ (𝑒𝑛))
62 ismeannd.iun . . . . . . . . . . . . 13 ((𝜑𝑒:ℕ⟶𝑆Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑛 ∈ ℕ (𝑒𝑛)) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒𝑛)))))
6345, 60, 61, 62syl3anc 1371 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑛 ∈ ℕ (𝑒𝑛)) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒𝑛)))))
6463adantllr 718 . . . . . . . . . . 11 (((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑛 ∈ ℕ (𝑒𝑛)) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒𝑛)))))
651feqmptd 6990 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑀 = (𝑦𝑆 ↦ (𝑀𝑦)))
6665reseq1d 6008 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑀𝑥) = ((𝑦𝑆 ↦ (𝑀𝑦)) ↾ 𝑥))
6766adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (𝑀𝑥) = ((𝑦𝑆 ↦ (𝑀𝑦)) ↾ 𝑥))
6867adantr 480 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑀𝑥) = ((𝑦𝑆 ↦ (𝑀𝑦)) ↾ 𝑥))
6951resmptd 6069 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → ((𝑦𝑆 ↦ (𝑀𝑦)) ↾ 𝑥) = (𝑦𝑥 ↦ (𝑀𝑦)))
7069adantr 480 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → ((𝑦𝑆 ↦ (𝑀𝑦)) ↾ 𝑥) = (𝑦𝑥 ↦ (𝑀𝑦)))
71 snssi 4833 . . . . . . . . . . . . . . . . . . . . 21 (∅ ∈ 𝑥 → {∅} ⊆ 𝑥)
72 ssequn2 4212 . . . . . . . . . . . . . . . . . . . . 21 ({∅} ⊆ 𝑥 ↔ (𝑥 ∪ {∅}) = 𝑥)
7371, 72sylib 218 . . . . . . . . . . . . . . . . . . . 20 (∅ ∈ 𝑥 → (𝑥 ∪ {∅}) = 𝑥)
7473eqcomd 2746 . . . . . . . . . . . . . . . . . . 19 (∅ ∈ 𝑥𝑥 = (𝑥 ∪ {∅}))
7574mpteq1d 5261 . . . . . . . . . . . . . . . . . 18 (∅ ∈ 𝑥 → (𝑦𝑥 ↦ (𝑀𝑦)) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦)))
7675adantl 481 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑦𝑥 ↦ (𝑀𝑦)) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦)))
7768, 70, 763eqtrd 2784 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑀𝑥) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦)))
7877fveq2d 6924 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (Σ^‘(𝑀𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦))))
79 nfv 1913 . . . . . . . . . . . . . . . . 17 𝑦((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥)
80 simplr 768 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → 𝑥 ∈ 𝒫 dom 𝑀)
81 p0ex 5402 . . . . . . . . . . . . . . . . . 18 {∅} ∈ V
8281a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → {∅} ∈ V)
83 disjsn 4736 . . . . . . . . . . . . . . . . . . 19 ((𝑥 ∩ {∅}) = ∅ ↔ ¬ ∅ ∈ 𝑥)
8483biimpri 228 . . . . . . . . . . . . . . . . . 18 (¬ ∅ ∈ 𝑥 → (𝑥 ∩ {∅}) = ∅)
8584adantl 481 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (𝑥 ∩ {∅}) = ∅)
861ad2antrr 725 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦𝑥) → 𝑀:𝑆⟶(0[,]+∞))
8751sselda 4008 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦𝑥) → 𝑦𝑆)
8886, 87ffvelcdmd 7119 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦𝑥) → (𝑀𝑦) ∈ (0[,]+∞))
8988adantlr 714 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) ∧ 𝑦𝑥) → (𝑀𝑦) ∈ (0[,]+∞))
90 elsni 4665 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ {∅} → 𝑦 = ∅)
9190fveq2d 6924 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ {∅} → (𝑀𝑦) = (𝑀‘∅))
9291adantl 481 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ {∅}) → (𝑀𝑦) = (𝑀‘∅))
931, 53ffvelcdmd 7119 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑀‘∅) ∈ (0[,]+∞))
9493adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ {∅}) → (𝑀‘∅) ∈ (0[,]+∞))
9592, 94eqeltrd 2844 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ {∅}) → (𝑀𝑦) ∈ (0[,]+∞))
9695ad4ant14 751 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) ∧ 𝑦 ∈ {∅}) → (𝑀𝑦) ∈ (0[,]+∞))
9779, 80, 82, 85, 89, 96sge0splitmpt 46332 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦))) = ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒^‘(𝑦 ∈ {∅} ↦ (𝑀𝑦)))))
98 fveq2 6920 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = ∅ → (𝑀𝑦) = (𝑀‘∅))
9998adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 = ∅) → (𝑀𝑦) = (𝑀‘∅))
1008adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 = ∅) → (𝑀‘∅) = 0)
10199, 100eqtrd 2780 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 = ∅) → (𝑀𝑦) = 0)
10290, 101sylan2 592 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ {∅}) → (𝑀𝑦) = 0)
103102mpteq2dva 5266 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑦 ∈ {∅} ↦ (𝑀𝑦)) = (𝑦 ∈ {∅} ↦ 0))
104103fveq2d 6924 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀𝑦))) = (Σ^‘(𝑦 ∈ {∅} ↦ 0)))
105 nfv 1913 . . . . . . . . . . . . . . . . . . . 20 𝑦𝜑
10681a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → {∅} ∈ V)
107105, 106sge0z 46296 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ 0)) = 0)
108104, 107eqtrd 2780 . . . . . . . . . . . . . . . . . 18 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀𝑦))) = 0)
109108oveq2d 7464 . . . . . . . . . . . . . . . . 17 (𝜑 → ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒^‘(𝑦 ∈ {∅} ↦ (𝑀𝑦)))) = ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒 0))
110109ad2antrr 725 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒^‘(𝑦 ∈ {∅} ↦ (𝑀𝑦)))) = ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒 0))
111 simpr 484 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ∈ 𝒫 dom 𝑀)
11267, 69eqtrd 2780 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (𝑀𝑥) = (𝑦𝑥 ↦ (𝑀𝑦)))
1131adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → 𝑀:𝑆⟶(0[,]+∞))
114113, 51fssresd 6788 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (𝑀𝑥):𝑥⟶(0[,]+∞))
115112, 114feq1dd 45074 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (𝑦𝑥 ↦ (𝑀𝑦)):𝑥⟶(0[,]+∞))
116111, 115sge0xrcl 46306 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) ∈ ℝ*)
117116xaddridd 13305 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒 0) = (Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))))
118112fveq2d 6924 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑀𝑥)) = (Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))))
119118eqcomd 2746 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) = (Σ^‘(𝑀𝑥)))
120117, 119eqtrd 2780 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒 0) = (Σ^‘(𝑀𝑥)))
121120adantr 480 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → ((Σ^‘(𝑦𝑥 ↦ (𝑀𝑦))) +𝑒 0) = (Σ^‘(𝑀𝑥)))
12297, 110, 1213eqtrrd 2785 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (Σ^‘(𝑀𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦))))
12378, 122pm2.61dan 812 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑀𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦))))
124123ad2antrr 725 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (Σ^‘(𝑀𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦))))
125 nfv 1913 . . . . . . . . . . . . . 14 𝑦(((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛))
126 nfv 1913 . . . . . . . . . . . . . . 15 𝑛((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
127 nfdisj1 5147 . . . . . . . . . . . . . . 15 𝑛Disj 𝑛 ∈ ℕ (𝑒𝑛)
128126, 127nfan 1898 . . . . . . . . . . . . . 14 𝑛(((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛))
129 fveq2 6920 . . . . . . . . . . . . . 14 (𝑦 = (𝑒𝑛) → (𝑀𝑦) = (𝑀‘(𝑒𝑛)))
130 nnex 12299 . . . . . . . . . . . . . . 15 ℕ ∈ V
131130a1i 11 . . . . . . . . . . . . . 14 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → ℕ ∈ V)
132 simplr 768 . . . . . . . . . . . . . 14 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
133 eqidd 2741 . . . . . . . . . . . . . 14 (((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) ∧ 𝑛 ∈ ℕ) → (𝑒𝑛) = (𝑒𝑛))
1341ad2antrr 725 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → 𝑀:𝑆⟶(0[,]+∞))
13557sselda 4008 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → 𝑦𝑆)
136134, 135ffvelcdmd 7119 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → (𝑀𝑦) ∈ (0[,]+∞))
137136ad4ant14 751 . . . . . . . . . . . . . 14 (((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → (𝑀𝑦) ∈ (0[,]+∞))
13845, 101sylan 579 . . . . . . . . . . . . . 14 (((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) ∧ 𝑦 = ∅) → (𝑀𝑦) = 0)
139125, 128, 129, 131, 132, 61, 133, 137, 138sge0fodjrn 46338 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀𝑦))) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒𝑛)))))
140124, 139eqtr2d 2781 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒𝑛)))) = (Σ^‘(𝑀𝑥)))
141140adantllr 718 . . . . . . . . . . 11 (((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒𝑛)))) = (Σ^‘(𝑀𝑥)))
14244, 64, 1413eqtrd 2784 . . . . . . . . . 10 (((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))
14339, 40, 41, 142syl21anc 837 . . . . . . . . 9 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛))) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))
144143ex 412 . . . . . . . 8 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) → ((𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥))))
145144exlimdv 1932 . . . . . . 7 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦𝑥 𝑦) → (∃𝑒(𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒𝑛)) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥))))
14629, 38, 145sylc 65 . . . . . 6 ((((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))
14726, 146pm2.61dan 812 . . . . 5 (((𝜑𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦)) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))
148147ex 412 . . . 4 ((𝜑𝑥 ∈ 𝒫 dom 𝑀) → ((𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥))))
149148ralrimiva 3152 . . 3 (𝜑 → ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥))))
1507, 8, 149jca31 514 . 2 (𝜑 → (((𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg) ∧ (𝑀‘∅) = 0) ∧ ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))))
151 ismea 46372 . 2 (𝑀 ∈ Meas ↔ (((𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg) ∧ (𝑀‘∅) = 0) ∧ ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦𝑥 𝑦) → (𝑀 𝑥) = (Σ^‘(𝑀𝑥)))))
152150, 151sylibr 234 1 (𝜑𝑀 ∈ Meas)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1087   = wceq 1537  wex 1777  wcel 2108  wne 2946  wral 3067  Vcvv 3488  cun 3974  cin 3975  wss 3976  c0 4352  𝒫 cpw 4622  {csn 4648   cuni 4931   ciun 5015  Disj wdisj 5133   class class class wbr 5166  cmpt 5249  dom cdm 5700  cres 5702  wf 6569  ontowfo 6571  cfv 6573  (class class class)co 7448  ωcom 7903  cdom 9001  0cc0 11184  +∞cpnf 11321  cn 12293   +𝑒 cxad 13173  [,]cicc 13410  SAlgcsalg 46229  Σ^csumge0 46283  Meascmea 46370
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-inf2 9710  ax-cnex 11240  ax-resscn 11241  ax-1cn 11242  ax-icn 11243  ax-addcl 11244  ax-addrcl 11245  ax-mulcl 11246  ax-mulrcl 11247  ax-mulcom 11248  ax-addass 11249  ax-mulass 11250  ax-distr 11251  ax-i2m1 11252  ax-1ne0 11253  ax-1rid 11254  ax-rnegex 11255  ax-rrecex 11256  ax-cnre 11257  ax-pre-lttri 11258  ax-pre-lttrn 11259  ax-pre-ltadd 11260  ax-pre-mulgt0 11261  ax-pre-sup 11262
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-disj 5134  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-se 5653  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-isom 6582  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-om 7904  df-1st 8030  df-2nd 8031  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-1o 8522  df-er 8763  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007  df-sup 9511  df-oi 9579  df-card 10008  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11522  df-neg 11523  df-div 11948  df-nn 12294  df-2 12356  df-3 12357  df-n0 12554  df-z 12640  df-uz 12904  df-rp 13058  df-xadd 13176  df-ico 13413  df-icc 13414  df-fz 13568  df-fzo 13712  df-seq 14053  df-exp 14113  df-hash 14380  df-cj 15148  df-re 15149  df-im 15150  df-sqrt 15284  df-abs 15285  df-clim 15534  df-sum 15735  df-salg 46230  df-sumge0 46284  df-mea 46371
This theorem is referenced by:  volmea  46395  caratheodory  46449
  Copyright terms: Public domain W3C validator