Proof of Theorem proj2exg
Step | Hyp | Ref
| Expression |
1 | | dfproj22 4577 |
. 2
⊢ Proj2 A = (◡k ∼ (( Ins2k Sk ⊕ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) “k ℘1℘11c) “k A) |
2 | | ssetkex 4294 |
. . . . . . . 8
⊢ Sk ∈
V |
3 | 2 | ins2kex 4307 |
. . . . . . 7
⊢ Ins2k Sk ∈
V |
4 | | addcexlem 4382 |
. . . . . . . . . . . . . . . 16
⊢ ( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) ∈ V |
5 | | 1cex 4142 |
. . . . . . . . . . . . . . . . . 18
⊢
1c ∈
V |
6 | 5 | pw1ex 4303 |
. . . . . . . . . . . . . . . . 17
⊢ ℘11c ∈ V |
7 | 6 | pw1ex 4303 |
. . . . . . . . . . . . . . . 16
⊢ ℘1℘11c ∈ V |
8 | 4, 7 | imakex 4300 |
. . . . . . . . . . . . . . 15
⊢ (( 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) ∈ V |
9 | 8 | imagekex 4312 |
. . . . . . . . . . . . . 14
⊢
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) ∈ V |
10 | | nncex 4396 |
. . . . . . . . . . . . . . 15
⊢ Nn ∈
V |
11 | | vvex 4109 |
. . . . . . . . . . . . . . 15
⊢ V ∈ V |
12 | 10, 11 | xpkex 4289 |
. . . . . . . . . . . . . 14
⊢ ( Nn ×k V) ∈ V |
13 | 9, 12 | inex 4105 |
. . . . . . . . . . . . 13
⊢
(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)) ∈ V |
14 | | idkex 4314 |
. . . . . . . . . . . . . 14
⊢
Ik ∈ V |
15 | 10 | complex 4104 |
. . . . . . . . . . . . . . 15
⊢ ∼ Nn ∈
V |
16 | 15, 11 | xpkex 4289 |
. . . . . . . . . . . . . 14
⊢ ( ∼ Nn ×k V) ∈ V |
17 | 14, 16 | inex 4105 |
. . . . . . . . . . . . 13
⊢ (
Ik ∩ ( ∼ Nn
×k V)) ∈
V |
18 | 13, 17 | unex 4106 |
. . . . . . . . . . . 12
⊢
((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))) ∈
V |
19 | 18 | imagekex 4312 |
. . . . . . . . . . 11
⊢
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))) ∈
V |
20 | 19 | cnvkex 4287 |
. . . . . . . . . 10
⊢ ◡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))) ∈ V |
21 | 20, 2 | cokex 4310 |
. . . . . . . . 9
⊢ (◡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 Sk ) ∈ V |
22 | | snex 4111 |
. . . . . . . . . 10
⊢
{{0c}} ∈
V |
23 | 22, 11 | xpkex 4289 |
. . . . . . . . 9
⊢
({{0c}} ×k V) ∈ V |
24 | 21, 23 | unex 4106 |
. . . . . . . 8
⊢ ((◡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 Sk ) ∪ ({{0c}} ×k
V)) ∈ V |
25 | 24 | ins3kex 4308 |
. . . . . . 7
⊢ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V)) ∈ V |
26 | 3, 25 | symdifex 4108 |
. . . . . 6
⊢ ( Ins2k Sk ⊕ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) ∈ V |
27 | 26, 7 | imakex 4300 |
. . . . 5
⊢ (( Ins2k Sk ⊕ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) “k ℘1℘11c) ∈
V |
28 | 27 | complex 4104 |
. . . 4
⊢ ∼ (( Ins2k Sk ⊕ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) “k ℘1℘11c) ∈
V |
29 | 28 | cnvkex 4287 |
. . 3
⊢ ◡k ∼ (( Ins2k Sk ⊕ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) “k ℘1℘11c) ∈
V |
30 | | imakexg 4299 |
. . 3
⊢ ((◡k ∼ (( Ins2k Sk ⊕ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) “k ℘1℘11c) ∈ V
∧ A ∈ V) → (◡k ∼ (( Ins2k Sk ⊕
Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) “k ℘1℘11c) “k A) ∈ V) |
31 | 29, 30 | mpan 651 |
. 2
⊢ (A ∈ V → (◡k ∼ (( Ins2k Sk ⊕ Ins3k ((◡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 Sk ) ∪ ({{0c}} ×k
V))) “k ℘1℘11c) “k A) ∈ V) |
32 | 1, 31 | syl5eqel 2437 |
1
⊢ (A ∈ V → Proj2
A ∈ V) |