Proof of Theorem pjmvalt
| Step | Hyp | Ref
| Expression |
| 1 | | eleq2 1150 |
. . . . . . . . 9
⊢ (h =
H → (z ∈ h
↔ z ∈ H)) |
| 2 | | fveq2 2832 |
. . . . . . . . . 10
⊢ (h =
H → (⊥ ‘h) = (⊥ ‘H)) |
| 3 | | rexeq 1325 |
. . . . . . . . . 10
⊢ ((⊥ ‘h) = (⊥ ‘H) → (∃w ∈ (⊥ ‘h)x = (z +v w) ↔ ∃w ∈ (⊥ ‘H)x = (z +v w))) |
| 4 | 2, 3 | syl 12 |
. . . . . . . . 9
⊢ (h =
H → (∃w ∈ (⊥ ‘h)x = (z +v w) ↔ ∃w ∈ (⊥ ‘H)x = (z +v w))) |
| 5 | 1, 4 | anbi12d 476 |
. . . . . . . 8
⊢ (h =
H → ((z ∈ h ∧
∃w ∈ (⊥ ‘h)x = (z +v w)) ↔ (z
∈ H ∧ ∃w ∈ (⊥ ‘H)x = (z +v w)))) |
| 6 | 5 | biabdv 1183 |
. . . . . . 7
⊢ (h =
H → {z∣(z
∈ h ∧ ∃w ∈ (⊥ ‘h)x = (z +v w))} = {z∣(z
∈ H ∧ ∃w ∈ (⊥ ‘H)x = (z +v w))}) |
| 7 | | df-rab 1208 |
. . . . . . 7
⊢ {z
∈ h∣∃w ∈ (⊥ ‘h)x = (z +v w)} = {z∣(z
∈ h ∧ ∃w ∈ (⊥ ‘h)x = (z +v w))} |
| 8 | | df-rab 1208 |
. . . . . . 7
⊢ {z
∈ H∣∃w ∈ (⊥ ‘H)x = (z +v w)} = {z∣(z
∈ H ∧ ∃w ∈ (⊥ ‘H)x = (z +v w))} |
| 9 | 6, 7, 8 | 3eqtr4g 1147 |
. . . . . 6
⊢ (h =
H → {z ∈ h∣∃w
∈ (⊥ ‘h)x = (z
+v w)} = {z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)}) |
| 10 | 9 | unieqd 1929 |
. . . . 5
⊢ (h =
H → ∪{z ∈ h∣∃w
∈ (⊥ ‘h)x = (z
+v w)} = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)}) |
| 11 | 10 | cleq2d 1112 |
. . . 4
⊢ (h =
H → (y = ∪{z ∈ h∣∃w
∈ (⊥ ‘h)x = (z
+v w)} ↔ y = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)})) |
| 12 | 11 | anbi2d 468 |
. . 3
⊢ (h =
H → ((x ∈ ℋ ∧ y = ∪{z ∈ h∣∃w
∈ (⊥ ‘h)x = (z
+v w)}) ↔ (x ∈ ℋ ∧ y = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)}))) |
| 13 | 12 | biopabdv 2102 |
. 2
⊢ (h =
H → {〈x, y〉∣(x
∈ ℋ ∧ y = ∪{z ∈ h∣∃w
∈ (⊥ ‘h)x = (z
+v w)})} =
{〈x, y〉∣(x
∈ ℋ ∧ y = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)})}) |
| 14 | | df-pj 5244 |
. 2
⊢ Proj = {〈h, f〉∣(h
∈ Cℋ ∧ f =
{〈x, y〉∣(x
∈ ℋ ∧ y = ∪{z ∈ h∣∃w
∈ (⊥ ‘h)x = (z
+v w)})})} |
| 15 | | ax-hilex 4983 |
. . 3
⊢ ℋ ∈ V |
| 16 | | moeq 1431 |
. . . 4
⊢ ∃*y y = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)} |
| 17 | 16 | a1i 7 |
. . 3
⊢ (x
∈ ℋ → ∃*y y = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)}) |
| 18 | 15, 17 | funopabex 2742 |
. 2
⊢ {〈x, y〉∣(x
∈ ℋ ∧ y = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)})} ∈
V |
| 19 | 13, 14, 18 | fvopab4 2871 |
1
⊢ (H
∈ Cℋ → (Proj ‘H) = {〈x,
y〉∣(x ∈ ℋ ∧ y = ∪{z ∈ H∣∃w
∈ (⊥ ‘H)x = (z
+v w)})}) |