Step | Hyp | Ref
| Expression |
1 | | omsmon.a |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐴 ⊆ 𝐵) |
2 | 1 | adantr 480 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑧 ∈ 𝒫 dom 𝑅) → 𝐴 ⊆ 𝐵) |
3 | | sstr2 3575 |
. . . . . . . . . 10
⊢ (𝐴 ⊆ 𝐵 → (𝐵 ⊆ ∪ 𝑧 → 𝐴 ⊆ ∪ 𝑧)) |
4 | 2, 3 | syl 17 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑧 ∈ 𝒫 dom 𝑅) → (𝐵 ⊆ ∪ 𝑧 → 𝐴 ⊆ ∪ 𝑧)) |
5 | 4 | anim1d 586 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑧 ∈ 𝒫 dom 𝑅) → ((𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω) → (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω))) |
6 | 5 | ss2rabdv 3646 |
. . . . . . 7
⊢ (𝜑 → {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ⊆ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) |
7 | | resmpt 5369 |
. . . . . . 7
⊢ ({𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ⊆ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} → ((𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ↾ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) = (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦))) |
8 | 6, 7 | syl 17 |
. . . . . 6
⊢ (𝜑 → ((𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ↾ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) = (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦))) |
9 | | resss 5342 |
. . . . . 6
⊢ ((𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ↾ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ⊆ (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) |
10 | 8, 9 | syl6eqssr 3619 |
. . . . 5
⊢ (𝜑 → (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ⊆ (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦))) |
11 | | rnss 5275 |
. . . . 5
⊢ ((𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ⊆ (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) → ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ⊆ ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦))) |
12 | 10, 11 | syl 17 |
. . . 4
⊢ (𝜑 → ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ⊆ ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦))) |
13 | | oms.r |
. . . . . . . . . 10
⊢ (𝜑 → 𝑅:𝑄⟶(0[,]+∞)) |
14 | 13 | ad2antrr 758 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → 𝑅:𝑄⟶(0[,]+∞)) |
15 | | ssrab2 3650 |
. . . . . . . . . . . . 13
⊢ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ⊆ 𝒫 dom
𝑅 |
16 | | simplr 788 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) |
17 | 15, 16 | sseldi 3566 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → 𝑥 ∈ 𝒫 dom 𝑅) |
18 | | elpwi 4117 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ 𝒫 dom 𝑅 → 𝑥 ⊆ dom 𝑅) |
19 | 17, 18 | syl 17 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → 𝑥 ⊆ dom 𝑅) |
20 | | fdm 5964 |
. . . . . . . . . . . . 13
⊢ (𝑅:𝑄⟶(0[,]+∞) → dom 𝑅 = 𝑄) |
21 | 13, 20 | syl 17 |
. . . . . . . . . . . 12
⊢ (𝜑 → dom 𝑅 = 𝑄) |
22 | 21 | ad2antrr 758 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → dom 𝑅 = 𝑄) |
23 | 19, 22 | sseqtrd 3604 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → 𝑥 ⊆ 𝑄) |
24 | | simpr 476 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ 𝑥) |
25 | 23, 24 | sseldd 3569 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ 𝑄) |
26 | 14, 25 | ffvelrnd 6268 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) ∧ 𝑦 ∈ 𝑥) → (𝑅‘𝑦) ∈ (0[,]+∞)) |
27 | 26 | ralrimiva 2949 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) → ∀𝑦 ∈ 𝑥 (𝑅‘𝑦) ∈ (0[,]+∞)) |
28 | | vex 3176 |
. . . . . . . 8
⊢ 𝑥 ∈ V |
29 | | nfcv 2751 |
. . . . . . . . 9
⊢
Ⅎ𝑦𝑥 |
30 | 29 | esumcl 29419 |
. . . . . . . 8
⊢ ((𝑥 ∈ V ∧ ∀𝑦 ∈ 𝑥 (𝑅‘𝑦) ∈ (0[,]+∞)) →
Σ*𝑦 ∈
𝑥(𝑅‘𝑦) ∈ (0[,]+∞)) |
31 | 28, 30 | mpan 702 |
. . . . . . 7
⊢
(∀𝑦 ∈
𝑥 (𝑅‘𝑦) ∈ (0[,]+∞) →
Σ*𝑦 ∈
𝑥(𝑅‘𝑦) ∈ (0[,]+∞)) |
32 | 27, 31 | syl 17 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}) →
Σ*𝑦 ∈
𝑥(𝑅‘𝑦) ∈ (0[,]+∞)) |
33 | 32 | ralrimiva 2949 |
. . . . 5
⊢ (𝜑 → ∀𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)}Σ*𝑦 ∈ 𝑥(𝑅‘𝑦) ∈ (0[,]+∞)) |
34 | | eqid 2610 |
. . . . . 6
⊢ (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) = (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) |
35 | 34 | rnmptss 6299 |
. . . . 5
⊢
(∀𝑥 ∈
{𝑧 ∈ 𝒫 dom
𝑅 ∣ (𝐴 ⊆ ∪ 𝑧
∧ 𝑧 ≼
ω)}Σ*𝑦 ∈ 𝑥(𝑅‘𝑦) ∈ (0[,]+∞) → ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ⊆ (0[,]+∞)) |
36 | 33, 35 | syl 17 |
. . . 4
⊢ (𝜑 → ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)) ⊆ (0[,]+∞)) |
37 | 12, 36 | xrge0infssd 28916 |
. . 3
⊢ (𝜑 → inf(ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)), (0[,]+∞), < ) ≤ inf(ran
(𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)), (0[,]+∞), < )) |
38 | | oms.o |
. . . 4
⊢ (𝜑 → 𝑄 ∈ 𝑉) |
39 | | omsmon.b |
. . . . 5
⊢ (𝜑 → 𝐵 ⊆ ∪ 𝑄) |
40 | 1, 39 | sstrd 3578 |
. . . 4
⊢ (𝜑 → 𝐴 ⊆ ∪ 𝑄) |
41 | | omsfval 29683 |
. . . 4
⊢ ((𝑄 ∈ 𝑉 ∧ 𝑅:𝑄⟶(0[,]+∞) ∧ 𝐴 ⊆ ∪ 𝑄)
→ ((toOMeas‘𝑅)‘𝐴) = inf(ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)), (0[,]+∞), < )) |
42 | 38, 13, 40, 41 | syl3anc 1318 |
. . 3
⊢ (𝜑 → ((toOMeas‘𝑅)‘𝐴) = inf(ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐴 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)), (0[,]+∞), < )) |
43 | | omsfval 29683 |
. . . 4
⊢ ((𝑄 ∈ 𝑉 ∧ 𝑅:𝑄⟶(0[,]+∞) ∧ 𝐵 ⊆ ∪ 𝑄)
→ ((toOMeas‘𝑅)‘𝐵) = inf(ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)), (0[,]+∞), < )) |
44 | 38, 13, 39, 43 | syl3anc 1318 |
. . 3
⊢ (𝜑 → ((toOMeas‘𝑅)‘𝐵) = inf(ran (𝑥 ∈ {𝑧 ∈ 𝒫 dom 𝑅 ∣ (𝐵 ⊆ ∪ 𝑧 ∧ 𝑧 ≼ ω)} ↦
Σ*𝑦 ∈
𝑥(𝑅‘𝑦)), (0[,]+∞), < )) |
45 | 37, 42, 44 | 3brtr4d 4615 |
. 2
⊢ (𝜑 → ((toOMeas‘𝑅)‘𝐴) ≤ ((toOMeas‘𝑅)‘𝐵)) |
46 | | oms.m |
. . 3
⊢ 𝑀 = (toOMeas‘𝑅) |
47 | 46 | fveq1i 6104 |
. 2
⊢ (𝑀‘𝐴) = ((toOMeas‘𝑅)‘𝐴) |
48 | 46 | fveq1i 6104 |
. 2
⊢ (𝑀‘𝐵) = ((toOMeas‘𝑅)‘𝐵) |
49 | 45, 47, 48 | 3brtr4g 4617 |
1
⊢ (𝜑 → (𝑀‘𝐴) ≤ (𝑀‘𝐵)) |