MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  wlknwwlksnbij Structured version   Visualization version   GIF version

Theorem wlknwwlksnbij 30023
Description: The mapping (𝑡𝑇 ↦ (2nd𝑡)) is a bijection between the set of walks of a fixed length and the set of walks represented by words of the same length in a simple pseudograph. (Contributed by Alexander van der Vekens, 25-Aug-2018.) (Revised by AV, 5-Aug-2022.)
Hypotheses
Ref Expression
wlknwwlksnbij.t 𝑇 = {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}
wlknwwlksnbij.w 𝑊 = (𝑁 WWalksN 𝐺)
wlknwwlksnbij.f 𝐹 = (𝑡𝑇 ↦ (2nd𝑡))
Assertion
Ref Expression
wlknwwlksnbij ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → 𝐹:𝑇1-1-onto𝑊)
Distinct variable groups:   𝐺,𝑝,𝑡   𝑁,𝑝,𝑡   𝑡,𝑇
Allowed substitution hints:   𝑇(𝑝)   𝐹(𝑡,𝑝)   𝑊(𝑡,𝑝)

Proof of Theorem wlknwwlksnbij
Dummy variable 𝑞 is distinct from all other variables.
StepHypRef Expression
1 eqid 2752 . . 3 (𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)) = (𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝))
21wlkswwlksf1o 30014 . . . 4 (𝐺 ∈ USPGraph → (𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)):(Walks‘𝐺)–1-1-onto→(WWalks‘𝐺))
32adantr 483 . . 3 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → (𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)):(Walks‘𝐺)–1-1-onto→(WWalks‘𝐺))
4 fveqeq2 6861 . . . . 5 (𝑞 = (2nd𝑝) → ((♯‘𝑞) = (𝑁 + 1) ↔ (♯‘(2nd𝑝)) = (𝑁 + 1)))
543ad2ant3 1144 . . . 4 (((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) ∧ 𝑝 ∈ (Walks‘𝐺) ∧ 𝑞 = (2nd𝑝)) → ((♯‘𝑞) = (𝑁 + 1) ↔ (♯‘(2nd𝑝)) = (𝑁 + 1)))
6 wlkcpr 29764 . . . . . . 7 (𝑝 ∈ (Walks‘𝐺) ↔ (1st𝑝)(Walks‘𝐺)(2nd𝑝))
7 wlklenvp1 29754 . . . . . . . 8 ((1st𝑝)(Walks‘𝐺)(2nd𝑝) → (♯‘(2nd𝑝)) = ((♯‘(1st𝑝)) + 1))
8 eqeq1 2756 . . . . . . . . . 10 ((♯‘(2nd𝑝)) = ((♯‘(1st𝑝)) + 1) → ((♯‘(2nd𝑝)) = (𝑁 + 1) ↔ ((♯‘(1st𝑝)) + 1) = (𝑁 + 1)))
9 wlkcl 29751 . . . . . . . . . . . . 13 ((1st𝑝)(Walks‘𝐺)(2nd𝑝) → (♯‘(1st𝑝)) ∈ ℕ0)
109nn0cnd 12530 . . . . . . . . . . . 12 ((1st𝑝)(Walks‘𝐺)(2nd𝑝) → (♯‘(1st𝑝)) ∈ ℂ)
1110adantr 483 . . . . . . . . . . 11 (((1st𝑝)(Walks‘𝐺)(2nd𝑝) ∧ (𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0)) → (♯‘(1st𝑝)) ∈ ℂ)
12 nn0cn 12477 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ0𝑁 ∈ ℂ)
1312adantl 484 . . . . . . . . . . . 12 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → 𝑁 ∈ ℂ)
1413adantl 484 . . . . . . . . . . 11 (((1st𝑝)(Walks‘𝐺)(2nd𝑝) ∧ (𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0)) → 𝑁 ∈ ℂ)
15 1cnd 11161 . . . . . . . . . . 11 (((1st𝑝)(Walks‘𝐺)(2nd𝑝) ∧ (𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0)) → 1 ∈ ℂ)
1611, 14, 15addcan2d 11373 . . . . . . . . . 10 (((1st𝑝)(Walks‘𝐺)(2nd𝑝) ∧ (𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0)) → (((♯‘(1st𝑝)) + 1) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁))
178, 16sylan9bbr 517 . . . . . . . . 9 ((((1st𝑝)(Walks‘𝐺)(2nd𝑝) ∧ (𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0)) ∧ (♯‘(2nd𝑝)) = ((♯‘(1st𝑝)) + 1)) → ((♯‘(2nd𝑝)) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁))
1817exp31 422 . . . . . . . 8 ((1st𝑝)(Walks‘𝐺)(2nd𝑝) → ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → ((♯‘(2nd𝑝)) = ((♯‘(1st𝑝)) + 1) → ((♯‘(2nd𝑝)) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁))))
197, 18mpid 44 . . . . . . 7 ((1st𝑝)(Walks‘𝐺)(2nd𝑝) → ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → ((♯‘(2nd𝑝)) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁)))
206, 19sylbi 219 . . . . . 6 (𝑝 ∈ (Walks‘𝐺) → ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → ((♯‘(2nd𝑝)) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁)))
2120impcom 410 . . . . 5 (((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) ∧ 𝑝 ∈ (Walks‘𝐺)) → ((♯‘(2nd𝑝)) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁))
22213adant3 1141 . . . 4 (((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) ∧ 𝑝 ∈ (Walks‘𝐺) ∧ 𝑞 = (2nd𝑝)) → ((♯‘(2nd𝑝)) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁))
235, 22bitrd 281 . . 3 (((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) ∧ 𝑝 ∈ (Walks‘𝐺) ∧ 𝑞 = (2nd𝑝)) → ((♯‘𝑞) = (𝑁 + 1) ↔ (♯‘(1st𝑝)) = 𝑁))
241, 3, 23f1oresrab 7094 . 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𝑝)) = 𝑁}
2726mpteq1i 5181 . . . . . 6 (𝑡𝑇 ↦ (2nd𝑡)) = (𝑡 ∈ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁} ↦ (2nd𝑡))
28 ssrab2 4024 . . . . . . 7 {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁} ⊆ (Walks‘𝐺)
29 resmpt 6012 . . . . . . 7 ({𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁} ⊆ (Walks‘𝐺) → ((𝑡 ∈ (Walks‘𝐺) ↦ (2nd𝑡)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}) = (𝑡 ∈ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁} ↦ (2nd𝑡)))
3028, 29ax-mp 5 . . . . . 6 ((𝑡 ∈ (Walks‘𝐺) ↦ (2nd𝑡)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}) = (𝑡 ∈ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁} ↦ (2nd𝑡))
31 fveq2 6852 . . . . . . . 8 (𝑡 = 𝑝 → (2nd𝑡) = (2nd𝑝))
3231cbvmptv 5194 . . . . . . 7 (𝑡 ∈ (Walks‘𝐺) ↦ (2nd𝑡)) = (𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝))
3332reseq1i 5950 . . . . . 6 ((𝑡 ∈ (Walks‘𝐺) ↦ (2nd𝑡)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}) = ((𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁})
3427, 30, 333eqtr2i 2781 . . . . 5 (𝑡𝑇 ↦ (2nd𝑡)) = ((𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁})
3534a1i 11 . . . 4 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → (𝑡𝑇 ↦ (2nd𝑡)) = ((𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}))
3625, 35eqtrid 2799 . . 3 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → 𝐹 = ((𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}))
3726a1i 11 . . 3 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → 𝑇 = {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁})
38 wlknwwlksnbij.w . . . 4 𝑊 = (𝑁 WWalksN 𝐺)
39 wwlksn 29972 . . . . 5 (𝑁 ∈ ℕ0 → (𝑁 WWalksN 𝐺) = {𝑞 ∈ (WWalks‘𝐺) ∣ (♯‘𝑞) = (𝑁 + 1)})
4039adantl 484 . . . 4 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → (𝑁 WWalksN 𝐺) = {𝑞 ∈ (WWalks‘𝐺) ∣ (♯‘𝑞) = (𝑁 + 1)})
4138, 40eqtrid 2799 . . 3 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → 𝑊 = {𝑞 ∈ (WWalks‘𝐺) ∣ (♯‘𝑞) = (𝑁 + 1)})
4236, 37, 41f1oeq123d 6785 . 2 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → (𝐹:𝑇1-1-onto𝑊 ↔ ((𝑝 ∈ (Walks‘𝐺) ↦ (2nd𝑝)) ↾ {𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}):{𝑝 ∈ (Walks‘𝐺) ∣ (♯‘(1st𝑝)) = 𝑁}–1-1-onto→{𝑞 ∈ (WWalks‘𝐺) ∣ (♯‘𝑞) = (𝑁 + 1)}))
4324, 42mpbird 259 1 ((𝐺 ∈ USPGraph ∧ 𝑁 ∈ ℕ0) → 𝐹:𝑇1-1-onto𝑊)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398  w3a 1095   = wceq 1550  wcel 2132  {crab 3404  wss 3895   class class class wbr 5090  cmpt 5171  cres 5638  1-1-ontowf1o 6505  cfv 6506  (class class class)co 7381  1st c1st 7953  2nd c2nd 7954  cc 11057  1c1 11060   + caddc 11062  0cn0 12467  chash 14329  USPGraphcuspgr 29284  Walkscwlks 29732  WWalkscwwlks 29960   WWalksN cwwlksn 29961
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1805  ax-4 1819  ax-5 1920  ax-6 1977  ax-7 2018  ax-8 2134  ax-9 2142  ax-10 2165  ax-11 2181  ax-12 2202  ax-ext 2724  ax-rep 5217  ax-sep 5236  ax-nul 5246  ax-pow 5312  ax-pr 5380  ax-un 7703  ax-cnex 11115  ax-resscn 11116  ax-1cn 11117  ax-icn 11118  ax-addcl 11119  ax-addrcl 11120  ax-mulcl 11121  ax-mulrcl 11122  ax-mulcom 11123  ax-addass 11124  ax-mulass 11125  ax-distr 11126  ax-i2m1 11127  ax-1ne0 11128  ax-1rid 11129  ax-rnegex 11130  ax-rrecex 11131  ax-cnre 11132  ax-pre-lttri 11133  ax-pre-lttrn 11134  ax-pre-ltadd 11135  ax-pre-mulgt0 11136
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-ifp 1072  df-3or 1096  df-3an 1097  df-tru 1553  df-fal 1563  df-ex 1790  df-nf 1794  df-sb 2081  df-mo 2556  df-eu 2586  df-clab 2731  df-cleq 2744  df-clel 2827  df-nfc 2901  df-ne 2948  df-nel 3052  df-ral 3067  df-rex 3077  df-reu 3358  df-rab 3405  df-v 3446  df-sbc 3736  df-csb 3844  df-dif 3898  df-un 3900  df-in 3902  df-ss 3912  df-pss 3915  df-nul 4277  df-if 4471  df-pw 4547  df-sn 4573  df-pr 4575  df-op 4579  df-uni 4856  df-int 4896  df-iun 4941  df-br 5091  df-opab 5153  df-mpt 5172  df-tr 5198  df-id 5531  df-eprel 5536  df-po 5544  df-so 5545  df-fr 5589  df-we 5591  df-xp 5642  df-rel 5643  df-cnv 5644  df-co 5645  df-dm 5646  df-rn 5647  df-res 5648  df-ima 5649  df-pred 6273  df-ord 6334  df-on 6335  df-lim 6336  df-suc 6337  df-iota 6462  df-fun 6508  df-fn 6509  df-f 6510  df-f1 6511  df-fo 6512  df-f1o 6513  df-fv 6514  df-riota 7338  df-ov 7384  df-oprab 7385  df-mpo 7386  df-om 7832  df-1st 7955  df-2nd 7956  df-frecs 8246  df-wrecs 8277  df-recs 8326  df-rdg 8365  df-1o 8421  df-2o 8422  df-oadd 8425  df-er 8662  df-map 8794  df-pm 8795  df-en 8913  df-dom 8914  df-sdom 8915  df-fin 8916  df-dju 9845  df-card 9883  df-pnf 11204  df-mnf 11205  df-xr 11206  df-ltxr 11207  df-le 11208  df-sub 11402  df-neg 11403  df-nn 12197  df-2 12266  df-n0 12468  df-xnn0 12541  df-z 12555  df-uz 12826  df-fz 13499  df-fzo 13646  df-hash 14330  df-word 14513  df-edg 29184  df-uhgr 29194  df-upgr 29218  df-uspgr 29286  df-wlks 29735  df-wwlks 29965  df-wwlksn 29966
This theorem is referenced by:  wlknwwlksnen  30024  wlksnwwlknvbij  30043
  Copyright terms: Public domain W3C validator