Step | Hyp | Ref
| Expression |
1 | | eqid 2731 |
. . 3
β’ (π β (WalksβπΊ) β¦ (2nd
βπ)) = (π β (WalksβπΊ) β¦ (2nd
βπ)) |
2 | 1 | wlkswwlksf1o 28921 |
. . . 4
β’ (πΊ β USPGraph β (π β (WalksβπΊ) β¦ (2nd
βπ)):(WalksβπΊ)β1-1-ontoβ(WWalksβπΊ)) |
3 | 2 | adantr 481 |
. . 3
β’ ((πΊ β USPGraph β§ π β β0)
β (π β
(WalksβπΊ) β¦
(2nd βπ)):(WalksβπΊ)β1-1-ontoβ(WWalksβπΊ)) |
4 | | fveqeq2 6871 |
. . . . 5
β’ (π = (2nd βπ) β ((β―βπ) = (π + 1) β (β―β(2nd
βπ)) = (π + 1))) |
5 | 4 | 3ad2ant3 1135 |
. . . 4
β’ (((πΊ β USPGraph β§ π β β0)
β§ π β
(WalksβπΊ) β§ π = (2nd βπ)) β ((β―βπ) = (π + 1) β (β―β(2nd
βπ)) = (π + 1))) |
6 | | wlkcpr 28674 |
. . . . . . 7
β’ (π β (WalksβπΊ) β (1st
βπ)(WalksβπΊ)(2nd βπ)) |
7 | | wlklenvp1 28663 |
. . . . . . . 8
β’
((1st βπ)(WalksβπΊ)(2nd βπ) β (β―β(2nd
βπ)) =
((β―β(1st βπ)) + 1)) |
8 | | eqeq1 2735 |
. . . . . . . . . 10
β’
((β―β(2nd βπ)) = ((β―β(1st
βπ)) + 1) β
((β―β(2nd βπ)) = (π + 1) β ((β―β(1st
βπ)) + 1) = (π + 1))) |
9 | | wlkcl 28660 |
. . . . . . . . . . . . 13
β’
((1st βπ)(WalksβπΊ)(2nd βπ) β (β―β(1st
βπ)) β
β0) |
10 | 9 | nn0cnd 12499 |
. . . . . . . . . . . 12
β’
((1st βπ)(WalksβπΊ)(2nd βπ) β (β―β(1st
βπ)) β
β) |
11 | 10 | adantr 481 |
. . . . . . . . . . 11
β’
(((1st βπ)(WalksβπΊ)(2nd βπ) β§ (πΊ β USPGraph β§ π β β0)) β
(β―β(1st βπ)) β β) |
12 | | nn0cn 12447 |
. . . . . . . . . . . . 13
β’ (π β β0
β π β
β) |
13 | 12 | adantl 482 |
. . . . . . . . . . . 12
β’ ((πΊ β USPGraph β§ π β β0)
β π β
β) |
14 | 13 | adantl 482 |
. . . . . . . . . . 11
β’
(((1st βπ)(WalksβπΊ)(2nd βπ) β§ (πΊ β USPGraph β§ π β β0)) β π β
β) |
15 | | 1cnd 11174 |
. . . . . . . . . . 11
β’
(((1st βπ)(WalksβπΊ)(2nd βπ) β§ (πΊ β USPGraph β§ π β β0)) β 1
β β) |
16 | 11, 14, 15 | addcan2d 11383 |
. . . . . . . . . 10
β’
(((1st βπ)(WalksβπΊ)(2nd βπ) β§ (πΊ β USPGraph β§ π β β0)) β
(((β―β(1st βπ)) + 1) = (π + 1) β (β―β(1st
βπ)) = π)) |
17 | 8, 16 | sylan9bbr 511 |
. . . . . . . . 9
β’
((((1st βπ)(WalksβπΊ)(2nd βπ) β§ (πΊ β USPGraph β§ π β β0)) β§
(β―β(2nd βπ)) = ((β―β(1st
βπ)) + 1)) β
((β―β(2nd βπ)) = (π + 1) β (β―β(1st
βπ)) = π)) |
18 | 17 | exp31 420 |
. . . . . . . 8
β’
((1st βπ)(WalksβπΊ)(2nd βπ) β ((πΊ β USPGraph β§ π β β0) β
((β―β(2nd βπ)) = ((β―β(1st
βπ)) + 1) β
((β―β(2nd βπ)) = (π + 1) β (β―β(1st
βπ)) = π)))) |
19 | 7, 18 | mpid 44 |
. . . . . . 7
β’
((1st βπ)(WalksβπΊ)(2nd βπ) β ((πΊ β USPGraph β§ π β β0) β
((β―β(2nd βπ)) = (π + 1) β (β―β(1st
βπ)) = π))) |
20 | 6, 19 | sylbi 216 |
. . . . . 6
β’ (π β (WalksβπΊ) β ((πΊ β USPGraph β§ π β β0) β
((β―β(2nd βπ)) = (π + 1) β (β―β(1st
βπ)) = π))) |
21 | 20 | impcom 408 |
. . . . 5
β’ (((πΊ β USPGraph β§ π β β0)
β§ π β
(WalksβπΊ)) β
((β―β(2nd βπ)) = (π + 1) β (β―β(1st
βπ)) = π)) |
22 | 21 | 3adant3 1132 |
. . . 4
β’ (((πΊ β USPGraph β§ π β β0)
β§ π β
(WalksβπΊ) β§ π = (2nd βπ)) β
((β―β(2nd βπ)) = (π + 1) β (β―β(1st
βπ)) = π)) |
23 | 5, 22 | bitrd 278 |
. . 3
β’ (((πΊ β USPGraph β§ π β β0)
β§ π β
(WalksβπΊ) β§ π = (2nd βπ)) β ((β―βπ) = (π + 1) β (β―β(1st
βπ)) = π)) |
24 | 1, 3, 23 | f1oresrab 7093 |
. 2
β’ ((πΊ β USPGraph β§ π β β0)
β ((π β
(WalksβπΊ) β¦
(2nd βπ))
βΎ {π β
(WalksβπΊ) β£
(β―β(1st βπ)) = π}):{π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π}β1-1-ontoβ{π β (WWalksβπΊ) β£ (β―βπ) = (π + 1)}) |
25 | | wlknwwlksnbij.f |
. . . 4
β’ πΉ = (π‘ β π β¦ (2nd βπ‘)) |
26 | | wlknwwlksnbij.t |
. . . . . . 7
β’ π = {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π} |
27 | 26 | mpteq1i 5221 |
. . . . . 6
β’ (π‘ β π β¦ (2nd βπ‘)) = (π‘ β {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π} β¦ (2nd
βπ‘)) |
28 | | ssrab2 4057 |
. . . . . . 7
β’ {π β (WalksβπΊ) β£
(β―β(1st βπ)) = π} β (WalksβπΊ) |
29 | | resmpt 6011 |
. . . . . . 7
β’ ({π β (WalksβπΊ) β£
(β―β(1st βπ)) = π} β (WalksβπΊ) β ((π‘ β (WalksβπΊ) β¦ (2nd βπ‘)) βΎ {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π}) = (π‘ β {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π} β¦ (2nd
βπ‘))) |
30 | 28, 29 | ax-mp 5 |
. . . . . 6
β’ ((π‘ β (WalksβπΊ) β¦ (2nd
βπ‘)) βΎ {π β (WalksβπΊ) β£
(β―β(1st βπ)) = π}) = (π‘ β {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π} β¦ (2nd
βπ‘)) |
31 | | fveq2 6862 |
. . . . . . . 8
β’ (π‘ = π β (2nd βπ‘) = (2nd βπ)) |
32 | 31 | cbvmptv 5238 |
. . . . . . 7
β’ (π‘ β (WalksβπΊ) β¦ (2nd
βπ‘)) = (π β (WalksβπΊ) β¦ (2nd
βπ)) |
33 | 32 | reseq1i 5953 |
. . . . . 6
β’ ((π‘ β (WalksβπΊ) β¦ (2nd
βπ‘)) βΎ {π β (WalksβπΊ) β£
(β―β(1st βπ)) = π}) = ((π β (WalksβπΊ) β¦ (2nd βπ)) βΎ {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π}) |
34 | 27, 30, 33 | 3eqtr2i 2765 |
. . . . 5
β’ (π‘ β π β¦ (2nd βπ‘)) = ((π β (WalksβπΊ) β¦ (2nd βπ)) βΎ {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π}) |
35 | 34 | a1i 11 |
. . . 4
β’ ((πΊ β USPGraph β§ π β β0)
β (π‘ β π β¦ (2nd
βπ‘)) = ((π β (WalksβπΊ) β¦ (2nd
βπ)) βΎ {π β (WalksβπΊ) β£
(β―β(1st βπ)) = π})) |
36 | 25, 35 | eqtrid 2783 |
. . 3
β’ ((πΊ β USPGraph β§ π β β0)
β πΉ = ((π β (WalksβπΊ) β¦ (2nd
βπ)) βΎ {π β (WalksβπΊ) β£
(β―β(1st βπ)) = π})) |
37 | 26 | a1i 11 |
. . 3
β’ ((πΊ β USPGraph β§ π β β0)
β π = {π β (WalksβπΊ) β£
(β―β(1st βπ)) = π}) |
38 | | wlknwwlksnbij.w |
. . . 4
β’ π = (π WWalksN πΊ) |
39 | | wwlksn 28879 |
. . . . 5
β’ (π β β0
β (π WWalksN πΊ) = {π β (WWalksβπΊ) β£ (β―βπ) = (π + 1)}) |
40 | 39 | adantl 482 |
. . . 4
β’ ((πΊ β USPGraph β§ π β β0)
β (π WWalksN πΊ) = {π β (WWalksβπΊ) β£ (β―βπ) = (π + 1)}) |
41 | 38, 40 | eqtrid 2783 |
. . 3
β’ ((πΊ β USPGraph β§ π β β0)
β π = {π β (WWalksβπΊ) β£ (β―βπ) = (π + 1)}) |
42 | 36, 37, 41 | f1oeq123d 6798 |
. 2
β’ ((πΊ β USPGraph β§ π β β0)
β (πΉ:πβ1-1-ontoβπ β ((π β (WalksβπΊ) β¦ (2nd βπ)) βΎ {π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π}):{π β (WalksβπΊ) β£ (β―β(1st
βπ)) = π}β1-1-ontoβ{π β (WWalksβπΊ) β£ (β―βπ) = (π + 1)})) |
43 | 24, 42 | mpbird 256 |
1
β’ ((πΊ β USPGraph β§ π β β0)
β πΉ:πβ1-1-ontoβπ) |