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

Theorem clwwlkel 28311
Description: Obtaining a closed walk (as word) by appending the first symbol to the word representing a walk. (Contributed by AV, 28-Sep-2018.) (Revised by AV, 25-Apr-2021.)
Hypothesis
Ref Expression
clwwlkf1o.d 𝐷 = {𝑤 ∈ (𝑁 WWalksN 𝐺) ∣ (lastS‘𝑤) = (𝑤‘0)}
Assertion
Ref Expression
clwwlkel ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ 𝐷)
Distinct variable groups:   𝑖,𝐺   𝑤,𝐺   𝑖,𝑁   𝑤,𝑁   𝑃,𝑖   𝑤,𝑃
Allowed substitution hints:   𝐷(𝑤,𝑖)

Proof of Theorem clwwlkel
StepHypRef Expression
1 ccatws1n0 14270 . . . . . 6 (𝑃 ∈ Word (Vtx‘𝐺) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
21adantr 480 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
323ad2ant2 1132 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
4 simprl 767 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → 𝑃 ∈ Word (Vtx‘𝐺))
5 fstwrdne0 14187 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘0) ∈ (Vtx‘𝐺))
65s1cld 14236 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺))
7 ccatcl 14205 . . . . . 6 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺)) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
84, 6, 7syl2anc 583 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
983adant3 1130 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
104adantr 480 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑃 ∈ Word (Vtx‘𝐺))
116adantr 480 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺))
12 elfzonn0 13360 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (0..^(𝑁 − 1)) → 𝑖 ∈ ℕ0)
1312adantl 481 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ ℕ0)
14 nnz 12272 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
1514adantr 480 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑁 ∈ ℤ)
16 elfzo0 13356 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^(𝑁 − 1)) ↔ (𝑖 ∈ ℕ0 ∧ (𝑁 − 1) ∈ ℕ ∧ 𝑖 < (𝑁 − 1)))
17 nn0re 12172 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑖 ∈ ℕ0𝑖 ∈ ℝ)
1817adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → 𝑖 ∈ ℝ)
19 nnre 11910 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
20 peano2rem 11218 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℝ → (𝑁 − 1) ∈ ℝ)
2119, 20syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℝ)
2221adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑁 − 1) ∈ ℝ)
2319adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → 𝑁 ∈ ℝ)
2418, 22, 233jca 1126 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ))
2524adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → (𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ))
2619ltm1d 11837 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ℕ → (𝑁 − 1) < 𝑁)
2726adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑁 − 1) < 𝑁)
2827anim1ci 615 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → (𝑖 < (𝑁 − 1) ∧ (𝑁 − 1) < 𝑁))
29 lttr 10982 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑖 < (𝑁 − 1) ∧ (𝑁 − 1) < 𝑁) → 𝑖 < 𝑁))
3025, 28, 29sylc 65 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → 𝑖 < 𝑁)
3130ex 412 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑖 < (𝑁 − 1) → 𝑖 < 𝑁))
3231impancom 451 . . . . . . . . . . . . . . . . . . . 20 ((𝑖 ∈ ℕ0𝑖 < (𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
33323adant2 1129 . . . . . . . . . . . . . . . . . . 19 ((𝑖 ∈ ℕ0 ∧ (𝑁 − 1) ∈ ℕ ∧ 𝑖 < (𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
3416, 33sylbi 216 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (0..^(𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
3534impcom 407 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 < 𝑁)
36 elfzo0z 13357 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (0..^𝑁) ↔ (𝑖 ∈ ℕ0𝑁 ∈ ℤ ∧ 𝑖 < 𝑁))
3713, 15, 35, 36syl3anbrc 1341 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^𝑁))
3837adantlr 711 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^𝑁))
39 oveq2 7263 . . . . . . . . . . . . . . . . . 18 ((♯‘𝑃) = 𝑁 → (0..^(♯‘𝑃)) = (0..^𝑁))
4039eleq2d 2824 . . . . . . . . . . . . . . . . 17 ((♯‘𝑃) = 𝑁 → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4140ad2antll 725 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4241adantr 480 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4338, 42mpbird 256 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^(♯‘𝑃)))
44 ccatval1 14209 . . . . . . . . . . . . . 14 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ 𝑖 ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = (𝑃𝑖))
4510, 11, 43, 44syl3anc 1369 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = (𝑃𝑖))
46 elfzom1p1elfzo 13395 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^𝑁))
4746adantlr 711 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^𝑁))
4839ad2antll 725 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (0..^(♯‘𝑃)) = (0..^𝑁))
4948adantr 480 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (0..^(♯‘𝑃)) = (0..^𝑁))
5047, 49eleqtrrd 2842 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^(♯‘𝑃)))
51 ccatval1 14209 . . . . . . . . . . . . . 14 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ (𝑖 + 1) ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = (𝑃‘(𝑖 + 1)))
5210, 11, 50, 51syl3anc 1369 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = (𝑃‘(𝑖 + 1)))
5345, 52preq12d 4674 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} = {(𝑃𝑖), (𝑃‘(𝑖 + 1))})
5453eleq1d 2823 . . . . . . . . . . 11 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ({((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5554ralbidva 3119 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ ∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5655biimprcd 249 . . . . . . . . 9 (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) → ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5756adantr 480 . . . . . . . 8 ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5857expdcom 414 . . . . . . 7 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))))
59583imp 1109 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
60 fzo0end 13407 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (0..^𝑁))
6139eleq2d 2824 . . . . . . . . . . . . . . . . . 18 ((♯‘𝑃) = 𝑁 → ((𝑁 − 1) ∈ (0..^(♯‘𝑃)) ↔ (𝑁 − 1) ∈ (0..^𝑁)))
6261adantl 481 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → ((𝑁 − 1) ∈ (0..^(♯‘𝑃)) ↔ (𝑁 − 1) ∈ (0..^𝑁)))
6360, 62syl5ibrcom 246 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑁 − 1) ∈ (0..^(♯‘𝑃))))
6463imp 406 . . . . . . . . . . . . . . 15 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑁 − 1) ∈ (0..^(♯‘𝑃)))
65 ccatval1 14209 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ (𝑁 − 1) ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)) = (𝑃‘(𝑁 − 1)))
664, 6, 64, 65syl3anc 1369 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)) = (𝑃‘(𝑁 − 1)))
67 lsw 14195 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ Word (Vtx‘𝐺) → (lastS‘𝑃) = (𝑃‘((♯‘𝑃) − 1)))
6867adantr 480 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (lastS‘𝑃) = (𝑃‘((♯‘𝑃) − 1)))
69 fvoveq1 7278 . . . . . . . . . . . . . . . . 17 ((♯‘𝑃) = 𝑁 → (𝑃‘((♯‘𝑃) − 1)) = (𝑃‘(𝑁 − 1)))
7069adantl 481 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃‘((♯‘𝑃) − 1)) = (𝑃‘(𝑁 − 1)))
7168, 70eqtr2d 2779 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃‘(𝑁 − 1)) = (lastS‘𝑃))
7271adantl 481 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘(𝑁 − 1)) = (lastS‘𝑃))
7366, 72eqtr2d 2779 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘𝑃) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)))
74 nncn 11911 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
75 1cnd 10901 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → 1 ∈ ℂ)
7674, 75npcand 11266 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → ((𝑁 − 1) + 1) = 𝑁)
7776fveq2d 6760 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
7877adantr 480 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
79 fveq2 6756 . . . . . . . . . . . . . . 15 ((♯‘𝑃) = 𝑁 → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
8079ad2antll 725 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
81 ccatws1ls 14271 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (𝑃‘0) ∈ (Vtx‘𝐺)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = (𝑃‘0))
824, 5, 81syl2anc 583 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = (𝑃‘0))
8378, 80, 823eqtr2rd 2785 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘0) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)))
8473, 83preq12d 4674 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → {(lastS‘𝑃), (𝑃‘0)} = {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))})
8584eleq1d 2823 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ({(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺) ↔ {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
8685biimpcd 248 . . . . . . . . . 10 ({(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺) → ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
8786adantl 481 . . . . . . . . 9 ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
8887expdcom 414 . . . . . . . 8 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺))))
89883imp 1109 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺))
90 ovex 7288 . . . . . . . 8 (𝑁 − 1) ∈ V
91 fveq2 6756 . . . . . . . . . 10 (𝑖 = (𝑁 − 1) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)))
92 fvoveq1 7278 . . . . . . . . . 10 (𝑖 = (𝑁 − 1) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)))
9391, 92preq12d 4674 . . . . . . . . 9 (𝑖 = (𝑁 − 1) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} = {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))})
9493eleq1d 2823 . . . . . . . 8 (𝑖 = (𝑁 − 1) → ({((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
9590, 94ralsn 4614 . . . . . . 7 (∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺))
9689, 95sylibr 233 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
9774, 75, 75addsubd 11283 . . . . . . . . . . 11 (𝑁 ∈ ℕ → ((𝑁 + 1) − 1) = ((𝑁 − 1) + 1))
9897oveq2d 7271 . . . . . . . . . 10 (𝑁 ∈ ℕ → (0..^((𝑁 + 1) − 1)) = (0..^((𝑁 − 1) + 1)))
99 nnm1nn0 12204 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ0)
100 elnn0uz 12552 . . . . . . . . . . . 12 ((𝑁 − 1) ∈ ℕ0 ↔ (𝑁 − 1) ∈ (ℤ‘0))
10199, 100sylib 217 . . . . . . . . . . 11 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (ℤ‘0))
102 fzosplitsn 13423 . . . . . . . . . . 11 ((𝑁 − 1) ∈ (ℤ‘0) → (0..^((𝑁 − 1) + 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
103101, 102syl 17 . . . . . . . . . 10 (𝑁 ∈ ℕ → (0..^((𝑁 − 1) + 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
10498, 103eqtrd 2778 . . . . . . . . 9 (𝑁 ∈ ℕ → (0..^((𝑁 + 1) − 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
105104raleqdv 3339 . . . . . . . 8 (𝑁 ∈ ℕ → (∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ ∀𝑖 ∈ ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
106 ralunb 4121 . . . . . . . 8 (∀𝑖 ∈ ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ (∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ ∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
107105, 106bitrdi 286 . . . . . . 7 (𝑁 ∈ ℕ → (∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ (∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ ∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))))
1081073ad2ant1 1131 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ (∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ ∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))))
10959, 96, 108mpbir2and 709 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
110 ccatlen 14206 . . . . . . . . . . 11 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)))
1114, 6, 110syl2anc 583 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)))
112 id 22 . . . . . . . . . . . 12 ((♯‘𝑃) = 𝑁 → (♯‘𝑃) = 𝑁)
113 s1len 14239 . . . . . . . . . . . . 13 (♯‘⟨“(𝑃‘0)”⟩) = 1
114113a1i 11 . . . . . . . . . . . 12 ((♯‘𝑃) = 𝑁 → (♯‘⟨“(𝑃‘0)”⟩) = 1)
115112, 114oveq12d 7273 . . . . . . . . . . 11 ((♯‘𝑃) = 𝑁 → ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
116115ad2antll 725 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
117111, 116eqtrd 2778 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
1181173adant3 1130 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
119118oveq1d 7270 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1) = ((𝑁 + 1) − 1))
120119oveq2d 7271 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)) = (0..^((𝑁 + 1) − 1)))
121120raleqdv 3339 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ ∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
122109, 121mpbird 256 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
1233, 9, 1223jca 1126 . . 3 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
124 nnnn0 12170 . . . . . 6 (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
125 iswwlksn 28104 . . . . . 6 (𝑁 ∈ ℕ0 → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
126124, 125syl 17 . . . . 5 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
127 eqid 2738 . . . . . . 7 (Vtx‘𝐺) = (Vtx‘𝐺)
128 eqid 2738 . . . . . . 7 (Edg‘𝐺) = (Edg‘𝐺)
129127, 128iswwlks 28102 . . . . . 6 ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
130129anbi1i 623 . . . . 5 (((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1)) ↔ (((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1)))
131126, 130bitrdi 286 . . . 4 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ (((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
1321313ad2ant1 1131 . . 3 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ (((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
133123, 118, 132mpbir2and 709 . 2 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺))
134 lswccats1 14272 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (𝑃‘0) ∈ (Vtx‘𝐺)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑃‘0))
1354, 5, 134syl2anc 583 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑃‘0))
136 lbfzo0 13355 . . . . . . . 8 (0 ∈ (0..^𝑁) ↔ 𝑁 ∈ ℕ)
137136biimpri 227 . . . . . . 7 (𝑁 ∈ ℕ → 0 ∈ (0..^𝑁))
13839eleq2d 2824 . . . . . . . 8 ((♯‘𝑃) = 𝑁 → (0 ∈ (0..^(♯‘𝑃)) ↔ 0 ∈ (0..^𝑁)))
139138adantl 481 . . . . . . 7 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (0 ∈ (0..^(♯‘𝑃)) ↔ 0 ∈ (0..^𝑁)))
140137, 139syl5ibrcom 246 . . . . . 6 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → 0 ∈ (0..^(♯‘𝑃))))
141140imp 406 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → 0 ∈ (0..^(♯‘𝑃)))
142 ccatval1 14209 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ 0 ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0) = (𝑃‘0))
1434, 6, 141, 142syl3anc 1369 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0) = (𝑃‘0))
144135, 143eqtr4d 2781 . . 3 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
1451443adant3 1130 . 2 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
146 fveq2 6756 . . . 4 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → (lastS‘𝑤) = (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)))
147 fveq1 6755 . . . 4 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → (𝑤‘0) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
148146, 147eqeq12d 2754 . . 3 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → ((lastS‘𝑤) = (𝑤‘0) ↔ (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0)))
149 clwwlkf1o.d . . 3 𝐷 = {𝑤 ∈ (𝑁 WWalksN 𝐺) ∣ (lastS‘𝑤) = (𝑤‘0)}
150148, 149elrab2 3620 . 2 ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ 𝐷 ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ∧ (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0)))
151133, 145, 150sylanbrc 582 1 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ 𝐷)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  w3a 1085   = wceq 1539  wcel 2108  wne 2942  wral 3063  {crab 3067  cun 3881  c0 4253  {csn 4558  {cpr 4560   class class class wbr 5070  cfv 6418  (class class class)co 7255  cr 10801  0cc0 10802  1c1 10803   + caddc 10805   < clt 10940  cmin 11135  cn 11903  0cn0 12163  cz 12249  cuz 12511  ..^cfzo 13311  chash 13972  Word cword 14145  lastSclsw 14193   ++ cconcat 14201  ⟨“cs1 14228  Vtxcvtx 27269  Edgcedg 27320  WWalkscwwlks 28091   WWalksN cwwlksn 28092
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-er 8456  df-map 8575  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-card 9628  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-nn 11904  df-n0 12164  df-xnn0 12236  df-z 12250  df-uz 12512  df-rp 12660  df-fz 13169  df-fzo 13312  df-hash 13973  df-word 14146  df-lsw 14194  df-concat 14202  df-s1 14229  df-wwlks 28096  df-wwlksn 28097
This theorem is referenced by:  clwwlkfo  28315  clwwlknwwlkncl  28318
  Copyright terms: Public domain W3C validator