Description: Extension of a walk (as word) by adding an edge/vertex. (Contributed by Alexander van der Vekens, 5-Aug-2018) (Revised by AV, 16-Apr-2021) (Proof shortened by AV, 27-Oct-2022)
Ref | Expression | ||
---|---|---|---|
Hypotheses | wwlksnext.v | |
|
wwlksnext.e | |
||
Assertion | wwlksnextbi | |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | wwlksnext.v | |
|
2 | wwlksnext.e | |
|
3 | 1 2 | wwlknp | |
4 | wwlksnred | |
|
5 | 4 | ad2antrr | |
6 | fveqeq2 | |
|
7 | 6 | 3ad2ant2 | |
8 | 7 | adantl | |
9 | s1cl | |
|
10 | 9 | adantl | |
11 | 10 | anim1ci | |
12 | ccatlen | |
|
13 | 11 12 | syl | |
14 | 13 | eqeq1d | |
15 | s1len | |
|
16 | 15 | a1i | |
17 | 16 | oveq2d | |
18 | 17 | eqeq1d | |
19 | lencl | |
|
20 | 19 | nn0cnd | |
21 | 20 | adantl | |
22 | peano2nn0 | |
|
23 | 22 | nn0cnd | |
24 | 23 | ad2antrr | |
25 | 1cnd | |
|
26 | 21 24 25 | addcan2d | |
27 | 14 18 26 | 3bitrd | |
28 | oveq2 | |
|
29 | 28 | eqcoms | |
30 | pfxccat1 | |
|
31 | 11 30 | syl | |
32 | 29 31 | sylan9eqr | |
33 | 32 | ex | |
34 | 27 33 | sylbid | |
35 | 34 | 3ad2antr1 | |
36 | 8 35 | sylbid | |
37 | 36 | imp | |
38 | oveq1 | |
|
39 | 38 | eqeq1d | |
40 | 39 | 3ad2ant2 | |
41 | 40 | ad2antlr | |
42 | 37 41 | mpbird | |
43 | 42 | eleq1d | |
44 | 43 | biimpd | |
45 | 44 | ex | |
46 | 45 | com23 | |
47 | 5 46 | syld | |
48 | 47 | com13 | |
49 | 48 | 3ad2ant2 | |
50 | 3 49 | mpcom | |
51 | 50 | com12 | |
52 | 1 2 | wwlksnext | |
53 | eleq1 | |
|
54 | 52 53 | syl5ibrcom | |
55 | 54 | 3exp | |
56 | 55 | com23 | |
57 | 56 | com14 | |
58 | 57 | imp | |
59 | 58 | 3adant1 | |
60 | 59 | com12 | |
61 | 60 | adantl | |
62 | 61 | imp | |
63 | 51 62 | impbid | |