Step | Hyp | Ref
| Expression |
1 | | clwlkwlk 29300 |
. . 3
β’ (π β (ClWalksβπΊ) β π β (WalksβπΊ)) |
2 | | wlkop 29153 |
. . 3
β’ (π β (WalksβπΊ) β π = β¨(1st βπ), (2nd βπ)β©) |
3 | 1, 2 | syl 17 |
. 2
β’ (π β (ClWalksβπΊ) β π = β¨(1st βπ), (2nd βπ)β©) |
4 | | eleq1 2820 |
. . . 4
β’ (π = β¨(1st
βπ), (2nd
βπ)β© β
(π β
(ClWalksβπΊ) β
β¨(1st βπ), (2nd βπ)β© β (ClWalksβπΊ))) |
5 | | df-br 5149 |
. . . 4
β’
((1st βπ)(ClWalksβπΊ)(2nd βπ) β β¨(1st βπ), (2nd βπ)β© β
(ClWalksβπΊ)) |
6 | 4, 5 | bitr4di 289 |
. . 3
β’ (π = β¨(1st
βπ), (2nd
βπ)β© β
(π β
(ClWalksβπΊ) β
(1st βπ)(ClWalksβπΊ)(2nd βπ))) |
7 | | isclwlk 29298 |
. . . 4
β’
((1st βπ)(ClWalksβπΊ)(2nd βπ) β ((1st βπ)(WalksβπΊ)(2nd βπ) β§ ((2nd βπ)β0) = ((2nd
βπ)β(β―β(1st
βπ))))) |
8 | | clwlkcompbp.1 |
. . . . . 6
β’ πΉ = (1st βπ) |
9 | | clwlkcompbp.2 |
. . . . . 6
β’ π = (2nd βπ) |
10 | 8, 9 | breq12i 5157 |
. . . . 5
β’ (πΉ(WalksβπΊ)π β (1st βπ)(WalksβπΊ)(2nd βπ)) |
11 | 9 | fveq1i 6892 |
. . . . . 6
β’ (πβ0) = ((2nd
βπ)β0) |
12 | 8 | fveq2i 6894 |
. . . . . . 7
β’
(β―βπΉ) =
(β―β(1st βπ)) |
13 | 9, 12 | fveq12i 6897 |
. . . . . 6
β’ (πβ(β―βπΉ)) = ((2nd
βπ)β(β―β(1st
βπ))) |
14 | 11, 13 | eqeq12i 2749 |
. . . . 5
β’ ((πβ0) = (πβ(β―βπΉ)) β ((2nd βπ)β0) = ((2nd
βπ)β(β―β(1st
βπ)))) |
15 | 10, 14 | anbi12i 626 |
. . . 4
β’ ((πΉ(WalksβπΊ)π β§ (πβ0) = (πβ(β―βπΉ))) β ((1st βπ)(WalksβπΊ)(2nd βπ) β§ ((2nd βπ)β0) = ((2nd
βπ)β(β―β(1st
βπ))))) |
16 | 7, 15 | sylbb2 237 |
. . 3
β’
((1st βπ)(ClWalksβπΊ)(2nd βπ) β (πΉ(WalksβπΊ)π β§ (πβ0) = (πβ(β―βπΉ)))) |
17 | 6, 16 | syl6bi 253 |
. 2
β’ (π = β¨(1st
βπ), (2nd
βπ)β© β
(π β
(ClWalksβπΊ) β
(πΉ(WalksβπΊ)π β§ (πβ0) = (πβ(β―βπΉ))))) |
18 | 3, 17 | mpcom 38 |
1
β’ (π β (ClWalksβπΊ) β (πΉ(WalksβπΊ)π β§ (πβ0) = (πβ(β―βπΉ)))) |