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

Theorem clwwlkel 29053
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 14532 . . . . . 6 (𝑃 ∈ Word (Vtx‘𝐺) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
21adantr 481 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
323ad2ant2 1134 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
4 simprl 769 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → 𝑃 ∈ Word (Vtx‘𝐺))
5 fstwrdne0 14456 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘0) ∈ (Vtx‘𝐺))
65s1cld 14503 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺))
7 ccatcl 14474 . . . . . 6 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺)) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
84, 6, 7syl2anc 584 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
983adant3 1132 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
104adantr 481 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑃 ∈ Word (Vtx‘𝐺))
116adantr 481 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺))
12 elfzonn0 13627 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (0..^(𝑁 − 1)) → 𝑖 ∈ ℕ0)
1312adantl 482 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ ℕ0)
14 nnz 12529 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
1514adantr 481 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑁 ∈ ℤ)
16 elfzo0 13623 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^(𝑁 − 1)) ↔ (𝑖 ∈ ℕ0 ∧ (𝑁 − 1) ∈ ℕ ∧ 𝑖 < (𝑁 − 1)))
17 nn0re 12431 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑖 ∈ ℕ0𝑖 ∈ ℝ)
1817adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → 𝑖 ∈ ℝ)
19 nnre 12169 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
20 peano2rem 11477 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℝ → (𝑁 − 1) ∈ ℝ)
2119, 20syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℝ)
2221adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑁 − 1) ∈ ℝ)
2319adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → 𝑁 ∈ ℝ)
2418, 22, 233jca 1128 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ))
2524adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → (𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ))
2619ltm1d 12096 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ℕ → (𝑁 − 1) < 𝑁)
2726adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑁 − 1) < 𝑁)
2827anim1ci 616 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → (𝑖 < (𝑁 − 1) ∧ (𝑁 − 1) < 𝑁))
29 lttr 11240 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑖 < (𝑁 − 1) ∧ (𝑁 − 1) < 𝑁) → 𝑖 < 𝑁))
3025, 28, 29sylc 65 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → 𝑖 < 𝑁)
3130ex 413 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑖 < (𝑁 − 1) → 𝑖 < 𝑁))
3231impancom 452 . . . . . . . . . . . . . . . . . . . 20 ((𝑖 ∈ ℕ0𝑖 < (𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
33323adant2 1131 . . . . . . . . . . . . . . . . . . 19 ((𝑖 ∈ ℕ0 ∧ (𝑁 − 1) ∈ ℕ ∧ 𝑖 < (𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
3416, 33sylbi 216 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (0..^(𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
3534impcom 408 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 < 𝑁)
36 elfzo0z 13624 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (0..^𝑁) ↔ (𝑖 ∈ ℕ0𝑁 ∈ ℤ ∧ 𝑖 < 𝑁))
3713, 15, 35, 36syl3anbrc 1343 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^𝑁))
3837adantlr 713 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^𝑁))
39 oveq2 7370 . . . . . . . . . . . . . . . . . 18 ((♯‘𝑃) = 𝑁 → (0..^(♯‘𝑃)) = (0..^𝑁))
4039eleq2d 2818 . . . . . . . . . . . . . . . . 17 ((♯‘𝑃) = 𝑁 → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4140ad2antll 727 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4241adantr 481 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4338, 42mpbird 256 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^(♯‘𝑃)))
44 ccatval1 14477 . . . . . . . . . . . . . 14 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ 𝑖 ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = (𝑃𝑖))
4510, 11, 43, 44syl3anc 1371 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = (𝑃𝑖))
46 elfzom1p1elfzo 13662 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^𝑁))
4746adantlr 713 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^𝑁))
4839ad2antll 727 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (0..^(♯‘𝑃)) = (0..^𝑁))
4948adantr 481 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (0..^(♯‘𝑃)) = (0..^𝑁))
5047, 49eleqtrrd 2835 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^(♯‘𝑃)))
51 ccatval1 14477 . . . . . . . . . . . . . 14 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ (𝑖 + 1) ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = (𝑃‘(𝑖 + 1)))
5210, 11, 50, 51syl3anc 1371 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = (𝑃‘(𝑖 + 1)))
5345, 52preq12d 4707 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} = {(𝑃𝑖), (𝑃‘(𝑖 + 1))})
5453eleq1d 2817 . . . . . . . . . . 11 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ({((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5554ralbidva 3168 . . . . . . . . . 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 481 . . . . . . . 8 ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5857expdcom 415 . . . . . . 7 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))))
59583imp 1111 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
60 fzo0end 13674 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (0..^𝑁))
6139eleq2d 2818 . . . . . . . . . . . . . . . . . 18 ((♯‘𝑃) = 𝑁 → ((𝑁 − 1) ∈ (0..^(♯‘𝑃)) ↔ (𝑁 − 1) ∈ (0..^𝑁)))
6261adantl 482 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → ((𝑁 − 1) ∈ (0..^(♯‘𝑃)) ↔ (𝑁 − 1) ∈ (0..^𝑁)))
6360, 62syl5ibrcom 246 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑁 − 1) ∈ (0..^(♯‘𝑃))))
6463imp 407 . . . . . . . . . . . . . . 15 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑁 − 1) ∈ (0..^(♯‘𝑃)))
65 ccatval1 14477 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ (𝑁 − 1) ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)) = (𝑃‘(𝑁 − 1)))
664, 6, 64, 65syl3anc 1371 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)) = (𝑃‘(𝑁 − 1)))
67 lsw 14464 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ Word (Vtx‘𝐺) → (lastS‘𝑃) = (𝑃‘((♯‘𝑃) − 1)))
6867adantr 481 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (lastS‘𝑃) = (𝑃‘((♯‘𝑃) − 1)))
69 fvoveq1 7385 . . . . . . . . . . . . . . . . 17 ((♯‘𝑃) = 𝑁 → (𝑃‘((♯‘𝑃) − 1)) = (𝑃‘(𝑁 − 1)))
7069adantl 482 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃‘((♯‘𝑃) − 1)) = (𝑃‘(𝑁 − 1)))
7168, 70eqtr2d 2772 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃‘(𝑁 − 1)) = (lastS‘𝑃))
7271adantl 482 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘(𝑁 − 1)) = (lastS‘𝑃))
7366, 72eqtr2d 2772 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘𝑃) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)))
74 nncn 12170 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
75 1cnd 11159 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → 1 ∈ ℂ)
7674, 75npcand 11525 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → ((𝑁 − 1) + 1) = 𝑁)
7776fveq2d 6851 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
7877adantr 481 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
79 fveq2 6847 . . . . . . . . . . . . . . 15 ((♯‘𝑃) = 𝑁 → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
8079ad2antll 727 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
81 ccatws1ls 14533 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (𝑃‘0) ∈ (Vtx‘𝐺)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = (𝑃‘0))
824, 5, 81syl2anc 584 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = (𝑃‘0))
8378, 80, 823eqtr2rd 2778 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘0) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)))
8473, 83preq12d 4707 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → {(lastS‘𝑃), (𝑃‘0)} = {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))})
8584eleq1d 2817 . . . . . . . . . . 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 482 . . . . . . . . 9 ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
8887expdcom 415 . . . . . . . 8 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → ((∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺)) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺))))
89883imp 1111 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺))
90 ovex 7395 . . . . . . . 8 (𝑁 − 1) ∈ V
91 fveq2 6847 . . . . . . . . . 10 (𝑖 = (𝑁 − 1) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)))
92 fvoveq1 7385 . . . . . . . . . 10 (𝑖 = (𝑁 − 1) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)))
9391, 92preq12d 4707 . . . . . . . . 9 (𝑖 = (𝑁 − 1) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} = {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))})
9493eleq1d 2817 . . . . . . . 8 (𝑖 = (𝑁 − 1) → ({((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
9590, 94ralsn 4647 . . . . . . 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 11542 . . . . . . . . . . 11 (𝑁 ∈ ℕ → ((𝑁 + 1) − 1) = ((𝑁 − 1) + 1))
9897oveq2d 7378 . . . . . . . . . 10 (𝑁 ∈ ℕ → (0..^((𝑁 + 1) − 1)) = (0..^((𝑁 − 1) + 1)))
99 nnm1nn0 12463 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ0)
100 elnn0uz 12817 . . . . . . . . . . . 12 ((𝑁 − 1) ∈ ℕ0 ↔ (𝑁 − 1) ∈ (ℤ‘0))
10199, 100sylib 217 . . . . . . . . . . 11 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (ℤ‘0))
102 fzosplitsn 13690 . . . . . . . . . . 11 ((𝑁 − 1) ∈ (ℤ‘0) → (0..^((𝑁 − 1) + 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
103101, 102syl 17 . . . . . . . . . 10 (𝑁 ∈ ℕ → (0..^((𝑁 − 1) + 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
10498, 103eqtrd 2771 . . . . . . . . 9 (𝑁 ∈ ℕ → (0..^((𝑁 + 1) − 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
105104raleqdv 3311 . . . . . . . 8 (𝑁 ∈ ℕ → (∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ ∀𝑖 ∈ ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
106 ralunb 4156 . . . . . . . 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 1133 . . . . . 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 711 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
110 ccatlen 14475 . . . . . . . . . . 11 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)))
1114, 6, 110syl2anc 584 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)))
112 id 22 . . . . . . . . . . . 12 ((♯‘𝑃) = 𝑁 → (♯‘𝑃) = 𝑁)
113 s1len 14506 . . . . . . . . . . . . 13 (♯‘⟨“(𝑃‘0)”⟩) = 1
114113a1i 11 . . . . . . . . . . . 12 ((♯‘𝑃) = 𝑁 → (♯‘⟨“(𝑃‘0)”⟩) = 1)
115112, 114oveq12d 7380 . . . . . . . . . . 11 ((♯‘𝑃) = 𝑁 → ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
116115ad2antll 727 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
117111, 116eqtrd 2771 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
1181173adant3 1132 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
119118oveq1d 7377 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1) = ((𝑁 + 1) − 1))
120119oveq2d 7378 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)) = (0..^((𝑁 + 1) − 1)))
121120raleqdv 3311 . . . . 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 1128 . . 3 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
124 nnnn0 12429 . . . . . 6 (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
125 iswwlksn 28846 . . . . . 6 (𝑁 ∈ ℕ0 → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
126124, 125syl 17 . . . . 5 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
127 eqid 2731 . . . . . . 7 (Vtx‘𝐺) = (Vtx‘𝐺)
128 eqid 2731 . . . . . . 7 (Edg‘𝐺) = (Edg‘𝐺)
129127, 128iswwlks 28844 . . . . . 6 ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
130129anbi1i 624 . . . . 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 1133 . . 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 711 . 2 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺))
134 lswccats1 14534 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (𝑃‘0) ∈ (Vtx‘𝐺)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑃‘0))
1354, 5, 134syl2anc 584 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑃‘0))
136 lbfzo0 13622 . . . . . . . 8 (0 ∈ (0..^𝑁) ↔ 𝑁 ∈ ℕ)
137136biimpri 227 . . . . . . 7 (𝑁 ∈ ℕ → 0 ∈ (0..^𝑁))
13839eleq2d 2818 . . . . . . . 8 ((♯‘𝑃) = 𝑁 → (0 ∈ (0..^(♯‘𝑃)) ↔ 0 ∈ (0..^𝑁)))
139138adantl 482 . . . . . . 7 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (0 ∈ (0..^(♯‘𝑃)) ↔ 0 ∈ (0..^𝑁)))
140137, 139syl5ibrcom 246 . . . . . 6 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → 0 ∈ (0..^(♯‘𝑃))))
141140imp 407 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → 0 ∈ (0..^(♯‘𝑃)))
142 ccatval1 14477 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ 0 ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0) = (𝑃‘0))
1434, 6, 141, 142syl3anc 1371 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0) = (𝑃‘0))
144135, 143eqtr4d 2774 . . 3 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
1451443adant3 1132 . 2 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
146 fveq2 6847 . . . 4 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → (lastS‘𝑤) = (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)))
147 fveq1 6846 . . . 4 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → (𝑤‘0) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
148146, 147eqeq12d 2747 . . 3 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → ((lastS‘𝑤) = (𝑤‘0) ↔ (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0)))
149 clwwlkf1o.d . . 3 𝐷 = {𝑤 ∈ (𝑁 WWalksN 𝐺) ∣ (lastS‘𝑤) = (𝑤‘0)}
150148, 149elrab2 3651 . 2 ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ 𝐷 ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ∧ (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0)))
151133, 145, 150sylanbrc 583 1 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ 𝐷)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  w3a 1087   = wceq 1541  wcel 2106  wne 2939  wral 3060  {crab 3405  cun 3911  c0 4287  {csn 4591  {cpr 4593   class class class wbr 5110  cfv 6501  (class class class)co 7362  cr 11059  0cc0 11060  1c1 11061   + caddc 11063   < clt 11198  cmin 11394  cn 12162  0cn0 12422  cz 12508  cuz 12772  ..^cfzo 13577  chash 14240  Word cword 14414  lastSclsw 14462   ++ cconcat 14470  ⟨“cs1 14495  Vtxcvtx 28010  Edgcedg 28061  WWalkscwwlks 28833   WWalksN cwwlksn 28834
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677  ax-cnex 11116  ax-resscn 11117  ax-1cn 11118  ax-icn 11119  ax-addcl 11120  ax-addrcl 11121  ax-mulcl 11122  ax-mulrcl 11123  ax-mulcom 11124  ax-addass 11125  ax-mulass 11126  ax-distr 11127  ax-i2m1 11128  ax-1ne0 11129  ax-1rid 11130  ax-rnegex 11131  ax-rrecex 11132  ax-cnre 11133  ax-pre-lttri 11134  ax-pre-lttrn 11135  ax-pre-ltadd 11136  ax-pre-mulgt0 11137
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-reu 3352  df-rab 3406  df-v 3448  df-sbc 3743  df-csb 3859  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3932  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-int 4913  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-tr 5228  df-id 5536  df-eprel 5542  df-po 5550  df-so 5551  df-fr 5593  df-we 5595  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6258  df-ord 6325  df-on 6326  df-lim 6327  df-suc 6328  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-riota 7318  df-ov 7365  df-oprab 7366  df-mpo 7367  df-om 7808  df-1st 7926  df-2nd 7927  df-frecs 8217  df-wrecs 8248  df-recs 8322  df-rdg 8361  df-1o 8417  df-er 8655  df-map 8774  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-card 9884  df-pnf 11200  df-mnf 11201  df-xr 11202  df-ltxr 11203  df-le 11204  df-sub 11396  df-neg 11397  df-nn 12163  df-n0 12423  df-xnn0 12495  df-z 12509  df-uz 12773  df-rp 12925  df-fz 13435  df-fzo 13578  df-hash 14241  df-word 14415  df-lsw 14463  df-concat 14471  df-s1 14496  df-wwlks 28838  df-wwlksn 28839
This theorem is referenced by:  clwwlkfo  29057  clwwlknwwlkncl  29060
  Copyright terms: Public domain W3C validator