Proof of Theorem sshjvalt
| Step | Hyp | Ref
| Expression |
| 1 | | fvex 2838 |
. . 3
⊢ (⊥ ‘(⊥ ‘(A ∪ B)))
∈ V |
| 2 | | uneq1 1605 |
. . . . 5
⊢ (x =
A → (x ∪ y) =
(A ∪ y)) |
| 3 | 2 | fveq2d 2836 |
. . . 4
⊢ (x =
A → (⊥ ‘(x ∪ y)) =
(⊥ ‘(A ∪ y))) |
| 4 | 3 | fveq2d 2836 |
. . 3
⊢ (x =
A → (⊥ ‘(⊥
‘(x ∪ y))) = (⊥ ‘(⊥ ‘(A ∪ y)))) |
| 5 | | uneq2 1606 |
. . . . 5
⊢ (y =
B → (A ∪ y) =
(A ∪ B)) |
| 6 | 5 | fveq2d 2836 |
. . . 4
⊢ (y =
B → (⊥ ‘(A ∪ y)) =
(⊥ ‘(A ∪ B))) |
| 7 | 6 | fveq2d 2836 |
. . 3
⊢ (y =
B → (⊥ ‘(⊥
‘(A ∪ y))) = (⊥ ‘(⊥ ‘(A ∪ B)))) |
| 8 | | df-chj 5277 |
. . . 4
⊢ ∨ℋ =
{〈〈x, y〉, z〉∣((x ⊆ ℋ ∧ y ⊆ ℋ ) ∧ z = (⊥ ‘(⊥ ‘(x ∪ y))))} |
| 9 | | visset 1350 |
. . . . . . . 8
⊢ x
∈ V |
| 10 | 9 | elpw 1801 |
. . . . . . 7
⊢ (x
∈ ℘ ℋ ↔ x ⊆
ℋ ) |
| 11 | | visset 1350 |
. . . . . . . 8
⊢ y
∈ V |
| 12 | 11 | elpw 1801 |
. . . . . . 7
⊢ (y
∈ ℘ ℋ ↔ y ⊆
ℋ ) |
| 13 | 10, 12 | anbi12i 369 |
. . . . . 6
⊢ ((x
∈ ℘ ℋ ∧ y ∈
℘ ℋ ) ↔ (x ⊆
ℋ ∧ y ⊆ ℋ
)) |
| 14 | 13 | anbi1i 368 |
. . . . 5
⊢ (((x
∈ ℘ ℋ ∧ y ∈
℘ ℋ ) ∧ z = (⊥
‘(⊥ ‘(x ∪ y)))) ↔ ((x
⊆ ℋ ∧ y ⊆ ℋ )
∧ z = (⊥ ‘(⊥
‘(x ∪ y))))) |
| 15 | 14 | bioprabi 3027 |
. . . 4
⊢ {〈〈x, y〉,
z〉∣((x ∈ ℘ ℋ ∧ y ∈ ℘ ℋ ) ∧ z = (⊥ ‘(⊥ ‘(x ∪ y))))} =
{〈〈x, y〉, z〉∣((x ⊆ ℋ ∧ y ⊆ ℋ ) ∧ z = (⊥ ‘(⊥ ‘(x ∪ y))))} |
| 16 | 8, 15 | eqtr4 1122 |
. . 3
⊢ ∨ℋ =
{〈〈x, y〉, z〉∣((x ∈ ℘ ℋ ∧ y ∈ ℘ ℋ ) ∧ z = (⊥ ‘(⊥ ‘(x ∪ y))))} |
| 17 | 1, 4, 7, 16 | oprabval2 3051 |
. 2
⊢ ((A
∈ ℘ ℋ ∧ B ∈
℘ ℋ ) → (A
∨ℋ B) = (⊥
‘(⊥ ‘(A ∪ B)))) |
| 18 | | ax-hilex 4983 |
. . 3
⊢ ℋ ∈ V |
| 19 | | elpw2g 1803 |
. . 3
⊢ ( ℋ ∈ V → (A ∈ ℘ ℋ ↔ A ⊆ ℋ )) |
| 20 | 18, 19 | ax-mp 6 |
. 2
⊢ (A
∈ ℘ ℋ ↔ A ⊆
ℋ ) |
| 21 | | elpw2g 1803 |
. . 3
⊢ ( ℋ ∈ V → (B ∈ ℘ ℋ ↔ B ⊆ ℋ )) |
| 22 | 18, 21 | ax-mp 6 |
. 2
⊢ (B
∈ ℘ ℋ ↔ B ⊆
ℋ ) |
| 23 | 17, 20, 22 | syl2anbr 351 |
1
⊢ ((A
⊆ ℋ ∧ B ⊆ ℋ )
→ (A ∨ℋ B) = (⊥ ‘(⊥ ‘(A ∪ B)))) |