Metamath Proof Explorer


Theorem wlkiswwlks2lem4

Description: Lemma 4 for wlkiswwlks2 . (Contributed by Alexander van der Vekens, 20-Jul-2018) (Revised by AV, 10-Apr-2021)

Ref Expression
Hypotheses wlkiswwlks2lem.f F=x0..^P1E-1PxPx+1
wlkiswwlks2lem.e E=iEdgG
Assertion wlkiswwlks2lem4 GUSHGraphPWordV1Pi0..^P1PiPi+1ranEi0..^FEFi=PiPi+1

Proof

Step Hyp Ref Expression
1 wlkiswwlks2lem.f F=x0..^P1E-1PxPx+1
2 wlkiswwlks2lem.e E=iEdgG
3 1 wlkiswwlks2lem1 PWordV1PF=P1
4 3 3adant1 GUSHGraphPWordV1PF=P1
5 lencl PWordVP0
6 5 3ad2ant2 GUSHGraphPWordV1PP0
7 1 wlkiswwlks2lem2 P0i0..^P1Fi=E-1PiPi+1
8 6 7 sylan GUSHGraphPWordV1Pi0..^P1Fi=E-1PiPi+1
9 8 adantr GUSHGraphPWordV1Pi0..^P1PiPi+1ranEFi=E-1PiPi+1
10 9 fveq2d GUSHGraphPWordV1Pi0..^P1PiPi+1ranEEFi=EE-1PiPi+1
11 2 uspgrf1oedg GUSHGraphE:domE1-1 ontoEdgG
12 2 rneqi ranE=raniEdgG
13 edgval EdgG=raniEdgG
14 12 13 eqtr4i ranE=EdgG
15 f1oeq3 ranE=EdgGE:domE1-1 ontoranEE:domE1-1 ontoEdgG
16 14 15 ax-mp E:domE1-1 ontoranEE:domE1-1 ontoEdgG
17 11 16 sylibr GUSHGraphE:domE1-1 ontoranE
18 17 3ad2ant1 GUSHGraphPWordV1PE:domE1-1 ontoranE
19 18 adantr GUSHGraphPWordV1Pi0..^P1E:domE1-1 ontoranE
20 f1ocnvfv2 E:domE1-1 ontoranEPiPi+1ranEEE-1PiPi+1=PiPi+1
21 19 20 sylan GUSHGraphPWordV1Pi0..^P1PiPi+1ranEEE-1PiPi+1=PiPi+1
22 10 21 eqtrd GUSHGraphPWordV1Pi0..^P1PiPi+1ranEEFi=PiPi+1
23 22 ex GUSHGraphPWordV1Pi0..^P1PiPi+1ranEEFi=PiPi+1
24 23 ralimdva GUSHGraphPWordV1Pi0..^P1PiPi+1ranEi0..^P1EFi=PiPi+1
25 oveq2 F=P10..^F=0..^P1
26 25 raleqdv F=P1i0..^FEFi=PiPi+1i0..^P1EFi=PiPi+1
27 26 imbi2d F=P1i0..^P1PiPi+1ranEi0..^FEFi=PiPi+1i0..^P1PiPi+1ranEi0..^P1EFi=PiPi+1
28 24 27 syl5ibr F=P1GUSHGraphPWordV1Pi0..^P1PiPi+1ranEi0..^FEFi=PiPi+1
29 4 28 mpcom GUSHGraphPWordV1Pi0..^P1PiPi+1ranEi0..^FEFi=PiPi+1