Step | Hyp | Ref
| Expression |
1 | | rusgrusgr 28801 |
. . . . . 6
β’ (πΊ RegUSGraph πΎ β πΊ β USGraph) |
2 | | usgruspgr 28418 |
. . . . . 6
β’ (πΊ β USGraph β πΊ β
USPGraph) |
3 | 1, 2 | syl 17 |
. . . . 5
β’ (πΊ RegUSGraph πΎ β πΊ β USPGraph) |
4 | 3 | ad2antlr 726 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β πΊ β
USPGraph) |
5 | | simpl 484 |
. . . . 5
β’ ((π β π β§ π β (β€β₯β3))
β π β π) |
6 | 5 | adantl 483 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β π β π) |
7 | | uzuzle23 12869 |
. . . . 5
β’ (π β
(β€β₯β3) β π β
(β€β₯β2)) |
8 | 7 | ad2antll 728 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β π β
(β€β₯β2)) |
9 | | numclwlk1.v |
. . . . 5
β’ π = (VtxβπΊ) |
10 | | numclwlk1.c |
. . . . 5
β’ πΆ = {π€ β (ClWalksβπΊ) β£ ((β―β(1st
βπ€)) = π β§ ((2nd
βπ€)β0) = π β§ ((2nd
βπ€)β(π β 2)) = π)} |
11 | | eqid 2733 |
. . . . 5
β’ {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} = {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} |
12 | 9, 10, 11 | dlwwlknondlwlknonen 29599 |
. . . 4
β’ ((πΊ β USPGraph β§ π β π β§ π β (β€β₯β2))
β πΆ β {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π}) |
13 | 4, 6, 8, 12 | syl3anc 1372 |
. . 3
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β πΆ β {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π}) |
14 | 1 | anim2i 618 |
. . . . . . . . 9
β’ ((π β Fin β§ πΊ RegUSGraph πΎ) β (π β Fin β§ πΊ β USGraph)) |
15 | 14 | ancomd 463 |
. . . . . . . 8
β’ ((π β Fin β§ πΊ RegUSGraph πΎ) β (πΊ β USGraph β§ π β Fin)) |
16 | 9 | isfusgr 28555 |
. . . . . . . 8
β’ (πΊ β FinUSGraph β (πΊ β USGraph β§ π β Fin)) |
17 | 15, 16 | sylibr 233 |
. . . . . . 7
β’ ((π β Fin β§ πΊ RegUSGraph πΎ) β πΊ β FinUSGraph) |
18 | | eluzge3nn 12870 |
. . . . . . . . 9
β’ (π β
(β€β₯β3) β π β β) |
19 | 18 | nnnn0d 12528 |
. . . . . . . 8
β’ (π β
(β€β₯β3) β π β
β0) |
20 | 19 | adantl 483 |
. . . . . . 7
β’ ((π β π β§ π β (β€β₯β3))
β π β
β0) |
21 | | wlksnfi 29141 |
. . . . . . 7
β’ ((πΊ β FinUSGraph β§ π β β0)
β {π€ β
(WalksβπΊ) β£
(β―β(1st βπ€)) = π} β Fin) |
22 | 17, 20, 21 | syl2an 597 |
. . . . . 6
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β
(WalksβπΊ) β£
(β―β(1st βπ€)) = π} β Fin) |
23 | | clwlkswks 29013 |
. . . . . . . 8
β’
(ClWalksβπΊ)
β (WalksβπΊ) |
24 | 23 | a1i 11 |
. . . . . . 7
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (ClWalksβπΊ)
β (WalksβπΊ)) |
25 | | simp21 1207 |
. . . . . . 7
β’ ((((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β§ ((β―β(1st βπ€)) = π β§ ((2nd βπ€)β0) = π β§ ((2nd βπ€)β(π β 2)) = π) β§ π€ β (ClWalksβπΊ)) β (β―β(1st
βπ€)) = π) |
26 | 24, 25 | rabssrabd 4080 |
. . . . . 6
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β
(ClWalksβπΊ) β£
((β―β(1st βπ€)) = π β§ ((2nd βπ€)β0) = π β§ ((2nd βπ€)β(π β 2)) = π)} β {π€ β (WalksβπΊ) β£ (β―β(1st
βπ€)) = π}) |
27 | 22, 26 | ssfid 9263 |
. . . . 5
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β
(ClWalksβπΊ) β£
((β―β(1st βπ€)) = π β§ ((2nd βπ€)β0) = π β§ ((2nd βπ€)β(π β 2)) = π)} β Fin) |
28 | 10, 27 | eqeltrid 2838 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β πΆ β
Fin) |
29 | 9 | clwwlknonfin 29327 |
. . . . . 6
β’ (π β Fin β (π(ClWWalksNOnβπΊ)π) β Fin) |
30 | 29 | ad2antrr 725 |
. . . . 5
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (π(ClWWalksNOnβπΊ)π) β Fin) |
31 | | ssrab2 4076 |
. . . . . 6
β’ {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} β (π(ClWWalksNOnβπΊ)π) |
32 | 31 | a1i 11 |
. . . . 5
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} β (π(ClWWalksNOnβπΊ)π)) |
33 | 30, 32 | ssfid 9263 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} β Fin) |
34 | | hashen 14303 |
. . . 4
β’ ((πΆ β Fin β§ {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} β Fin) β ((β―βπΆ) = (β―β{π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π}) β πΆ β {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π})) |
35 | 28, 33, 34 | syl2anc 585 |
. . 3
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β ((β―βπΆ) =
(β―β{π€ β
(π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π}) β πΆ β {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π})) |
36 | 13, 35 | mpbird 257 |
. 2
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (β―βπΆ) =
(β―β{π€ β
(π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π})) |
37 | | eqidd 2734 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£}) = (π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£})) |
38 | | oveq12 7413 |
. . . . . 6
β’ ((π£ = π β§ π = π) β (π£(ClWWalksNOnβπΊ)π) = (π(ClWWalksNOnβπΊ)π)) |
39 | | fvoveq1 7427 |
. . . . . . . 8
β’ (π = π β (π€β(π β 2)) = (π€β(π β 2))) |
40 | 39 | adantl 483 |
. . . . . . 7
β’ ((π£ = π β§ π = π) β (π€β(π β 2)) = (π€β(π β 2))) |
41 | | simpl 484 |
. . . . . . 7
β’ ((π£ = π β§ π = π) β π£ = π) |
42 | 40, 41 | eqeq12d 2749 |
. . . . . 6
β’ ((π£ = π β§ π = π) β ((π€β(π β 2)) = π£ β (π€β(π β 2)) = π)) |
43 | 38, 42 | rabeqbidv 3450 |
. . . . 5
β’ ((π£ = π β§ π = π) β {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£} = {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π}) |
44 | 43 | adantl 483 |
. . . 4
β’ ((((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β§ (π£ = π β§ π = π)) β {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£} = {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π}) |
45 | | ovex 7437 |
. . . . . 6
β’ (π(ClWWalksNOnβπΊ)π) β V |
46 | 45 | rabex 5331 |
. . . . 5
β’ {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} β V |
47 | 46 | a1i 11 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π} β V) |
48 | 37, 44, 6, 8, 47 | ovmpod 7555 |
. . 3
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (π(π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£})π) = {π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π}) |
49 | 48 | fveq2d 6892 |
. 2
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (β―β(π(π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£})π)) = (β―β{π€ β (π(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π})) |
50 | | eqid 2733 |
. . . 4
β’ (π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£}) = (π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£}) |
51 | | eqid 2733 |
. . . 4
β’ (π(ClWWalksNOnβπΊ)(π β 2)) = (π(ClWWalksNOnβπΊ)(π β 2)) |
52 | 9, 50, 51 | numclwwlk1 29594 |
. . 3
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (β―β(π(π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£})π)) = (πΎ Β· (β―β(π(ClWWalksNOnβπΊ)(π β 2))))) |
53 | | numclwlk1.f |
. . . . . . 7
β’ πΉ = {π€ β (ClWalksβπΊ) β£ ((β―β(1st
βπ€)) = (π β 2) β§
((2nd βπ€)β0) = π)} |
54 | 5, 9 | eleqtrdi 2844 |
. . . . . . . . 9
β’ ((π β π β§ π β (β€β₯β3))
β π β
(VtxβπΊ)) |
55 | 54 | adantl 483 |
. . . . . . . 8
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β π β
(VtxβπΊ)) |
56 | | uz3m2nn 12871 |
. . . . . . . . 9
β’ (π β
(β€β₯β3) β (π β 2) β β) |
57 | 56 | ad2antll 728 |
. . . . . . . 8
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (π β 2) β
β) |
58 | | clwwlknonclwlknonen 29596 |
. . . . . . . 8
β’ ((πΊ β USPGraph β§ π β (VtxβπΊ) β§ (π β 2) β β) β {π€ β (ClWalksβπΊ) β£
((β―β(1st βπ€)) = (π β 2) β§ ((2nd
βπ€)β0) = π)} β (π(ClWWalksNOnβπΊ)(π β 2))) |
59 | 4, 55, 57, 58 | syl3anc 1372 |
. . . . . . 7
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β
(ClWalksβπΊ) β£
((β―β(1st βπ€)) = (π β 2) β§ ((2nd
βπ€)β0) = π)} β (π(ClWWalksNOnβπΊ)(π β 2))) |
60 | 53, 59 | eqbrtrid 5182 |
. . . . . 6
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β πΉ β (π(ClWWalksNOnβπΊ)(π β 2))) |
61 | | uznn0sub 12857 |
. . . . . . . . . . . 12
β’ (π β
(β€β₯β2) β (π β 2) β
β0) |
62 | 7, 61 | syl 17 |
. . . . . . . . . . 11
β’ (π β
(β€β₯β3) β (π β 2) β
β0) |
63 | 62 | adantl 483 |
. . . . . . . . . 10
β’ ((π β π β§ π β (β€β₯β3))
β (π β 2) β
β0) |
64 | | wlksnfi 29141 |
. . . . . . . . . 10
β’ ((πΊ β FinUSGraph β§ (π β 2) β
β0) β {π€ β (WalksβπΊ) β£ (β―β(1st
βπ€)) = (π β 2)} β
Fin) |
65 | 17, 63, 64 | syl2an 597 |
. . . . . . . . 9
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β
(WalksβπΊ) β£
(β―β(1st βπ€)) = (π β 2)} β Fin) |
66 | | simp2l 1200 |
. . . . . . . . . 10
β’ ((((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β§ ((β―β(1st βπ€)) = (π β 2) β§ ((2nd
βπ€)β0) = π) β§ π€ β (ClWalksβπΊ)) β (β―β(1st
βπ€)) = (π β 2)) |
67 | 24, 66 | rabssrabd 4080 |
. . . . . . . . 9
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β
(ClWalksβπΊ) β£
((β―β(1st βπ€)) = (π β 2) β§ ((2nd
βπ€)β0) = π)} β {π€ β (WalksβπΊ) β£ (β―β(1st
βπ€)) = (π β 2)}) |
68 | 65, 67 | ssfid 9263 |
. . . . . . . 8
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β {π€ β
(ClWalksβπΊ) β£
((β―β(1st βπ€)) = (π β 2) β§ ((2nd
βπ€)β0) = π)} β Fin) |
69 | 53, 68 | eqeltrid 2838 |
. . . . . . 7
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β πΉ β
Fin) |
70 | 9 | clwwlknonfin 29327 |
. . . . . . . 8
β’ (π β Fin β (π(ClWWalksNOnβπΊ)(π β 2)) β Fin) |
71 | 70 | ad2antrr 725 |
. . . . . . 7
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (π(ClWWalksNOnβπΊ)(π β 2)) β Fin) |
72 | | hashen 14303 |
. . . . . . 7
β’ ((πΉ β Fin β§ (π(ClWWalksNOnβπΊ)(π β 2)) β Fin) β
((β―βπΉ) =
(β―β(π(ClWWalksNOnβπΊ)(π β 2))) β πΉ β (π(ClWWalksNOnβπΊ)(π β 2)))) |
73 | 69, 71, 72 | syl2anc 585 |
. . . . . 6
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β ((β―βπΉ) =
(β―β(π(ClWWalksNOnβπΊ)(π β 2))) β πΉ β (π(ClWWalksNOnβπΊ)(π β 2)))) |
74 | 60, 73 | mpbird 257 |
. . . . 5
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (β―βπΉ) =
(β―β(π(ClWWalksNOnβπΊ)(π β 2)))) |
75 | 74 | eqcomd 2739 |
. . . 4
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (β―β(π(ClWWalksNOnβπΊ)(π β 2))) = (β―βπΉ)) |
76 | 75 | oveq2d 7420 |
. . 3
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (πΎ Β·
(β―β(π(ClWWalksNOnβπΊ)(π β 2)))) = (πΎ Β· (β―βπΉ))) |
77 | 52, 76 | eqtrd 2773 |
. 2
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (β―β(π(π£ β π, π β (β€β₯β2)
β¦ {π€ β (π£(ClWWalksNOnβπΊ)π) β£ (π€β(π β 2)) = π£})π)) = (πΎ Β· (β―βπΉ))) |
78 | 36, 49, 77 | 3eqtr2d 2779 |
1
β’ (((π β Fin β§ πΊ RegUSGraph πΎ) β§ (π β π β§ π β (β€β₯β3)))
β (β―βπΆ) =
(πΎ Β·
(β―βπΉ))) |