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

Theorem clwwlkel 30134
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 14589 . . . . . 6 (𝑃 ∈ Word (Vtx‘𝐺) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
21adantr 480 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
323ad2ant2 1135 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅)
4 simprl 771 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → 𝑃 ∈ Word (Vtx‘𝐺))
5 fstwrdne0 14512 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘0) ∈ (Vtx‘𝐺))
65s1cld 14560 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺))
7 ccatcl 14530 . . . . . 6 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺)) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
84, 6, 7syl2anc 585 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺))
983adant3 1133 . . . 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 13656 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (0..^(𝑁 − 1)) → 𝑖 ∈ ℕ0)
1312adantl 481 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ ℕ0)
14 nnz 12539 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
1514adantr 480 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑁 ∈ ℤ)
16 elfzo0 13649 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^(𝑁 − 1)) ↔ (𝑖 ∈ ℕ0 ∧ (𝑁 − 1) ∈ ℕ ∧ 𝑖 < (𝑁 − 1)))
17 nn0re 12440 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑖 ∈ ℕ0𝑖 ∈ ℝ)
1817adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → 𝑖 ∈ ℝ)
19 nnre 12175 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
20 peano2rem 11455 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℝ → (𝑁 − 1) ∈ ℝ)
2119, 20syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℝ)
2221adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑁 − 1) ∈ ℝ)
2319adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → 𝑁 ∈ ℝ)
2418, 22, 233jca 1129 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ))
2524adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → (𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ))
2619ltm1d 12082 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ℕ → (𝑁 − 1) < 𝑁)
2726adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑁 − 1) < 𝑁)
2827anim1ci 617 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → (𝑖 < (𝑁 − 1) ∧ (𝑁 − 1) < 𝑁))
29 lttr 11216 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑖 ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑖 < (𝑁 − 1) ∧ (𝑁 − 1) < 𝑁) → 𝑖 < 𝑁))
3025, 28, 29sylc 65 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑖 ∈ ℕ0𝑁 ∈ ℕ) ∧ 𝑖 < (𝑁 − 1)) → 𝑖 < 𝑁)
3130ex 412 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℕ0𝑁 ∈ ℕ) → (𝑖 < (𝑁 − 1) → 𝑖 < 𝑁))
3231impancom 451 . . . . . . . . . . . . . . . . . . . 20 ((𝑖 ∈ ℕ0𝑖 < (𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
33323adant2 1132 . . . . . . . . . . . . . . . . . . 19 ((𝑖 ∈ ℕ0 ∧ (𝑁 − 1) ∈ ℕ ∧ 𝑖 < (𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
3416, 33sylbi 217 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (0..^(𝑁 − 1)) → (𝑁 ∈ ℕ → 𝑖 < 𝑁))
3534impcom 407 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 < 𝑁)
36 elfzo0z 13650 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (0..^𝑁) ↔ (𝑖 ∈ ℕ0𝑁 ∈ ℤ ∧ 𝑖 < 𝑁))
3713, 15, 35, 36syl3anbrc 1345 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^𝑁))
3837adantlr 716 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^𝑁))
39 oveq2 7369 . . . . . . . . . . . . . . . . . 18 ((♯‘𝑃) = 𝑁 → (0..^(♯‘𝑃)) = (0..^𝑁))
4039eleq2d 2823 . . . . . . . . . . . . . . . . 17 ((♯‘𝑃) = 𝑁 → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4140ad2antll 730 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4241adantr 480 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 ∈ (0..^(♯‘𝑃)) ↔ 𝑖 ∈ (0..^𝑁)))
4338, 42mpbird 257 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → 𝑖 ∈ (0..^(♯‘𝑃)))
44 ccatval1 14533 . . . . . . . . . . . . . 14 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ 𝑖 ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = (𝑃𝑖))
4510, 11, 43, 44syl3anc 1374 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = (𝑃𝑖))
46 elfzom1p1elfzo 13694 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^𝑁))
4746adantlr 716 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^𝑁))
4839ad2antll 730 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (0..^(♯‘𝑃)) = (0..^𝑁))
4948adantr 480 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (0..^(♯‘𝑃)) = (0..^𝑁))
5047, 49eleqtrrd 2840 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → (𝑖 + 1) ∈ (0..^(♯‘𝑃)))
51 ccatval1 14533 . . . . . . . . . . . . . 14 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ (𝑖 + 1) ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = (𝑃‘(𝑖 + 1)))
5210, 11, 50, 51syl3anc 1374 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = (𝑃‘(𝑖 + 1)))
5345, 52preq12d 4686 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} = {(𝑃𝑖), (𝑃‘(𝑖 + 1))})
5453eleq1d 2822 . . . . . . . . . . 11 (((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) ∧ 𝑖 ∈ (0..^(𝑁 − 1))) → ({((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5554ralbidva 3159 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ ∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
5655biimprcd 250 . . . . . . . . 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 1111 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
60 fzo0end 13707 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (0..^𝑁))
6139eleq2d 2823 . . . . . . . . . . . . . . . . . 18 ((♯‘𝑃) = 𝑁 → ((𝑁 − 1) ∈ (0..^(♯‘𝑃)) ↔ (𝑁 − 1) ∈ (0..^𝑁)))
6261adantl 481 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → ((𝑁 − 1) ∈ (0..^(♯‘𝑃)) ↔ (𝑁 − 1) ∈ (0..^𝑁)))
6360, 62syl5ibrcom 247 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑁 − 1) ∈ (0..^(♯‘𝑃))))
6463imp 406 . . . . . . . . . . . . . . 15 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑁 − 1) ∈ (0..^(♯‘𝑃)))
65 ccatval1 14533 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ (𝑁 − 1) ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)) = (𝑃‘(𝑁 − 1)))
664, 6, 64, 65syl3anc 1374 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)) = (𝑃‘(𝑁 − 1)))
67 lsw 14520 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ Word (Vtx‘𝐺) → (lastS‘𝑃) = (𝑃‘((♯‘𝑃) − 1)))
6867adantr 480 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (lastS‘𝑃) = (𝑃‘((♯‘𝑃) − 1)))
69 fvoveq1 7384 . . . . . . . . . . . . . . . . 17 ((♯‘𝑃) = 𝑁 → (𝑃‘((♯‘𝑃) − 1)) = (𝑃‘(𝑁 − 1)))
7069adantl 481 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃‘((♯‘𝑃) − 1)) = (𝑃‘(𝑁 − 1)))
7168, 70eqtr2d 2773 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (𝑃‘(𝑁 − 1)) = (lastS‘𝑃))
7271adantl 481 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘(𝑁 − 1)) = (lastS‘𝑃))
7366, 72eqtr2d 2773 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘𝑃) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)))
74 nncn 12176 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
75 1cnd 11133 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ → 1 ∈ ℂ)
7674, 75npcand 11503 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → ((𝑁 − 1) + 1) = 𝑁)
7776fveq2d 6839 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
7877adantr 480 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
79 fveq2 6835 . . . . . . . . . . . . . . 15 ((♯‘𝑃) = 𝑁 → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
8079ad2antll 730 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑁))
81 ccatws1ls 14590 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (𝑃‘0) ∈ (Vtx‘𝐺)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = (𝑃‘0))
824, 5, 81syl2anc 585 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(♯‘𝑃)) = (𝑃‘0))
8378, 80, 823eqtr2rd 2779 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (𝑃‘0) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)))
8473, 83preq12d 4686 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → {(lastS‘𝑃), (𝑃‘0)} = {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))})
8584eleq1d 2822 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ({(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺) ↔ {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
8685biimpcd 249 . . . . . . . . . 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 1111 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺))
90 ovex 7394 . . . . . . . 8 (𝑁 − 1) ∈ V
91 fveq2 6835 . . . . . . . . . 10 (𝑖 = (𝑁 − 1) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)))
92 fvoveq1 7384 . . . . . . . . . 10 (𝑖 = (𝑁 − 1) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1)))
9391, 92preq12d 4686 . . . . . . . . 9 (𝑖 = (𝑁 − 1) → {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} = {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))})
9493eleq1d 2822 . . . . . . . 8 (𝑖 = (𝑁 − 1) → ({((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺)))
9590, 94ralsn 4626 . . . . . . 7 (∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑁 − 1)), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘((𝑁 − 1) + 1))} ∈ (Edg‘𝐺))
9689, 95sylibr 234 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
9774, 75, 75addsubd 11520 . . . . . . . . . . 11 (𝑁 ∈ ℕ → ((𝑁 + 1) − 1) = ((𝑁 − 1) + 1))
9897oveq2d 7377 . . . . . . . . . 10 (𝑁 ∈ ℕ → (0..^((𝑁 + 1) − 1)) = (0..^((𝑁 − 1) + 1)))
99 nnm1nn0 12472 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ0)
100 elnn0uz 12823 . . . . . . . . . . . 12 ((𝑁 − 1) ∈ ℕ0 ↔ (𝑁 − 1) ∈ (ℤ‘0))
10199, 100sylib 218 . . . . . . . . . . 11 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (ℤ‘0))
102 fzosplitsn 13725 . . . . . . . . . . 11 ((𝑁 − 1) ∈ (ℤ‘0) → (0..^((𝑁 − 1) + 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
103101, 102syl 17 . . . . . . . . . 10 (𝑁 ∈ ℕ → (0..^((𝑁 − 1) + 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
10498, 103eqtrd 2772 . . . . . . . . 9 (𝑁 ∈ ℕ → (0..^((𝑁 + 1) − 1)) = ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}))
105104raleqdv 3296 . . . . . . . 8 (𝑁 ∈ ℕ → (∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ ∀𝑖 ∈ ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
106 ralunb 4138 . . . . . . . 8 (∀𝑖 ∈ ((0..^(𝑁 − 1)) ∪ {(𝑁 − 1)}){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ (∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ ∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
107105, 106bitrdi 287 . . . . . . 7 (𝑁 ∈ ℕ → (∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ↔ (∀𝑖 ∈ (0..^(𝑁 − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ ∀𝑖 ∈ {(𝑁 − 1)} {((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))))
1081073ad2ant1 1134 . . . . . 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 714 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^((𝑁 + 1) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
110 ccatlen 14531 . . . . . . . . . . 11 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)))
1114, 6, 110syl2anc 585 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)))
112 id 22 . . . . . . . . . . . 12 ((♯‘𝑃) = 𝑁 → (♯‘𝑃) = 𝑁)
113 s1len 14563 . . . . . . . . . . . . 13 (♯‘⟨“(𝑃‘0)”⟩) = 1
114113a1i 11 . . . . . . . . . . . 12 ((♯‘𝑃) = 𝑁 → (♯‘⟨“(𝑃‘0)”⟩) = 1)
115112, 114oveq12d 7379 . . . . . . . . . . 11 ((♯‘𝑃) = 𝑁 → ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
116115ad2antll 730 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((♯‘𝑃) + (♯‘⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
117111, 116eqtrd 2772 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
1181173adant3 1133 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))
119118oveq1d 7376 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1) = ((𝑁 + 1) − 1))
120119oveq2d 7377 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)) = (0..^((𝑁 + 1) − 1)))
121120raleqdv 3296 . . . . 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 257 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺))
1233, 9, 1223jca 1129 . . 3 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
124 nnnn0 12438 . . . . . 6 (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
125 iswwlksn 29924 . . . . . 6 (𝑁 ∈ ℕ0 → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
126124, 125syl 17 . . . . 5 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
127 eqid 2737 . . . . . . 7 (Vtx‘𝐺) = (Vtx‘𝐺)
128 eqid 2737 . . . . . . 7 (Edg‘𝐺) = (Edg‘𝐺)
129127, 128iswwlks 29922 . . . . . 6 ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)))
130129anbi1i 625 . . . . 5 (((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (WWalks‘𝐺) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1)) ↔ (((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1)))
131126, 130bitrdi 287 . . . 4 (𝑁 ∈ ℕ → ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ↔ (((𝑃 ++ ⟨“(𝑃‘0)”⟩) ≠ ∅ ∧ (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ Word (Vtx‘𝐺) ∧ ∀𝑖 ∈ (0..^((♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) − 1)){((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘𝑖), ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘(𝑖 + 1))} ∈ (Edg‘𝐺)) ∧ (♯‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑁 + 1))))
1321313ad2ant1 1134 . . 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 714 . 2 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺))
134 lswccats1 14591 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (𝑃‘0) ∈ (Vtx‘𝐺)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑃‘0))
1354, 5, 134syl2anc 585 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = (𝑃‘0))
136 lbfzo0 13648 . . . . . . . 8 (0 ∈ (0..^𝑁) ↔ 𝑁 ∈ ℕ)
137136biimpri 228 . . . . . . 7 (𝑁 ∈ ℕ → 0 ∈ (0..^𝑁))
13839eleq2d 2823 . . . . . . . 8 ((♯‘𝑃) = 𝑁 → (0 ∈ (0..^(♯‘𝑃)) ↔ 0 ∈ (0..^𝑁)))
139138adantl 481 . . . . . . 7 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → (0 ∈ (0..^(♯‘𝑃)) ↔ 0 ∈ (0..^𝑁)))
140137, 139syl5ibrcom 247 . . . . . 6 (𝑁 ∈ ℕ → ((𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) → 0 ∈ (0..^(♯‘𝑃))))
141140imp 406 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → 0 ∈ (0..^(♯‘𝑃)))
142 ccatval1 14533 . . . . 5 ((𝑃 ∈ Word (Vtx‘𝐺) ∧ ⟨“(𝑃‘0)”⟩ ∈ Word (Vtx‘𝐺) ∧ 0 ∈ (0..^(♯‘𝑃))) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0) = (𝑃‘0))
1434, 6, 141, 142syl3anc 1374 . . . 4 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0) = (𝑃‘0))
144135, 143eqtr4d 2775 . . 3 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁)) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
1451443adant3 1133 . 2 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
146 fveq2 6835 . . . 4 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → (lastS‘𝑤) = (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)))
147 fveq1 6834 . . . 4 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → (𝑤‘0) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0))
148146, 147eqeq12d 2753 . . 3 (𝑤 = (𝑃 ++ ⟨“(𝑃‘0)”⟩) → ((lastS‘𝑤) = (𝑤‘0) ↔ (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0)))
149 clwwlkf1o.d . . 3 𝐷 = {𝑤 ∈ (𝑁 WWalksN 𝐺) ∣ (lastS‘𝑤) = (𝑤‘0)}
150148, 149elrab2 3638 . 2 ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ 𝐷 ↔ ((𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ (𝑁 WWalksN 𝐺) ∧ (lastS‘(𝑃 ++ ⟨“(𝑃‘0)”⟩)) = ((𝑃 ++ ⟨“(𝑃‘0)”⟩)‘0)))
151133, 145, 150sylanbrc 584 1 ((𝑁 ∈ ℕ ∧ (𝑃 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑃) = 𝑁) ∧ (∀𝑖 ∈ (0..^(𝑁 − 1)){(𝑃𝑖), (𝑃‘(𝑖 + 1))} ∈ (Edg‘𝐺) ∧ {(lastS‘𝑃), (𝑃‘0)} ∈ (Edg‘𝐺))) → (𝑃 ++ ⟨“(𝑃‘0)”⟩) ∈ 𝐷)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2933  wral 3052  {crab 3390  cun 3888  c0 4274  {csn 4568  {cpr 4570   class class class wbr 5086  cfv 6493  (class class class)co 7361  cr 11031  0cc0 11032  1c1 11033   + caddc 11035   < clt 11173  cmin 11371  cn 12168  0cn0 12431  cz 12518  cuz 12782  ..^cfzo 13602  chash 14286  Word cword 14469  lastSclsw 14518   ++ cconcat 14526  ⟨“cs1 14552  Vtxcvtx 29082  Edgcedg 29133  WWalkscwwlks 29911   WWalksN cwwlksn 29912
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5303  ax-pr 5371  ax-un 7683  ax-cnex 11088  ax-resscn 11089  ax-1cn 11090  ax-icn 11091  ax-addcl 11092  ax-addrcl 11093  ax-mulcl 11094  ax-mulrcl 11095  ax-mulcom 11096  ax-addass 11097  ax-mulass 11098  ax-distr 11099  ax-i2m1 11100  ax-1ne0 11101  ax-1rid 11102  ax-rnegex 11103  ax-rrecex 11104  ax-cnre 11105  ax-pre-lttri 11106  ax-pre-lttrn 11107  ax-pre-ltadd 11108  ax-pre-mulgt0 11109
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6260  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-riota 7318  df-ov 7364  df-oprab 7365  df-mpo 7366  df-om 7812  df-1st 7936  df-2nd 7937  df-frecs 8225  df-wrecs 8256  df-recs 8305  df-rdg 8343  df-1o 8399  df-er 8637  df-map 8769  df-en 8888  df-dom 8889  df-sdom 8890  df-fin 8891  df-card 9857  df-pnf 11175  df-mnf 11176  df-xr 11177  df-ltxr 11178  df-le 11179  df-sub 11373  df-neg 11374  df-nn 12169  df-n0 12432  df-xnn0 12505  df-z 12519  df-uz 12783  df-rp 12937  df-fz 13456  df-fzo 13603  df-hash 14287  df-word 14470  df-lsw 14519  df-concat 14527  df-s1 14553  df-wwlks 29916  df-wwlksn 29917
This theorem is referenced by:  clwwlkfo  30138  clwwlknwwlkncl  30141
  Copyright terms: Public domain W3C validator