Step | Hyp | Ref
| Expression |
1 | | df-proj1 4568 |
. 2
⊢ Proj1 A = {x ∣ Phi x ∈ A} |
2 | | vex 2863 |
. . . . . . 7
⊢ x ∈
V |
3 | | vex 2863 |
. . . . . . 7
⊢ y ∈
V |
4 | 2, 3 | opkelimagek 4273 |
. . . . . 6
⊢ (⟪x, y⟫
∈
Imagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c))
“k ℘1℘11c) ∩ ( Nn ×k V)) ∪ (
Ik ∩ ( ∼ Nn
×k V))) ↔ y =
(((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c))
“k ℘1℘11c) ∩ ( Nn ×k V)) ∪ (
Ik ∩ ( ∼ Nn
×k V))) “k x)) |
5 | 3, 2 | opkelcnvk 4251 |
. . . . . 6
⊢ (⟪y, x⟫
∈ ◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V))) ↔ ⟪x, y⟫ ∈
Imagek((Imagek(( Ins3k
∼ (( Ins3k Sk ∩ Ins2k
Sk ) “k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V)))) |
6 | | dfphi2 4570 |
. . . . . . 7
⊢ Phi x =
(((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c))
“k ℘1℘11c) ∩ ( Nn ×k V)) ∪ (
Ik ∩ ( ∼ Nn
×k V))) “k x) |
7 | 6 | eqeq2i 2363 |
. . . . . 6
⊢ (y = Phi x ↔ y =
(((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c))
“k ℘1℘11c) ∩ ( Nn ×k V)) ∪ (
Ik ∩ ( ∼ Nn
×k V))) “k x)) |
8 | 4, 5, 7 | 3bitr4ri 269 |
. . . . 5
⊢ (y = Phi x ↔ ⟪y, x⟫
∈ ◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V)))) |
9 | 8 | rexbii 2640 |
. . . 4
⊢ (∃y ∈ A y = Phi x ↔ ∃y ∈ A
⟪y, x⟫ ∈ ◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V)))) |
10 | | risset 2662 |
. . . 4
⊢ ( Phi x ∈ A ↔
∃y ∈ A y = Phi x) |
11 | 2 | elimak 4260 |
. . . 4
⊢ (x ∈ (◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V))) “k A) ↔
∃y ∈ A ⟪y, x⟫ ∈ ◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V)))) |
12 | 9, 10, 11 | 3bitr4ri 269 |
. . 3
⊢ (x ∈ (◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V))) “k A) ↔
Phi x ∈ A) |
13 | 12 | abbi2i 2465 |
. 2
⊢ (◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V))) “k A) =
{x ∣ Phi
x ∈ A} |
14 | 1, 13 | eqtr4i 2376 |
1
⊢ Proj1 A = (◡kImagek((Imagek((
Ins3k ∼ (( Ins3k Sk ∩
Ins2k Sk )
“k ℘1℘11c) ∖ ((
Ins2k Ins2k
Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k
SIk SIk
Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn
×k V)) ∪ ( Ik ∩ ( ∼ Nn
×k V))) “k A) |