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 47446
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 6718 . . . . . 6 (𝜑 → dom 𝑀 = 𝑆)
32feq2d 6691 . . . . 5 (𝜑 → (𝑀:dom 𝑀⟶(0[,]+∞) ↔ 𝑀:𝑆⟶(0[,]+∞)))
41, 3mpbird 260 . . . 4 (𝜑 → 𝑀:dom 𝑀⟶(0[,]+∞))
5 ismeannd.sal . . . . 5 (𝜑 → 𝑆 ∈ SAlg)
62, 5eqeltrd 2861 . . . 4 (𝜑 → dom 𝑀 ∈ SAlg)
74, 6jca 521 . . 3 (𝜑 → (𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg))
8 ismeannd.m0 . . 3 (𝜑 → (𝑀‘∅) = 0)
9 unieq 4878 . . . . . . . . . . . 12 (𝑥 = ∅ → ∪ 𝑥 = ∪ ∅)
10 uni0 4896 . . . . . . . . . . . . 13 ∪ ∅ = ∅
1110a1i 11 . . . . . . . . . . . 12 (𝑥 = ∅ → ∪ ∅ = ∅)
129, 11eqtrd 2796 . . . . . . . . . . 11 (𝑥 = ∅ → ∪ 𝑥 = ∅)
1312fveq2d 6887 . . . . . . . . . 10 (𝑥 = ∅ → (𝑀‘∪ 𝑥) = (𝑀‘∅))
1413, 8sylan9eqr 2818 . . . . . . . . 9 ((𝜑 ∧ 𝑥 = ∅) → (𝑀‘∪ 𝑥) = 0)
15 reseq2 5965 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑀 ↾ 𝑥) = (𝑀 ↾ ∅))
16 res0 5974 . . . . . . . . . . . . . 14 (𝑀 ↾ ∅) = ∅
1716a1i 11 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑀 ↾ ∅) = ∅)
1815, 17eqtrd 2796 . . . . . . . . . . . 12 (𝑥 = ∅ → (𝑀 ↾ 𝑥) = ∅)
1918fveq2d 6887 . . . . . . . . . . 11 (𝑥 = ∅ → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘∅))
2019adantl 487 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 = ∅) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘∅))
21 sge00 47355 . . . . . . . . . . 11 (Σ^‘∅) = 0
2221a1i 11 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 = ∅) → (Σ^‘∅) = 0)
2320, 22eqtrd 2796 . . . . . . . . 9 ((𝜑 ∧ 𝑥 = ∅) → (Σ^‘(𝑀 ↾ 𝑥)) = 0)
2414, 23eqtr4d 2799 . . . . . . . 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 2964 . . . . . . . . 9 (¬ 𝑥 = ∅ → 𝑥 ≠ ∅)
3231adantl 487 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → 𝑥 ≠ ∅)
33 id 23 . . . . . . . . . . 11 (𝑦 = 𝑤 → 𝑦 = 𝑤)
3433cbvdisjv 5081 . . . . . . . . . 10 (Disj 𝑦 ∈ 𝑥 𝑦 ↔ Disj 𝑤 ∈ 𝑥 𝑤)
3534bilani 510 . . . . . . . . 9 ((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → Disj 𝑤 ∈ 𝑥 𝑤)
3635ad2antlr 740 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ (𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦)) ∧ ¬ 𝑥 = ∅) → Disj 𝑤 ∈ 𝑥 𝑤)
3730, 32, 36nnfoctbdj 47435 . . . . . . 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 46174 . . . . . . . . . . . . 13 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → ∪ 𝑥 = ∪ 𝑛 ∈ ℕ (𝑒‘𝑛))
4241fveq2d 6887 . . . . . . . . . . . 12 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → (𝑀‘∪ 𝑥) = (𝑀‘∪ 𝑛 ∈ ℕ (𝑒‘𝑛)))
4342ad2antlr 740 . . . . . . . . . . 11 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑥) = (𝑀‘∪ 𝑛 ∈ ℕ (𝑒‘𝑛)))
44 simplll 787 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → 𝜑)
45 fof 6794 . . . . . . . . . . . . . . . 16 (𝑒:ℕ–onto→(𝑥 ∪ {∅}) → 𝑒:ℕ⟶(𝑥 ∪ {∅}))
4645adantl 487 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → 𝑒:ℕ⟶(𝑥 ∪ {∅}))
47 elpwi 4564 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ 𝒫 dom 𝑀 → 𝑥 ⊆ dom 𝑀)
4847adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ⊆ dom 𝑀)
492adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → dom 𝑀 = 𝑆)
5048, 49sseqtrd 3967 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ⊆ 𝑆)
51 0sal 47299 . . . . . . . . . . . . . . . . . . . 20 (𝑆 ∈ SAlg → ∅ ∈ 𝑆)
525, 51syl 18 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∅ ∈ 𝑆)
53 snssi 4746 . . . . . . . . . . . . . . . . . . 19 (∅ ∈ 𝑆 → {∅} ⊆ 𝑆)
5452, 53syl 18 . . . . . . . . . . . . . . . . . 18 (𝜑 → {∅} ⊆ 𝑆)
5554adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → {∅} ⊆ 𝑆)
5650, 55unssd 4138 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑥 ∪ {∅}) ⊆ 𝑆)
5756adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) → (𝑥 ∪ {∅}) ⊆ 𝑆)
5846, 57fssd 6725 . . . . . . . . . . . . . 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 6951 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝑀 = (𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)))
6564reseq1d 5969 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑀 ↾ 𝑥) = ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥))
6665adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑀 ↾ 𝑥) = ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥))
6766adantr 486 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑀 ↾ 𝑥) = ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥))
6850resmptd 6032 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥) = (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)))
6968adantr 486 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → ((𝑦 ∈ 𝑆 ↦ (𝑀‘𝑦)) ↾ 𝑥) = (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)))
70 snssi 4746 . . . . . . . . . . . . . . . . . . . . 21 (∅ ∈ 𝑥 → {∅} ⊆ 𝑥)
71 ssequn2 4135 . . . . . . . . . . . . . . . . . . . . 21 ({∅} ⊆ 𝑥 ↔ (𝑥 ∪ {∅}) = 𝑥)
7270, 71sylib 221 . . . . . . . . . . . . . . . . . . . 20 (∅ ∈ 𝑥 → (𝑥 ∪ {∅}) = 𝑥)
7372eqcomd 2767 . . . . . . . . . . . . . . . . . . 19 (∅ ∈ 𝑥 → 𝑥 = (𝑥 ∪ {∅}))
7473mpteq1d 5195 . . . . . . . . . . . . . . . . . 18 (∅ ∈ 𝑥 → (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦)))
7574adantl 487 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦)))
7667, 69, 753eqtrd 2800 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (𝑀 ↾ 𝑥) = (𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦)))
7776fveq2d 6887 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ∅ ∈ 𝑥) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
78 nfv 1947 . . . . . . . . . . . . . . . . 17 Ⅎ𝑦((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥)
79 simplr 781 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → 𝑥 ∈ 𝒫 dom 𝑀)
80 p0ex 5346 . . . . . . . . . . . . . . . . . 18 {∅} ∈ V
8180a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → {∅} ∈ V)
82 disjsn 4672 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∩ {∅}) = ∅ ↔ ¬ ∅ ∈ 𝑥)
8382bilanri 512 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (𝑥 ∩ {∅}) = ∅)
841ad2antrr 739 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ 𝑥) → 𝑀:𝑆⟶(0[,]+∞))
8550sselda 3931 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ 𝑆)
8684, 85ffvelcdmd 7083 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ 𝑥) → (𝑀‘𝑦) ∈ (0[,]+∞))
8786adantlr 728 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) ∧ 𝑦 ∈ 𝑥) → (𝑀‘𝑦) ∈ (0[,]+∞))
88 elsni 4601 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ {∅} → 𝑦 = ∅)
8988fveq2d 6887 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ {∅} → (𝑀‘𝑦) = (𝑀‘∅))
9089adantl 487 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) = (𝑀‘∅))
911, 52ffvelcdmd 7083 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑀‘∅) ∈ (0[,]+∞))
9291adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘∅) ∈ (0[,]+∞))
9390, 92eqeltrd 2861 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) ∈ (0[,]+∞))
9493ad4ant14 765 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) ∈ (0[,]+∞))
9578, 79, 81, 83, 87, 94sge0splitmpt 47390 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))) = ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦)))))
96 fveq2 6883 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = ∅ → (𝑀‘𝑦) = (𝑀‘∅))
9796adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑦 = ∅) → (𝑀‘𝑦) = (𝑀‘∅))
988adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑦 = ∅) → (𝑀‘∅) = 0)
9997, 98eqtrd 2796 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑦 = ∅) → (𝑀‘𝑦) = 0)
10088, 99sylan2 605 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑦 ∈ {∅}) → (𝑀‘𝑦) = 0)
101100mpteq2dva 5198 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑦 ∈ {∅} ↦ (𝑀‘𝑦)) = (𝑦 ∈ {∅} ↦ 0))
102101fveq2d 6887 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦))) = (Σ^‘(𝑦 ∈ {∅} ↦ 0)))
103 nfv 1947 . . . . . . . . . . . . . . . . . . . 20 Ⅎ𝑦𝜑
10480a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → {∅} ∈ V)
105103, 104sge0z 47354 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ 0)) = 0)
106102, 105eqtrd 2796 . . . . . . . . . . . . . . . . . 18 (𝜑 → (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦))) = 0)
107106oveq2d 7434 . . . . . . . . . . . . . . . . 17 (𝜑 → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦)))) = ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 0))
108107ad2antrr 739 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 (Σ^‘(𝑦 ∈ {∅} ↦ (𝑀‘𝑦)))) = ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 0))
109 simpr 490 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑥 ∈ 𝒫 dom 𝑀)
11066, 68eqtrd 2796 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑀 ↾ 𝑥) = (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)))
1111adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → 𝑀:𝑆⟶(0[,]+∞))
112111, 50fssresd 6747 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑀 ↾ 𝑥):𝑥⟶(0[,]+∞))
113110, 112feq1dd 6690 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦)):𝑥⟶(0[,]+∞))
114109, 113sge0xrcl 47364 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) ∈ ℝ*)
115114xaddridd 13366 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 0) = (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))))
116110fveq2d 6887 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))))
117116eqcomd 2767 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) = (Σ^‘(𝑀 ↾ 𝑥)))
118115, 117eqtrd 2796 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 0) = (Σ^‘(𝑀 ↾ 𝑥)))
119118adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → ((Σ^‘(𝑦 ∈ 𝑥 ↦ (𝑀‘𝑦))) +𝑒 0) = (Σ^‘(𝑀 ↾ 𝑥)))
12095, 108, 1193eqtrrd 2801 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ ¬ ∅ ∈ 𝑥) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
12177, 120pm2.61dan 825 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
122121ad2antrr 739 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑀 ↾ 𝑥)) = (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))))
123 nfv 1947 . . . . . . . . . . . . . 14 Ⅎ𝑦(((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))
124 nfv 1947 . . . . . . . . . . . . . . 15 Ⅎ𝑛((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
125 nfdisj1 5084 . . . . . . . . . . . . . . 15 Ⅎ𝑛Disj 𝑛 ∈ ℕ (𝑒‘𝑛)
126124, 125nfan 1932 . . . . . . . . . . . . . 14 Ⅎ𝑛(((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))
127 fveq2 6883 . . . . . . . . . . . . . 14 (𝑦 = (𝑒‘𝑛) → (𝑀‘𝑦) = (𝑀‘(𝑒‘𝑛)))
128 nnex 12334 . . . . . . . . . . . . . . 15 ℕ ∈ V
129128a1i 11 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → ℕ ∈ V)
130 simplr 781 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → 𝑒:ℕ–onto→(𝑥 ∪ {∅}))
131 eqidd 2762 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) ∧ 𝑛 ∈ ℕ) → (𝑒‘𝑛) = (𝑒‘𝑛))
1321ad2antrr 739 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → 𝑀:𝑆⟶(0[,]+∞))
13356sselda 3931 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑦 ∈ (𝑥 ∪ {∅})) → 𝑦 ∈ 𝑆)
134132, 133ffvelcdmd 7083 . . . . . . . . . . . . . . 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 47396 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑦 ∈ (𝑥 ∪ {∅}) ↦ (𝑀‘𝑦))) = (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))))
138122, 137eqtr2d 2797 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))) = (Σ^‘(𝑀 ↾ 𝑥)))
139138adantllr 732 . . . . . . . . . . 11 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (Σ^‘(𝑛 ∈ ℕ ↦ (𝑀‘(𝑒‘𝑛)))) = (Σ^‘(𝑀 ↾ 𝑥)))
14043, 63, 1393eqtrd 2800 . . . . . . . . . 10 (((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ 𝑒:ℕ–onto→(𝑥 ∪ {∅})) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
14138, 39, 40, 140syl21anc 851 . . . . . . . . 9 ((((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) ∧ (𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛))) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))
142141ex 418 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ 𝒫 dom 𝑀) ∧ Disj 𝑦 ∈ 𝑥 𝑦) → ((𝑒:ℕ–onto→(𝑥 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑒‘𝑛)) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥))))
143142exlimdv 1966 . . . . . . 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 3155 . . 3 (𝜑 → ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥))))
1487, 8, 147jca31 524 . 2 (𝜑 → (((𝑀:dom 𝑀⟶(0[,]+∞) ∧ dom 𝑀 ∈ SAlg) ∧ (𝑀‘∅) = 0) ∧ ∀𝑥 ∈ 𝒫 dom 𝑀((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → (𝑀‘∪ 𝑥) = (Σ^‘(𝑀 ↾ 𝑥)))))
149 ismea 47430 . 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 1570  ∃wex 1812   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  Vcvv 3451   ∪ cun 3897   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279  𝒫 cpw 4557  {csn 4584  ∪ cuni 4867  ∪ ciun 4951  Disj wdisj 5070   class class class wbr 5103   ↦ cmpt 5186  dom cdm 5651   ↾ cres 5653  ⟶wf 6533  –onto→wfo 6535  ‘cfv 6537  (class class class)co 7418  ωcom 7875   ≼ cdom 8964  0cc0 11193  +∞cpnf 11333  ℕcn 12328   +𝑒 cxad 13232  [,]cicc 13472  SAlgcsalg 47287  Σ^csumge0 47341  Meascmea 47428
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 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7749  ax-inf2 9635  ax-cnex 11249  ax-resscn 11250  ax-1cn 11251  ax-icn 11252  ax-addcl 11253  ax-addrcl 11254  ax-mulcl 11255  ax-mulrcl 11256  ax-mulcom 11257  ax-addass 11258  ax-mulass 11259  ax-distr 11260  ax-i2m1 11261  ax-1ne0 11262  ax-1rid 11263  ax-rnegex 11264  ax-rrecex 11265  ax-cnre 11266  ax-pre-lttri 11267  ax-pre-lttrn 11268  ax-pre-ltadd 11269  ax-pre-mulgt0 11270  ax-pre-sup 11271
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 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-disj 5071  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7375  df-ov 7421  df-oprab 7422  df-mpo 7423  df-om 7876  df-1st 7999  df-2nd 8000  df-frecs 8292  df-wrecs 8323  df-recs 8372  df-rdg 8411  df-1o 8469  df-er 8710  df-en 8967  df-dom 8968  df-sdom 8969  df-fin 8970  df-sup 9427  df-oi 9497  df-card 10013  df-pnf 11338  df-mnf 11339  df-xr 11340  df-ltxr 11341  df-le 11342  df-sub 11536  df-neg 11537  df-div 11967  df-nn 12329  df-2 12398  df-3 12399  df-n0 12600  df-z 12687  df-uz 12959  df-rp 13114  df-xadd 13235  df-ico 13475  df-icc 13476  df-fz 13633  df-fzo 13782  df-seq 14138  df-exp 14198  df-hash 14468  df-cj 15259  df-re 15260  df-im 15261  df-sqrt 15395  df-abs 15396  df-clim 15648  df-sum 15847  df-salg 47288  df-sumge0 47342  df-mea 47429
This theorem is used by:  volmea  47453  caratheodory  47507
  Copyright terms: Public domain W3C validator