Theorem wlklenvclwlk 29789

Description: The number of vertices in a walk equals the length of the walk after it is "closed" (i.e. enhanced by an edge from its last vertex to its first vertex). (Contributed by Alexander van der Vekens, 29-Jun-2018.) (Revised by AV, 2-May-2021.) (Revised by JJ, 14-Jan-2024.)

Assertion

Ref	Expression
wlklenvclwlk	⊢ (𝑊 ∈ Word (Vtx‘𝐺) → (⟨𝐹, (𝑊 ++ ⟨“(𝑊‘0)”⟩)⟩ ∈ (Walks‘𝐺) → (♯‘𝐹) = (♯‘𝑊)))

Proof of Theorem wlklenvclwlk

Step	Hyp	Ref	Expression
1		df-br 5091	. . 3 ⊢ (𝐹(Walks‘𝐺)(𝑊 ++ ⟨“(𝑊‘0)”⟩) ↔ ⟨𝐹, (𝑊 ++ ⟨“(𝑊‘0)”⟩)⟩ ∈ (Walks‘𝐺))
2		wlkcl 29751	. . . 4 ⊢ (𝐹(Walks‘𝐺)(𝑊 ++ ⟨“(𝑊‘0)”⟩) → (♯‘𝐹) ∈ ℕ0)
3		wlklenvp1 29754	. . . 4 ⊢ (𝐹(Walks‘𝐺)(𝑊 ++ ⟨“(𝑊‘0)”⟩) → (♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1))
4	2, 3	jca 518	. . 3 ⊢ (𝐹(Walks‘𝐺)(𝑊 ++ ⟨“(𝑊‘0)”⟩) → ((♯‘𝐹) ∈ ℕ0 ∧ (♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1)))
5	1, 4	sylbir 237	. 2 ⊢ (⟨𝐹, (𝑊 ++ ⟨“(𝑊‘0)”⟩)⟩ ∈ (Walks‘𝐺) → ((♯‘𝐹) ∈ ℕ0 ∧ (♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1)))
6		ccatws1len 14620	. . . . . . 7 ⊢ (𝑊 ∈ Word (Vtx‘𝐺) → (♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝑊) + 1))
7	6	eqeq1d 2754	. . . . . 6 ⊢ (𝑊 ∈ Word (Vtx‘𝐺) → ((♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1) ↔ ((♯‘𝑊) + 1) = ((♯‘𝐹) + 1)))
8		eqcom 2759	. . . . . 6 ⊢ (((♯‘𝑊) + 1) = ((♯‘𝐹) + 1) ↔ ((♯‘𝐹) + 1) = ((♯‘𝑊) + 1))
9	7, 8	bitrdi 289	. . . . 5 ⊢ (𝑊 ∈ Word (Vtx‘𝐺) → ((♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1) ↔ ((♯‘𝐹) + 1) = ((♯‘𝑊) + 1)))
10	9	adantr 483	. . . 4 ⊢ ((𝑊 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝐹) ∈ ℕ0) → ((♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1) ↔ ((♯‘𝐹) + 1) = ((♯‘𝑊) + 1)))
11		nn0cn 12477	. . . . . . 7 ⊢ ((♯‘𝐹) ∈ ℕ0 → (♯‘𝐹) ∈ ℂ)
12	11	adantl 484	. . . . . 6 ⊢ ((𝑊 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝐹) ∈ ℕ0) → (♯‘𝐹) ∈ ℂ)
13		lencl 14532	. . . . . . . 8 ⊢ (𝑊 ∈ Word (Vtx‘𝐺) → (♯‘𝑊) ∈ ℕ0)
14	13	nn0cnd 12530	. . . . . . 7 ⊢ (𝑊 ∈ Word (Vtx‘𝐺) → (♯‘𝑊) ∈ ℂ)
15	14	adantr 483	. . . . . 6 ⊢ ((𝑊 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝐹) ∈ ℕ0) → (♯‘𝑊) ∈ ℂ)
16		1cnd 11161	. . . . . 6 ⊢ ((𝑊 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝐹) ∈ ℕ0) → 1 ∈ ℂ)
17	12, 15, 16	addcan2d 11373	. . . . 5 ⊢ ((𝑊 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝐹) ∈ ℕ0) → (((♯‘𝐹) + 1) = ((♯‘𝑊) + 1) ↔ (♯‘𝐹) = (♯‘𝑊)))
18	17	biimpd 231	. . . 4 ⊢ ((𝑊 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝐹) ∈ ℕ0) → (((♯‘𝐹) + 1) = ((♯‘𝑊) + 1) → (♯‘𝐹) = (♯‘𝑊)))
19	10, 18	sylbid 242	. . 3 ⊢ ((𝑊 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝐹) ∈ ℕ0) → ((♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1) → (♯‘𝐹) = (♯‘𝑊)))
20	19	expimpd 456	. 2 ⊢ (𝑊 ∈ Word (Vtx‘𝐺) → (((♯‘𝐹) ∈ ℕ0 ∧ (♯‘(𝑊 ++ ⟨“(𝑊‘0)”⟩)) = ((♯‘𝐹) + 1)) → (♯‘𝐹) = (♯‘𝑊)))
21	5, 20	syl5 34	1 ⊢ (𝑊 ∈ Word (Vtx‘𝐺) → (⟨𝐹, (𝑊 ++ ⟨“(𝑊‘0)”⟩)⟩ ∈ (Walks‘𝐺) → (♯‘𝐹) = (♯‘𝑊)))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1550   ∈ wcel 2132  ⟨cop 4578   class class class wbr 5090  ‘cfv 6506  (class class class)co 7381  ℂcc 11057  0cc0 11059  1c1 11060   + caddc 11062  ℕ₀cn0 12467  ♯chash 14329  Word cword 14512   ++ cconcat 14569  ⟨“cs1 14595  Vtxcvtx 29132  Walkscwlks 29732

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-er 8662  df-map 8794  df-en 8913  df-dom 8914  df-sdom 8915  df-fin 8916  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-n0 12468  df-z 12555  df-uz 12826  df-fz 13499  df-fzo 13646  df-hash 14330  df-word 14513  df-concat 14570  df-s1 14596  df-wlks 29735

This theorem is referenced by: (None)