Step | Hyp | Ref
| Expression |
1 | | biid 250 |
. 2
⊢ (𝐾 ∈ 𝐵 ↔ 𝐾 ∈ 𝐵) |
2 | | paddfval.a |
. . . 4
⊢ 𝐴 = (Atoms‘𝐾) |
3 | | fvex 6113 |
. . . 4
⊢
(Atoms‘𝐾)
∈ V |
4 | 2, 3 | eqeltri 2684 |
. . 3
⊢ 𝐴 ∈ V |
5 | 4 | elpw2 4755 |
. 2
⊢ (𝑋 ∈ 𝒫 𝐴 ↔ 𝑋 ⊆ 𝐴) |
6 | 4 | elpw2 4755 |
. 2
⊢ (𝑌 ∈ 𝒫 𝐴 ↔ 𝑌 ⊆ 𝐴) |
7 | | paddfval.l |
. . . . . 6
⊢ ≤ =
(le‘𝐾) |
8 | | paddfval.j |
. . . . . 6
⊢ ∨ =
(join‘𝐾) |
9 | | paddfval.p |
. . . . . 6
⊢ + =
(+𝑃‘𝐾) |
10 | 7, 8, 2, 9 | paddfval 34101 |
. . . . 5
⊢ (𝐾 ∈ 𝐵 → + = (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}))) |
11 | 10 | oveqd 6566 |
. . . 4
⊢ (𝐾 ∈ 𝐵 → (𝑋 + 𝑌) = (𝑋(𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}))𝑌)) |
12 | 11 | 3ad2ant1 1075 |
. . 3
⊢ ((𝐾 ∈ 𝐵 ∧ 𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → (𝑋 + 𝑌) = (𝑋(𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}))𝑌)) |
13 | | simpl 472 |
. . . . . 6
⊢ ((𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → 𝑋 ∈ 𝒫 𝐴) |
14 | | simpr 476 |
. . . . . 6
⊢ ((𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → 𝑌 ∈ 𝒫 𝐴) |
15 | | unexg 6857 |
. . . . . . 7
⊢ ((𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → (𝑋 ∪ 𝑌) ∈ V) |
16 | 4 | rabex 4740 |
. . . . . . 7
⊢ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)} ∈ V |
17 | | unexg 6857 |
. . . . . . 7
⊢ (((𝑋 ∪ 𝑌) ∈ V ∧ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)} ∈ V) → ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)}) ∈ V) |
18 | 15, 16, 17 | sylancl 693 |
. . . . . 6
⊢ ((𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)}) ∈ V) |
19 | 13, 14, 18 | 3jca 1235 |
. . . . 5
⊢ ((𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → (𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴 ∧ ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)}) ∈ V)) |
20 | 19 | 3adant1 1072 |
. . . 4
⊢ ((𝐾 ∈ 𝐵 ∧ 𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → (𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴 ∧ ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)}) ∈ V)) |
21 | | uneq1 3722 |
. . . . . 6
⊢ (𝑚 = 𝑋 → (𝑚 ∪ 𝑛) = (𝑋 ∪ 𝑛)) |
22 | | rexeq 3116 |
. . . . . . 7
⊢ (𝑚 = 𝑋 → (∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟) ↔ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟))) |
23 | 22 | rabbidv 3164 |
. . . . . 6
⊢ (𝑚 = 𝑋 → {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)} = {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}) |
24 | 21, 23 | uneq12d 3730 |
. . . . 5
⊢ (𝑚 = 𝑋 → ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}) = ((𝑋 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})) |
25 | | uneq2 3723 |
. . . . . 6
⊢ (𝑛 = 𝑌 → (𝑋 ∪ 𝑛) = (𝑋 ∪ 𝑌)) |
26 | | rexeq 3116 |
. . . . . . . 8
⊢ (𝑛 = 𝑌 → (∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟) ↔ ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟))) |
27 | 26 | rexbidv 3034 |
. . . . . . 7
⊢ (𝑛 = 𝑌 → (∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟) ↔ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟))) |
28 | 27 | rabbidv 3164 |
. . . . . 6
⊢ (𝑛 = 𝑌 → {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)} = {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)}) |
29 | 25, 28 | uneq12d 3730 |
. . . . 5
⊢ (𝑛 = 𝑌 → ((𝑋 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}) = ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)})) |
30 | | eqid 2610 |
. . . . 5
⊢ (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})) = (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})) |
31 | 24, 29, 30 | ovmpt2g 6693 |
. . . 4
⊢ ((𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴 ∧ ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)}) ∈ V) → (𝑋(𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}))𝑌) = ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)})) |
32 | 20, 31 | syl 17 |
. . 3
⊢ ((𝐾 ∈ 𝐵 ∧ 𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → (𝑋(𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}))𝑌) = ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)})) |
33 | 12, 32 | eqtrd 2644 |
. 2
⊢ ((𝐾 ∈ 𝐵 ∧ 𝑋 ∈ 𝒫 𝐴 ∧ 𝑌 ∈ 𝒫 𝐴) → (𝑋 + 𝑌) = ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)})) |
34 | 1, 5, 6, 33 | syl3anbr 1362 |
1
⊢ ((𝐾 ∈ 𝐵 ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) → (𝑋 + 𝑌) = ((𝑋 ∪ 𝑌) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑝 ≤ (𝑞 ∨ 𝑟)})) |