Step | Hyp | Ref
| Expression |
1 | | imass2 6011 |
. . . . . . . . . . 11
⊢ (𝐴 ⊆ 𝐵 → ( M “ 𝐴) ⊆ ( M “ 𝐵)) |
2 | 1 | unissd 4851 |
. . . . . . . . . 10
⊢ (𝐴 ⊆ 𝐵 → ∪ ( M
“ 𝐴) ⊆ ∪ ( M “ 𝐵)) |
3 | 2 | sspwd 4551 |
. . . . . . . . 9
⊢ (𝐴 ⊆ 𝐵 → 𝒫 ∪ ( M “ 𝐴) ⊆ 𝒫 ∪ ( M “ 𝐵)) |
4 | 3 | adantl 481 |
. . . . . . . 8
⊢ ((𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵) → 𝒫 ∪ ( M “ 𝐴) ⊆ 𝒫 ∪ ( M “ 𝐵)) |
5 | 4 | adantl 481 |
. . . . . . 7
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → 𝒫 ∪ ( M “ 𝐴) ⊆ 𝒫 ∪ ( M “ 𝐵)) |
6 | | ssrexv 3990 |
. . . . . . 7
⊢
(𝒫 ∪ ( M “ 𝐴) ⊆ 𝒫 ∪ ( M “ 𝐵) → (∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐴)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → ∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))) |
7 | 5, 6 | syl 17 |
. . . . . 6
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → (∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐴)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → ∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))) |
8 | | ssrexv 3990 |
. . . . . . . 8
⊢
(𝒫 ∪ ( M “ 𝐴) ⊆ 𝒫 ∪ ( M “ 𝐵) → (∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → ∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))) |
9 | 5, 8 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → (∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → ∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))) |
10 | 9 | reximdv 3161 |
. . . . . 6
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → (∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → ∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))) |
11 | 7, 10 | syld 47 |
. . . . 5
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → (∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐴)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → ∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))) |
12 | 11 | adantr 480 |
. . . 4
⊢ (((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) ∧ 𝑥 ∈ No )
→ (∃𝑎 ∈
𝒫 ∪ ( M “ 𝐴)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → ∃𝑎 ∈ 𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))) |
13 | 12 | ss2rabdv 4012 |
. . 3
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → {𝑥 ∈ No
∣ ∃𝑎 ∈
𝒫 ∪ ( M “ 𝐴)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)} ⊆ {𝑥 ∈ No
∣ ∃𝑎 ∈
𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}) |
14 | | madeval2 34065 |
. . . 4
⊢ (𝐴 ∈ On → ( M
‘𝐴) = {𝑥 ∈
No ∣ ∃𝑎
∈ 𝒫 ∪ ( M “ 𝐴)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}) |
15 | 14 | adantr 480 |
. . 3
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → ( M ‘𝐴) = {𝑥 ∈ No
∣ ∃𝑎 ∈
𝒫 ∪ ( M “ 𝐴)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}) |
16 | | madeval2 34065 |
. . . . 5
⊢ (𝐵 ∈ On → ( M
‘𝐵) = {𝑥 ∈
No ∣ ∃𝑎
∈ 𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}) |
17 | 16 | adantr 480 |
. . . 4
⊢ ((𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵) → ( M ‘𝐵) = {𝑥 ∈ No
∣ ∃𝑎 ∈
𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}) |
18 | 17 | adantl 481 |
. . 3
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → ( M ‘𝐵) = {𝑥 ∈ No
∣ ∃𝑎 ∈
𝒫 ∪ ( M “ 𝐵)∃𝑏 ∈ 𝒫 ∪ ( M “ 𝐵)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}) |
19 | 13, 15, 18 | 3sstr4d 3970 |
. 2
⊢ ((𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → ( M ‘𝐴) ⊆ ( M ‘𝐵)) |
20 | | madef 34068 |
. . . . . . 7
⊢ M
:On⟶𝒫 No |
21 | 20 | fdmi 6630 |
. . . . . 6
⊢ dom M =
On |
22 | 21 | eleq2i 2825 |
. . . . 5
⊢ (𝐴 ∈ dom M ↔ 𝐴 ∈ On) |
23 | | ndmfv 6824 |
. . . . 5
⊢ (¬
𝐴 ∈ dom M → ( M
‘𝐴) =
∅) |
24 | 22, 23 | sylnbir 330 |
. . . 4
⊢ (¬
𝐴 ∈ On → ( M
‘𝐴) =
∅) |
25 | | 0ss 4333 |
. . . 4
⊢ ∅
⊆ ( M ‘𝐵) |
26 | 24, 25 | eqsstrdi 3977 |
. . 3
⊢ (¬
𝐴 ∈ On → ( M
‘𝐴) ⊆ ( M
‘𝐵)) |
27 | 26 | adantr 480 |
. 2
⊢ ((¬
𝐴 ∈ On ∧ (𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵)) → ( M ‘𝐴) ⊆ ( M ‘𝐵)) |
28 | 19, 27 | pm2.61ian 808 |
1
⊢ ((𝐵 ∈ On ∧ 𝐴 ⊆ 𝐵) → ( M ‘𝐴) ⊆ ( M ‘𝐵)) |