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 47571
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 6721 . . . . . 6 (𝜑 → dom 𝑀 = 𝑆)
32feq2d 6694 . . . . 5 (𝜑 → (𝑀:dom 𝑀⟶(0[,]+∞) ↔ 𝑀:𝑆⟶(0[,]+∞)))
41, 3mpbird 260 . . . 4 (𝜑 → 𝑀:dom 𝑀⟶(0[,]+∞))
5 ismeannd.sal . . . . 5 (𝜑 → 𝑆 ∈ SAlg)
62, 5eqeltrd 2860 . . . 4 (𝜑 → dom 𝑀 ∈ SAlg)
74, 6jca 521 . . 3 (𝜑 → (𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg))
8 ismeannd.m0 . . 3 (𝜑 → (𝑀‘∅) = 0)
9 unieq 4877 . . . . . . . . . . . 12 (𝑥 = ∅ → ∪ 𝑥 = ∪ ∅)
10 uni0 4895 . . . . . . . . . . . . 13 ∪ ∅ = ∅
1110a1i 11 . . . . . . . . . . . 12 (𝑥 = ∅ → ∪ ∅ = ∅)
129, 11eqtrd 2795 . . . . . . . . . . 11 (𝑥 = ∅ → ∪ 𝑥 = ∅)
1312fveq2d 6890 . . . . . . . . . 10 (𝑥 = ∅ → (𝑀‘∪ 𝑥) = (𝑀‘∅))
1413, 8sylan9eqr 2817 . . . . . . . . 9 ((𝜑 ∧ 𝑥 = ∅) → (𝑀‘∪ 𝑥) = 0)
15 reseq2 5964 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑀 ↾ 𝑥) = (𝑀 ↾ ∅))
16 res0 5973 . . . . . . . . . . . . . 14 (𝑀 ↾ ∅) = ∅
1716a1i 11 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑀 ↾ ∅) = ∅)
1815, 17eqtrd 2795 . . . . . . . . . . . 12 (𝑥 = ∅ → (𝑀 ↾ 𝑥) = ∅)
1918fveq2d 6890 . . . . . . . . . . 11 (𝑥 = ∅ → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘∅))
2019adantl 487 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 = ∅) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘∅))
21 sge00 47480 . . . . . . . . . . 11 (Σ^‘∅) = 0
2221a1i 11 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 = ∅) → (Σ^‘∅) = 0)
2320, 22eqtrd 2795 . . . . . . . . 9 ((𝜑 ∧ 𝑥 = ∅) → (Σ^‘(𝑀 ↾ 𝑥)) = 0)
2414, 23eqtr4d 2798 . . . . . . . 8 ((𝜑 ∧ 𝑥 = ∅) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
2524adantlr 728 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑥 = ∅) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
2625adantlr 728 . . . . . 6 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ 𝑥 = ∅) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
27 simpll 779 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → (𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀))
28 simplrr 790 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → Disj 𝑦 ∈ 𝑥 𝑦)
2927, 28jca 521 . . . . . . 7 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦))
30 simplrl 789 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → 𝑥 ≼ ω)
31 neqne 2963 . . . . . . . . 9 (¬ 𝑥 = ∅ → 𝑥 ≠ ∅)
3231adantl 487 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → 𝑥 ≠ ∅)
33 id 23 . . . . . . . . . . 11 (𝑦 = 𝑤 → 𝑦 = 𝑤)
3433cbvdisjv 5080 . . . . . . . . . 10 (Disj 𝑦 ∈ 𝑥 𝑦 ↔ Disj 𝑤 ∈ 𝑥 𝑤)
3534bilani 510 . . . . . . . . 9 ((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → Disj 𝑤 ∈ 𝑥 𝑤)
3635ad2antlr 740 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → Disj 𝑤 ∈ 𝑥 𝑤)
3730, 32, 36nnfoctbdj 47560 . . . . . . 7 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → ∃𝑒(𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)))
38 simpl 488 . . . . . . . . . 10 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))) → ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦))
39 simprl 783 . . . . . . . . . 10 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))) → 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
40 simprr 785 . . . . . . . . . 10 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))) → Disj 𝑛 ∈ ℕ (𝑒‘𝑛))
41 founiiun0 46299 . . . . . . . . . . . . 13 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → ∪ 𝑥 = ∪ 𝑛 ∈ ℕ (𝑒‘𝑛))
4241fveq2d 6890 . . . . . . . . . . . 12 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → (𝑀‘∪ 𝑥) = (𝑀‘∪ 𝑛 ∈ ℕ (𝑒‘𝑛)))
4342ad2antlr 740 . . . . . . . . . . 11 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑥) = (𝑀‘∪ 𝑛 ∈ ℕ (𝑒‘𝑛)))
44 simplll 787 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → 𝜑)
45 fof 6797 . . . . . . . . . . . . . . . 16 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → 𝑒:ℕ⟶(𝑥 ∪ {∅}))
4645adantl 487 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → 𝑒:ℕ⟶(𝑥 ∪ {∅}))
47 elpwi 4563 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ 𝒫 dom 𝑀 → 𝑥 ⊆ dom 𝑀)
4847adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ⊆ dom 𝑀)
492adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → dom 𝑀 = 𝑆)
5048, 49sseqtrd 3944 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ⊆ 𝑆)
51 0sal 47424 . . . . . . . . . . . . . . . . . . . 20 (𝑆 ∈ SAlg → ∅ ∈ 𝑆)
525, 51syl 18 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∅ ∈ 𝑆)
53 snssi 4742 . . . . . . . . . . . . . . . . . . 19 (∅ ∈ 𝑆 → {∅} ⊆ 𝑆)
5452, 53syl 18 . . . . . . . . . . . . . . . . . 18 (𝜑 → {∅} ⊆ 𝑆)
5554adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → {∅} ⊆ 𝑆)
5650, 55unssd 4190 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑥 ∪ {∅}) ⊆ 𝑆)
5756adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → (𝑥 ∪ {∅}) ⊆ 𝑆)
5846, 57fssd 6728 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → 𝑒:ℕ⟶𝑆)
5958adantr 486 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → 𝑒:ℕ⟶𝑆)
60 simpr 490 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → Disj 𝑛 ∈ ℕ (𝑒‘𝑛))
61 ismeannd.iun . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑒:ℕ⟶𝑆 ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑛 ∈ ℕ (𝑒‘𝑛)) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))))
6244, 59, 60, 61syl3anc 1398 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑛 ∈ ℕ (𝑒‘𝑛)) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))))
6362adantllr 732 . . . . . . . . . . 11 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑛 ∈ ℕ (𝑒‘𝑛)) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))))
641feqmptd 6954 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝑀 = (𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)))
6564reseq1d 5968 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑀 ↾ 𝑥) = ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥))
6665adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑀 ↾ 𝑥) = ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥))
6766adantr 486 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑀 ↾ 𝑥) = ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥))
6850resmptd 6031 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥) = (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)))
6968adantr 486 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥) = (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)))
70 snssi 4742 . . . . . . . . . . . . . . . . . . . . 21 (∅ ∈ 𝑥 → {∅} ⊆ 𝑥)
71 ssequn2 4187 . . . . . . . . . . . . . . . . . . . . 21 ({∅} ⊆ 𝑥 ↔ (𝑥 ∪ {∅}) = 𝑥)
7270, 71sylib 221 . . . . . . . . . . . . . . . . . . . 20 (∅ ∈ 𝑥 → (𝑥 ∪ {∅}) = 𝑥)
7372eqcomd 2766 . . . . . . . . . . . . . . . . . . 19 (∅ ∈ 𝑥 → 𝑥 = (𝑥 ∪ {∅}))
7473mpteq1d 5194 . . . . . . . . . . . . . . . . . 18 (∅ ∈ 𝑥 → (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦)))
7574adantl 487 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦)))
7667, 69, 753eqtrd 2799 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑀 ↾ 𝑥) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦)))
7776fveq2d 6890 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
78 nfv 1946 . . . . . . . . . . . . . . . . 17 Ⅎ𝑦((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥)
79 simplr 781 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → 𝑥 ∈ 𝒫 dom 𝑀)
80 p0ex 5345 . . . . . . . . . . . . . . . . . 18 {∅} ∈ V
8180a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → {∅} ∈ V)
82 disjsn 4668 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∩ {∅}) = ∅ ↔ ¬ ∅ ∈ 𝑥)
8382bilanri 512 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (𝑥 ∩ {∅}) = ∅)
841ad2antrr 739 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ 𝑥) → 𝑀:𝑆⟶(0[,]+∞))
8550sselda 3908 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ 𝑆)
8684, 85ffvelcdmd 7086 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ 𝑥) → (𝑀‘𝑦) ∈ (0[,]+∞))
8786adantlr 728 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) ∧ 𝑦 ∈ 𝑥) → (𝑀‘𝑦) ∈ (0[,]+∞))
88 elsni 4597 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ {∅} → 𝑦 = ∅)
8988fveq2d 6890 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ {∅} → (𝑀‘𝑦) = (𝑀‘∅))
9089adantl 487 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) = (𝑀‘∅))
911, 52ffvelcdmd 7086 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑀‘∅) ∈ (0[,]+∞))
9291adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘∅) ∈ (0[,]+∞))
9390, 92eqeltrd 2860 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) ∈ (0[,]+∞))
9493ad4ant14 765 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) ∈ (0[,]+∞))
9578, 79, 81, 83, 87, 94sge0splitmpt 47515 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))) = ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦)))))
96 fveq2 6886 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = ∅ → (𝑀‘𝑦) = (𝑀‘∅))
9796adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑦 = ∅) → (𝑀‘𝑦) = (𝑀‘∅))
988adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑦 = ∅) → (𝑀‘∅) = 0)
9997, 98eqtrd 2795 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑦 = ∅) → (𝑀‘𝑦) = 0)
10088, 99sylan2 605 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) = 0)
101100mpteq2dva 5197 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑦 ∈ {∅} ↦ (𝑀‘𝑦)) = (𝑦 ∈ {∅} ↦ 0))
102101fveq2d 6890 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦))) = (Σ^‘(𝑦 ∈ {∅} ↦ 0)))
103 nfv 1946 . . . . . . . . . . . . . . . . . . . 20 Ⅎ𝑦𝜑
10480a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → {∅} ∈ V)
105103, 104sge0z 47479 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ 0)) = 0)
106102, 105eqtrd 2795 . . . . . . . . . . . . . . . . . 18 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦))) = 0)
107106oveq2d 7437 . . . . . . . . . . . . . . . . 17 (𝜑 → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦)))) = ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e 0))
108107ad2antrr 739 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦)))) = ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e 0))
109 simpr 490 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ∈ 𝒫 dom 𝑀)
11066, 68eqtrd 2795 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑀 ↾ 𝑥) = (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)))
1111adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑀:𝑆⟶(0[,]+∞))
112111, 50fssresd 6750 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑀 ↾ 𝑥):𝑥⟶(0[,]+∞))
113110, 112feq1dd 6693 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)):𝑥⟶(0[,]+∞))
114109, 113sge0xrcl 47489 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) ∈ ℝ*)
115114xaddridd 13377 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e 0) = (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))))
116110fveq2d 6890 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))))
117116eqcomd 2766 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) = (Σ^‘(𝑀 ↾ 𝑥)))
118115, 117eqtrd 2795 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e 0) = (Σ^‘(𝑀 ↾ 𝑥)))
119118adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +e 0) = (Σ^‘(𝑀 ↾ 𝑥)))
12095, 108, 1193eqtrrd 2800 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
12177, 120pm2.61dan 825 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
122121ad2antrr 739 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
123 nfv 1946 . . . . . . . . . . . . . 14 Ⅎ𝑦(((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))
124 nfv 1946 . . . . . . . . . . . . . . 15 Ⅎ𝑛((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
125 nfdisj1 5083 . . . . . . . . . . . . . . 15 Ⅎ𝑛Disj 𝑛 ∈ ℕ (𝑒‘𝑛)
126124, 125nfan 1931 . . . . . . . . . . . . . 14 Ⅎ𝑛(((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))
127 fveq2 6886 . . . . . . . . . . . . . 14 (𝑦 = (𝑒‘𝑛) → (𝑀‘𝑦) = (𝑀‘(𝑒‘𝑛)))
128 nnex 12345 . . . . . . . . . . . . . . 15 ℕ ∈ V
129128a1i 11 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → ℕ ∈ V)
130 simplr 781 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
131 eqidd 2761 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) ∧ 𝑛 ∈ ℕ) → (𝑒‘𝑛) = (𝑒‘𝑛))
1321ad2antrr 739 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → 𝑀:𝑆⟶(0[,]+∞))
13356sselda 3908 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → 𝑦 ∈ 𝑆)
134132, 133ffvelcdmd 7086 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → (𝑀‘𝑦) ∈ (0[,]+∞))
135134ad4ant14 765 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → (𝑀‘𝑦) ∈ (0[,]+∞))
13644, 99sylan 592 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) ∧ 𝑦 = ∅) → (𝑀‘𝑦) = 0)
137123, 126, 127, 129, 130, 60, 131, 135, 136sge0fodjrn 47521 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))))
138122, 137eqtr2d 2796 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))) = (Σ^‘(𝑀 ↾ 𝑥)))
139138adantllr 732 . . . . . . . . . . 11 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))) = (Σ^‘(𝑀 ↾ 𝑥)))
14043, 63, 1393eqtrd 2799 . . . . . . . . . 10 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
14138, 39, 40, 140syl21anc 851 . . . . . . . . 9 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
142141ex 418 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) → ((𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥))))
143142exlimdv 1965 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) → (∃𝑒(𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥))))
14429, 37, 143sylc 66 . . . . . 6 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
14526, 144pm2.61dan 825 . . . . 5 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
146145ex 418 . . . 4 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → ((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥))))
147146ralrimiva 3154 . . 3 (𝜑 → ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥))))
1487, 8, 147jca31 524 . 2 (𝜑 → (((𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg) ∧ (𝑀‘∅) = 0) ∧ ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))))
149 ismea 47555 . 2 (𝑀 ∈ Meas ↔ (((𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg) ∧ (𝑀‘∅) = 0) ∧ ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))))
150148, 149sylibr 237 1 (𝜑 → 𝑀 ∈ Meas)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1569  ∃wex 1811   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  Vcvv 3450   ⊆ wss 3895   ∩ cin 4089   ∪ cun 4149  ∅c0 4278  𝒫 cpw 4556  {csn 4584  ∪ cuni 4866  ∪ ciun 4950  Disj wdisj 5069   class class class wbr 5102   ↦ cmpt 5185  dom cdm 5650   ↾ cres 5652  ⟶wf 6535  –onto→wfo 6537  ‘cfv 6539  (class class class)co 7421  ωcom 7878   ≼ cdom 8975  0cc0 11204  +∞cpnf 11344  ℕcn 12339   +e cxad 13243  [,]cicc 13483  SAlgcsalg 47412  Σ^csumge0 47466  Meascmea 47553
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 7752  ax-inf2 9646  ax-cnex 11260  ax-resscn 11261  ax-1cn 11262  ax-icn 11263  ax-addcl 11264  ax-addrcl 11265  ax-mulcl 11266  ax-mulrcl 11267  ax-mulcom 11268  ax-addass 11269  ax-mulass 11270  ax-distr 11271  ax-i2m1 11272  ax-1ne0 11273  ax-1rid 11274  ax-rnegex 11275  ax-rrecex 11276  ax-cnre 11277  ax-pre-lttri 11278  ax-pre-lttrn 11279  ax-pre-ltadd 11280  ax-pre-mulgt0 11281  ax-pre-sup 11282
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 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  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 6541  df-fn 6542  df-f 6543  df-f1 6544  df-fo 6545  df-f1o 6546  df-fv 6547  df-isom 6548  df-riota 7378  df-ov 7424  df-oprab 7425  df-mpo 7426  df-om 7879  df-1st 8002  df-2nd 8003  df-frecs 8303  df-wrecs 8334  df-recs 8383  df-rdg 8422  df-1o 8480  df-er 8721  df-en 8978  df-dom 8979  df-sdom 8980  df-fin 8981  df-sup 9438  df-oi 9508  df-card 10024  df-pnf 11349  df-mnf 11350  df-xr 11351  df-ltxr 11352  df-le 11353  df-sub 11547  df-neg 11548  df-div 11978  df-nn 12340  df-2 12409  df-3 12410  df-n0 12611  df-z 12698  df-uz 12970  df-rp 13125  df-xadd 13246  df-ico 13486  df-icc 13487  df-fz 13644  df-fzo 13793  df-seq 14149  df-exp 14209  df-hash 14479  df-cj 15272  df-re 15273  df-im 15274  df-sqrt 15408  df-abs 15409  df-clim 15661  df-sum 15860  df-salg 47413  df-sumge0 47467  df-mea 47554
This theorem is used by:  volmea  47578  caratheodory  47632
  Copyright terms: Public domain W3C validator