Step | Hyp | Ref
| Expression |
1 | | wwlksnredwwlkn.e |
. . . . 5
β’ πΈ = (EdgβπΊ) |
2 | 1 | wwlksnredwwlkn 28937 |
. . . 4
β’ (π β β0
β (π β ((π + 1) WWalksN πΊ) β βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ))) |
3 | 2 | imp 407 |
. . 3
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ)) |
4 | | simpl 483 |
. . . . . . . . 9
β’ (((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β (π prefix (π + 1)) = π¦) |
5 | 4 | adantl 482 |
. . . . . . . 8
β’
(((((πβ0) =
π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β§ ((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ)) β (π prefix (π + 1)) = π¦) |
6 | | fveq1 6861 |
. . . . . . . . . . . . . 14
β’ (π¦ = (π prefix (π + 1)) β (π¦β0) = ((π prefix (π + 1))β0)) |
7 | 6 | eqcoms 2739 |
. . . . . . . . . . . . 13
β’ ((π prefix (π + 1)) = π¦ β (π¦β0) = ((π prefix (π + 1))β0)) |
8 | 7 | adantr 481 |
. . . . . . . . . . . 12
β’ (((π prefix (π + 1)) = π¦ β§ (((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ))) β (π¦β0) = ((π prefix (π + 1))β0)) |
9 | | eqid 2731 |
. . . . . . . . . . . . . . . . . . 19
β’
(VtxβπΊ) =
(VtxβπΊ) |
10 | 9, 1 | wwlknp 28885 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((π + 1) WWalksN πΊ) β (π β Word (VtxβπΊ) β§ (β―βπ) = ((π + 1) + 1) β§ βπ β (0..^(π + 1)){(πβπ), (πβ(π + 1))} β πΈ)) |
11 | | nn0p1nn 12476 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β β0
β (π + 1) β
β) |
12 | | peano2nn0 12477 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π β β0
β (π + 1) β
β0) |
13 | | nn0re 12446 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π + 1) β β0
β (π + 1) β
β) |
14 | | lep1 12020 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π + 1) β β β
(π + 1) β€ ((π + 1) + 1)) |
15 | 12, 13, 14 | 3syl 18 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β β0
β (π + 1) β€ ((π + 1) + 1)) |
16 | | peano2nn0 12477 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π + 1) β β0
β ((π + 1) + 1) β
β0) |
17 | 16 | nn0zd 12549 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π + 1) β β0
β ((π + 1) + 1) β
β€) |
18 | | fznn 13534 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (((π + 1) + 1) β β€ β
((π + 1) β
(1...((π + 1) + 1)) β
((π + 1) β β
β§ (π + 1) β€ ((π + 1) + 1)))) |
19 | 12, 17, 18 | 3syl 18 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β β0
β ((π + 1) β
(1...((π + 1) + 1)) β
((π + 1) β β
β§ (π + 1) β€ ((π + 1) + 1)))) |
20 | 11, 15, 19 | mpbir2and 711 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β β0
β (π + 1) β
(1...((π + 1) +
1))) |
21 | | oveq2 7385 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’
((β―βπ) =
((π + 1) + 1) β
(1...(β―βπ)) =
(1...((π + 1) +
1))) |
22 | 21 | eleq2d 2818 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
((β―βπ) =
((π + 1) + 1) β
((π + 1) β
(1...(β―βπ))
β (π + 1) β
(1...((π + 1) +
1)))) |
23 | 20, 22 | imbitrrid 245 |
. . . . . . . . . . . . . . . . . . . . 21
β’
((β―βπ) =
((π + 1) + 1) β (π β β0
β (π + 1) β
(1...(β―βπ)))) |
24 | 23 | adantl 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β Word (VtxβπΊ) β§ (β―βπ) = ((π + 1) + 1)) β (π β β0 β (π + 1) β
(1...(β―βπ)))) |
25 | | simpl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β Word (VtxβπΊ) β§ (β―βπ) = ((π + 1) + 1)) β π β Word (VtxβπΊ)) |
26 | 24, 25 | jctild 526 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β Word (VtxβπΊ) β§ (β―βπ) = ((π + 1) + 1)) β (π β β0 β (π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ))))) |
27 | 26 | 3adant3 1132 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β Word (VtxβπΊ) β§ (β―βπ) = ((π + 1) + 1) β§ βπ β (0..^(π + 1)){(πβπ), (πβ(π + 1))} β πΈ) β (π β β0 β (π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ))))) |
28 | 10, 27 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((π + 1) WWalksN πΊ) β (π β β0 β (π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ))))) |
29 | 28 | impcom 408 |
. . . . . . . . . . . . . . . 16
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β (π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ)))) |
30 | 29 | adantl 482 |
. . . . . . . . . . . . . . 15
β’ (((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β (π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ)))) |
31 | 30 | adantr 481 |
. . . . . . . . . . . . . 14
β’ ((((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β (π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ)))) |
32 | 31 | adantl 482 |
. . . . . . . . . . . . 13
β’ (((π prefix (π + 1)) = π¦ β§ (((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ))) β (π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ)))) |
33 | | pfxfv0 14607 |
. . . . . . . . . . . . 13
β’ ((π β Word (VtxβπΊ) β§ (π + 1) β (1...(β―βπ))) β ((π prefix (π + 1))β0) = (πβ0)) |
34 | 32, 33 | syl 17 |
. . . . . . . . . . . 12
β’ (((π prefix (π + 1)) = π¦ β§ (((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ))) β ((π prefix (π + 1))β0) = (πβ0)) |
35 | | simprll 777 |
. . . . . . . . . . . 12
β’ (((π prefix (π + 1)) = π¦ β§ (((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ))) β (πβ0) = π) |
36 | 8, 34, 35 | 3eqtrd 2775 |
. . . . . . . . . . 11
β’ (((π prefix (π + 1)) = π¦ β§ (((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ))) β (π¦β0) = π) |
37 | 36 | ex 413 |
. . . . . . . . . 10
β’ ((π prefix (π + 1)) = π¦ β ((((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β (π¦β0) = π)) |
38 | 37 | adantr 481 |
. . . . . . . . 9
β’ (((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β ((((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β (π¦β0) = π)) |
39 | 38 | impcom 408 |
. . . . . . . 8
β’
(((((πβ0) =
π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β§ ((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ)) β (π¦β0) = π) |
40 | | simpr 485 |
. . . . . . . . 9
β’ (((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β {(lastSβπ¦), (lastSβπ)} β πΈ) |
41 | 40 | adantl 482 |
. . . . . . . 8
β’
(((((πβ0) =
π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β§ ((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ)) β {(lastSβπ¦), (lastSβπ)} β πΈ) |
42 | 5, 39, 41 | 3jca 1128 |
. . . . . . 7
β’
(((((πβ0) =
π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β§ ((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ)) β ((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ)) |
43 | 42 | ex 413 |
. . . . . 6
β’ ((((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β§ π¦ β (π WWalksN πΊ)) β (((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β ((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ))) |
44 | 43 | reximdva 3167 |
. . . . 5
β’ (((πβ0) = π β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β (βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ))) |
45 | 44 | ex 413 |
. . . 4
β’ ((πβ0) = π β ((π β β0 β§ π β ((π + 1) WWalksN πΊ)) β (βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ)))) |
46 | 45 | com13 88 |
. . 3
β’
(βπ¦ β
(π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β ((π β β0 β§ π β ((π + 1) WWalksN πΊ)) β ((πβ0) = π β βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ)))) |
47 | 3, 46 | mpcom 38 |
. 2
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β ((πβ0) = π β βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ))) |
48 | 29, 33 | syl 17 |
. . . . . . . . 9
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β ((π prefix (π + 1))β0) = (πβ0)) |
49 | 48 | eqcomd 2737 |
. . . . . . . 8
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β (πβ0) = ((π prefix (π + 1))β0)) |
50 | 49 | adantl 482 |
. . . . . . 7
β’ ((((π prefix (π + 1)) = π¦ β§ (π¦β0) = π) β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β (πβ0) = ((π prefix (π + 1))β0)) |
51 | | fveq1 6861 |
. . . . . . . . 9
β’ ((π prefix (π + 1)) = π¦ β ((π prefix (π + 1))β0) = (π¦β0)) |
52 | 51 | adantr 481 |
. . . . . . . 8
β’ (((π prefix (π + 1)) = π¦ β§ (π¦β0) = π) β ((π prefix (π + 1))β0) = (π¦β0)) |
53 | 52 | adantr 481 |
. . . . . . 7
β’ ((((π prefix (π + 1)) = π¦ β§ (π¦β0) = π) β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β ((π prefix (π + 1))β0) = (π¦β0)) |
54 | | simpr 485 |
. . . . . . . 8
β’ (((π prefix (π + 1)) = π¦ β§ (π¦β0) = π) β (π¦β0) = π) |
55 | 54 | adantr 481 |
. . . . . . 7
β’ ((((π prefix (π + 1)) = π¦ β§ (π¦β0) = π) β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β (π¦β0) = π) |
56 | 50, 53, 55 | 3eqtrd 2775 |
. . . . . 6
β’ ((((π prefix (π + 1)) = π¦ β§ (π¦β0) = π) β§ (π β β0 β§ π β ((π + 1) WWalksN πΊ))) β (πβ0) = π) |
57 | 56 | ex 413 |
. . . . 5
β’ (((π prefix (π + 1)) = π¦ β§ (π¦β0) = π) β ((π β β0 β§ π β ((π + 1) WWalksN πΊ)) β (πβ0) = π)) |
58 | 57 | 3adant3 1132 |
. . . 4
β’ (((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β ((π β β0 β§ π β ((π + 1) WWalksN πΊ)) β (πβ0) = π)) |
59 | 58 | com12 32 |
. . 3
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β (((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β (πβ0) = π)) |
60 | 59 | rexlimdvw 3159 |
. 2
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β (βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ) β (πβ0) = π)) |
61 | 47, 60 | impbid 211 |
1
β’ ((π β β0
β§ π β ((π + 1) WWalksN πΊ)) β ((πβ0) = π β βπ¦ β (π WWalksN πΊ)((π prefix (π + 1)) = π¦ β§ (π¦β0) = π β§ {(lastSβπ¦), (lastSβπ)} β πΈ))) |