Metamath Proof Explorer


Theorem erclwwlknsym

Description: .~ is a symmetric relation over the set of closed walks (defined as words). (Contributed by Alexander van der Vekens, 10-Apr-2018) (Revised by AV, 30-Apr-2021)

Ref Expression
Hypotheses erclwwlkn.w W=NClWWalksNG
erclwwlkn.r ˙=tu|tWuWn0Nt=ucyclShiftn
Assertion erclwwlknsym x˙yy˙x

Proof

Step Hyp Ref Expression
1 erclwwlkn.w W=NClWWalksNG
2 erclwwlkn.r ˙=tu|tWuWn0Nt=ucyclShiftn
3 1 2 erclwwlkneqlen xVyVx˙yx=y
4 1 2 erclwwlkneq xVyVx˙yxWyWn0Nx=ycyclShiftn
5 simpl2 xWyWn0Nx=ycyclShiftnx=yyW
6 simpl1 xWyWn0Nx=ycyclShiftnx=yxW
7 eqid VtxG=VtxG
8 7 clwwlknbp xNClWWalksNGxWordVtxGx=N
9 eqcom x=NN=x
10 9 biimpi x=NN=x
11 8 10 simpl2im xNClWWalksNGN=x
12 11 1 eleq2s xWN=x
13 12 adantr xWyWN=x
14 13 adantr xWyWx=yN=x
15 7 clwwlknwrd yNClWWalksNGyWordVtxG
16 15 1 eleq2s yWyWordVtxG
17 16 adantl xWyWyWordVtxG
18 17 adantr xWyWx=yyWordVtxG
19 18 adantl N=xxWyWx=yyWordVtxG
20 simprr N=xxWyWx=yx=y
21 19 20 cshwcshid N=xxWyWx=yn0yx=ycyclShiftnm0xy=xcyclShiftm
22 oveq2 N=x0N=0x
23 oveq2 x=y0x=0y
24 23 adantl xWyWx=y0x=0y
25 22 24 sylan9eq N=xxWyWx=y0N=0y
26 25 eleq2d N=xxWyWx=yn0Nn0y
27 26 anbi1d N=xxWyWx=yn0Nx=ycyclShiftnn0yx=ycyclShiftn
28 22 adantr N=xxWyWx=y0N=0x
29 28 rexeqdv N=xxWyWx=ym0Ny=xcyclShiftmm0xy=xcyclShiftm
30 21 27 29 3imtr4d N=xxWyWx=yn0Nx=ycyclShiftnm0Ny=xcyclShiftm
31 14 30 mpancom xWyWx=yn0Nx=ycyclShiftnm0Ny=xcyclShiftm
32 31 expd xWyWx=yn0Nx=ycyclShiftnm0Ny=xcyclShiftm
33 32 rexlimdv xWyWx=yn0Nx=ycyclShiftnm0Ny=xcyclShiftm
34 33 ex xWyWx=yn0Nx=ycyclShiftnm0Ny=xcyclShiftm
35 34 com23 xWyWn0Nx=ycyclShiftnx=ym0Ny=xcyclShiftm
36 35 3impia xWyWn0Nx=ycyclShiftnx=ym0Ny=xcyclShiftm
37 36 imp xWyWn0Nx=ycyclShiftnx=ym0Ny=xcyclShiftm
38 oveq2 n=mxcyclShiftn=xcyclShiftm
39 38 eqeq2d n=my=xcyclShiftny=xcyclShiftm
40 39 cbvrexvw n0Ny=xcyclShiftnm0Ny=xcyclShiftm
41 37 40 sylibr xWyWn0Nx=ycyclShiftnx=yn0Ny=xcyclShiftn
42 5 6 41 3jca xWyWn0Nx=ycyclShiftnx=yyWxWn0Ny=xcyclShiftn
43 1 2 erclwwlkneq yVxVy˙xyWxWn0Ny=xcyclShiftn
44 43 ancoms xVyVy˙xyWxWn0Ny=xcyclShiftn
45 42 44 imbitrrid xVyVxWyWn0Nx=ycyclShiftnx=yy˙x
46 45 expd xVyVxWyWn0Nx=ycyclShiftnx=yy˙x
47 4 46 sylbid xVyVx˙yx=yy˙x
48 3 47 mpdd xVyVx˙yy˙x
49 48 el2v x˙yy˙x