Metamath Proof Explorer


Theorem cusgrfilem2

Description: Lemma 2 for cusgrfi . (Contributed by Alexander van der Vekens, 13-Jan-2018) (Revised by AV, 11-Nov-2020)

Ref Expression
Hypotheses cusgrfi.v V=VtxG
cusgrfi.p P=x𝒫V|aVaNx=aN
cusgrfi.f F=xVNxN
Assertion cusgrfilem2 NVF:VN1-1 ontoP

Proof

Step Hyp Ref Expression
1 cusgrfi.v V=VtxG
2 cusgrfi.p P=x𝒫V|aVaNx=aN
3 cusgrfi.f F=xVNxN
4 eldifi xVNxV
5 id NVNV
6 prelpwi xVNVxN𝒫V
7 4 5 6 syl2anr NVxVNxN𝒫V
8 4 adantl NVxVNxV
9 eldifsni xVNxN
10 9 adantl NVxVNxN
11 eqidd NVxVNxN=xN
12 10 11 jca NVxVNxNxN=xN
13 id xVxV
14 neeq1 a=xaNxN
15 preq1 a=xaN=xN
16 15 eqeq2d a=xxN=aNxN=xN
17 14 16 anbi12d a=xaNxN=aNxNxN=xN
18 17 adantl xVa=xaNxN=aNxNxN=xN
19 13 18 rspcedv xVxNxN=xNaVaNxN=aN
20 8 12 19 sylc NVxVNaVaNxN=aN
21 2 eleq2i xNPxNx𝒫V|aVaNx=aN
22 eqeq1 v=xNv=aNxN=aN
23 22 anbi2d v=xNaNv=aNaNxN=aN
24 23 rexbidv v=xNaVaNv=aNaVaNxN=aN
25 eqeq1 x=vx=aNv=aN
26 25 anbi2d x=vaNx=aNaNv=aN
27 26 rexbidv x=vaVaNx=aNaVaNv=aN
28 27 cbvrabv x𝒫V|aVaNx=aN=v𝒫V|aVaNv=aN
29 24 28 elrab2 xNx𝒫V|aVaNx=aNxN𝒫VaVaNxN=aN
30 21 29 bitri xNPxN𝒫VaVaNxN=aN
31 7 20 30 sylanbrc NVxVNxNP
32 31 ralrimiva NVxVNxNP
33 simpl aNe=aNaN
34 33 anim2i aVaNe=aNaVaN
35 34 adantl NVe𝒫VaVaNe=aNaVaN
36 eldifsn aVNaVaN
37 35 36 sylibr NVe𝒫VaVaNe=aNaVN
38 eqeq1 e=aNe=xNaN=xN
39 38 adantl aNe=aNe=xNaN=xN
40 39 ad2antlr aVaNe=aNxVNe=xNaN=xN
41 vex aV
42 vex xV
43 41 42 preqr1 aN=xNa=x
44 43 equcomd aN=xNx=a
45 40 44 syl6bi aVaNe=aNxVNe=xNx=a
46 45 adantll NVe𝒫VaVaNe=aNxVNe=xNx=a
47 15 equcoms x=aaN=xN
48 47 eqeq2d x=ae=aNe=xN
49 48 biimpcd e=aNx=ae=xN
50 49 adantl aNe=aNx=ae=xN
51 50 adantl aVaNe=aNx=ae=xN
52 51 ad2antlr NVe𝒫VaVaNe=aNxVNx=ae=xN
53 46 52 impbid NVe𝒫VaVaNe=aNxVNe=xNx=a
54 53 ralrimiva NVe𝒫VaVaNe=aNxVNe=xNx=a
55 37 54 jca NVe𝒫VaVaNe=aNaVNxVNe=xNx=a
56 55 ex NVe𝒫VaVaNe=aNaVNxVNe=xNx=a
57 56 reximdv2 NVe𝒫VaVaNe=aNaVNxVNe=xNx=a
58 57 expimpd NVe𝒫VaVaNe=aNaVNxVNe=xNx=a
59 eqeq1 x=ex=aNe=aN
60 59 anbi2d x=eaNx=aNaNe=aN
61 60 rexbidv x=eaVaNx=aNaVaNe=aN
62 61 2 elrab2 ePe𝒫VaVaNe=aN
63 reu6 ∃!xVNe=xNaVNxVNe=xNx=a
64 58 62 63 3imtr4g NVeP∃!xVNe=xN
65 64 ralrimiv NVeP∃!xVNe=xN
66 3 f1ompt F:VN1-1 ontoPxVNxNPeP∃!xVNe=xN
67 32 65 66 sylanbrc NVF:VN1-1 ontoP