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

Theorem clwwlknonex2lem2 29350
Description: Lemma 2 for clwwlknonex2 29351: Transformation of a walk and two edges into a walk extended by two vertices/edges. (Contributed by AV, 22-Sep-2018.) (Revised by AV, 27-Jan-2022.)
Hypotheses
Ref Expression
clwwlknonex2.v 𝑉 = (Vtxβ€˜πΊ)
clwwlknonex2.e 𝐸 = (Edgβ€˜πΊ)
Assertion
Ref Expression
clwwlknonex2lem2 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ βˆ€π‘– ∈ ((0..^((β™―β€˜π‘Š) βˆ’ 1)) βˆͺ {((β™―β€˜π‘Š) βˆ’ 1), (β™―β€˜π‘Š)}){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸)
Distinct variable groups:   𝑖,𝐸   𝑖,𝑉   𝑖,π‘Š   𝑖,𝑋   𝑖,π‘Œ
Allowed substitution hints:   𝐺(𝑖)   𝑁(𝑖)

Proof of Theorem clwwlknonex2lem2
StepHypRef Expression
1 simpl 483 . . . . . . . . . . . . . . . 16 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ π‘Š ∈ Word 𝑉)
21adantr 481 . . . . . . . . . . . . . . 15 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ π‘Š ∈ Word 𝑉)
3 elfzonn0 13673 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)) β†’ 𝑖 ∈ β„•0)
43adantl 482 . . . . . . . . . . . . . . 15 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ 𝑖 ∈ β„•0)
5 lencl 14479 . . . . . . . . . . . . . . . . . 18 (π‘Š ∈ Word 𝑉 β†’ (β™―β€˜π‘Š) ∈ β„•0)
6 elfzo0 13669 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)) ↔ (𝑖 ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„• ∧ 𝑖 < ((β™―β€˜π‘Š) βˆ’ 1)))
7 nn0re 12477 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 ∈ β„•0 β†’ 𝑖 ∈ ℝ)
87adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ 𝑖 ∈ ℝ)
9 nn0re 12477 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((β™―β€˜π‘Š) ∈ β„•0 β†’ (β™―β€˜π‘Š) ∈ ℝ)
10 peano2rem 11523 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((β™―β€˜π‘Š) ∈ ℝ β†’ ((β™―β€˜π‘Š) βˆ’ 1) ∈ ℝ)
119, 10syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 ((β™―β€˜π‘Š) ∈ β„•0 β†’ ((β™―β€˜π‘Š) βˆ’ 1) ∈ ℝ)
1211adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ ((β™―β€˜π‘Š) βˆ’ 1) ∈ ℝ)
139adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ (β™―β€˜π‘Š) ∈ ℝ)
148, 12, 133jca 1128 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ (𝑖 ∈ ℝ ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ ℝ ∧ (β™―β€˜π‘Š) ∈ ℝ))
159ltm1d 12142 . . . . . . . . . . . . . . . . . . . . . . 23 ((β™―β€˜π‘Š) ∈ β„•0 β†’ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š))
1615adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š))
17 lttr 11286 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑖 ∈ ℝ ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ ℝ ∧ (β™―β€˜π‘Š) ∈ ℝ) β†’ ((𝑖 < ((β™―β€˜π‘Š) βˆ’ 1) ∧ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š)) β†’ 𝑖 < (β™―β€˜π‘Š)))
1817expcomd 417 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ ℝ ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ ℝ ∧ (β™―β€˜π‘Š) ∈ ℝ) β†’ (((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š) β†’ (𝑖 < ((β™―β€˜π‘Š) βˆ’ 1) β†’ 𝑖 < (β™―β€˜π‘Š))))
1914, 16, 18sylc 65 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ (𝑖 < ((β™―β€˜π‘Š) βˆ’ 1) β†’ 𝑖 < (β™―β€˜π‘Š)))
2019impancom 452 . . . . . . . . . . . . . . . . . . . 20 ((𝑖 ∈ β„•0 ∧ 𝑖 < ((β™―β€˜π‘Š) βˆ’ 1)) β†’ ((β™―β€˜π‘Š) ∈ β„•0 β†’ 𝑖 < (β™―β€˜π‘Š)))
21203adant2 1131 . . . . . . . . . . . . . . . . . . 19 ((𝑖 ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„• ∧ 𝑖 < ((β™―β€˜π‘Š) βˆ’ 1)) β†’ ((β™―β€˜π‘Š) ∈ β„•0 β†’ 𝑖 < (β™―β€˜π‘Š)))
226, 21sylbi 216 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)) β†’ ((β™―β€˜π‘Š) ∈ β„•0 β†’ 𝑖 < (β™―β€˜π‘Š)))
235, 22syl5com 31 . . . . . . . . . . . . . . . . 17 (π‘Š ∈ Word 𝑉 β†’ (𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)) β†’ 𝑖 < (β™―β€˜π‘Š)))
2423adantr 481 . . . . . . . . . . . . . . . 16 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ (𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)) β†’ 𝑖 < (β™―β€˜π‘Š)))
2524imp 407 . . . . . . . . . . . . . . 15 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ 𝑖 < (β™―β€˜π‘Š))
26 ccat2s1fvw 14584 . . . . . . . . . . . . . . 15 ((π‘Š ∈ Word 𝑉 ∧ 𝑖 ∈ β„•0 ∧ 𝑖 < (β™―β€˜π‘Š)) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–) = (π‘Šβ€˜π‘–))
272, 4, 25, 26syl3anc 1371 . . . . . . . . . . . . . 14 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–) = (π‘Šβ€˜π‘–))
2827eqcomd 2738 . . . . . . . . . . . . 13 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ (π‘Šβ€˜π‘–) = (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–))
29 peano2nn0 12508 . . . . . . . . . . . . . . . 16 (𝑖 ∈ β„•0 β†’ (𝑖 + 1) ∈ β„•0)
304, 29syl 17 . . . . . . . . . . . . . . 15 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ (𝑖 + 1) ∈ β„•0)
31 1red 11211 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ 1 ∈ ℝ)
328, 31, 13ltaddsubd 11810 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ ((𝑖 + 1) < (β™―β€˜π‘Š) ↔ 𝑖 < ((β™―β€˜π‘Š) βˆ’ 1)))
3332biimprd 247 . . . . . . . . . . . . . . . . . . . 20 ((𝑖 ∈ β„•0 ∧ (β™―β€˜π‘Š) ∈ β„•0) β†’ (𝑖 < ((β™―β€˜π‘Š) βˆ’ 1) β†’ (𝑖 + 1) < (β™―β€˜π‘Š)))
3433impancom 452 . . . . . . . . . . . . . . . . . . 19 ((𝑖 ∈ β„•0 ∧ 𝑖 < ((β™―β€˜π‘Š) βˆ’ 1)) β†’ ((β™―β€˜π‘Š) ∈ β„•0 β†’ (𝑖 + 1) < (β™―β€˜π‘Š)))
35343adant2 1131 . . . . . . . . . . . . . . . . . 18 ((𝑖 ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„• ∧ 𝑖 < ((β™―β€˜π‘Š) βˆ’ 1)) β†’ ((β™―β€˜π‘Š) ∈ β„•0 β†’ (𝑖 + 1) < (β™―β€˜π‘Š)))
366, 35sylbi 216 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)) β†’ ((β™―β€˜π‘Š) ∈ β„•0 β†’ (𝑖 + 1) < (β™―β€˜π‘Š)))
375, 36mpan9 507 . . . . . . . . . . . . . . . 16 ((π‘Š ∈ Word 𝑉 ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ (𝑖 + 1) < (β™―β€˜π‘Š))
3837adantlr 713 . . . . . . . . . . . . . . 15 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ (𝑖 + 1) < (β™―β€˜π‘Š))
39 ccat2s1fvw 14584 . . . . . . . . . . . . . . 15 ((π‘Š ∈ Word 𝑉 ∧ (𝑖 + 1) ∈ β„•0 ∧ (𝑖 + 1) < (β™―β€˜π‘Š)) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1)) = (π‘Šβ€˜(𝑖 + 1)))
402, 30, 38, 39syl3anc 1371 . . . . . . . . . . . . . 14 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1)) = (π‘Šβ€˜(𝑖 + 1)))
4140eqcomd 2738 . . . . . . . . . . . . 13 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ (π‘Šβ€˜(𝑖 + 1)) = (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1)))
4228, 41preq12d 4744 . . . . . . . . . . . 12 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ {(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} = {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))})
4342eleq1d 2818 . . . . . . . . . . 11 (((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) ∧ 𝑖 ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1))) β†’ ({(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ↔ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
4443ralbidva 3175 . . . . . . . . . 10 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ (βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ↔ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
4544biimpd 228 . . . . . . . . 9 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ (βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
4645impancom 452 . . . . . . . 8 ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
47463adant3 1132 . . . . . . 7 ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
48473ad2ant1 1133 . . . . . 6 (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
4948com12 32 . . . . 5 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
5049a1dd 50 . . . 4 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸)))
51503adant3 1132 . . 3 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸)))
5251imp31 418 . 2 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸)
53 ax-1 6 . . . . . . . . . . 11 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)))
54533adant3 1132 . . . . . . . . . 10 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)))
55 simpl 483 . . . . . . . . . . . . . . . . . . . . 21 ((π‘Š ∈ Word 𝑉 ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ π‘Š ∈ Word 𝑉)
56 oveq1 7412 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ ((β™―β€˜π‘Š) βˆ’ 1) = ((𝑁 βˆ’ 2) βˆ’ 1))
5756adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 (((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ((β™―β€˜π‘Š) βˆ’ 1) = ((𝑁 βˆ’ 2) βˆ’ 1))
58 eluzelcn 12830 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ 𝑁 ∈ β„‚)
59 2cnd 12286 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ 2 ∈ β„‚)
60 1cnd 11205 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ 1 ∈ β„‚)
6158, 59, 60subsub4d 11598 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ ((𝑁 βˆ’ 2) βˆ’ 1) = (𝑁 βˆ’ (2 + 1)))
62 2p1e3 12350 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (2 + 1) = 3
6362a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ (2 + 1) = 3)
6463oveq2d 7421 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ (𝑁 βˆ’ (2 + 1)) = (𝑁 βˆ’ 3))
65 uznn0sub 12857 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ (𝑁 βˆ’ 3) ∈ β„•0)
6664, 65eqeltrd 2833 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ (𝑁 βˆ’ (2 + 1)) ∈ β„•0)
6761, 66eqeltrd 2833 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ ((𝑁 βˆ’ 2) βˆ’ 1) ∈ β„•0)
6867adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 (((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ((𝑁 βˆ’ 2) βˆ’ 1) ∈ β„•0)
6957, 68eqeltrd 2833 . . . . . . . . . . . . . . . . . . . . . . 23 (((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0)
7069ancoms 459 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2)) β†’ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0)
7170adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((π‘Š ∈ Word 𝑉 ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0)
725, 9syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘Š ∈ Word 𝑉 β†’ (β™―β€˜π‘Š) ∈ ℝ)
7372adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((π‘Š ∈ Word 𝑉 ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ (β™―β€˜π‘Š) ∈ ℝ)
7473ltm1d 12142 . . . . . . . . . . . . . . . . . . . . 21 ((π‘Š ∈ Word 𝑉 ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š))
7555, 71, 743jca 1128 . . . . . . . . . . . . . . . . . . . 20 ((π‘Š ∈ Word 𝑉 ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ (π‘Š ∈ Word 𝑉 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š)))
7675ex 413 . . . . . . . . . . . . . . . . . . 19 (π‘Š ∈ Word 𝑉 β†’ ((𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2)) β†’ (π‘Š ∈ Word 𝑉 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š))))
7776adantr 481 . . . . . . . . . . . . . . . . . 18 ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2)) β†’ (π‘Š ∈ Word 𝑉 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š))))
78773ad2ant1 1133 . . . . . . . . . . . . . . . . 17 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ((𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2)) β†’ (π‘Š ∈ Word 𝑉 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š))))
7978imp 407 . . . . . . . . . . . . . . . 16 ((((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ (π‘Š ∈ Word 𝑉 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š)))
80 ccat2s1fvw 14584 . . . . . . . . . . . . . . . 16 ((π‘Š ∈ Word 𝑉 ∧ ((β™―β€˜π‘Š) βˆ’ 1) ∈ β„•0 ∧ ((β™―β€˜π‘Š) βˆ’ 1) < (β™―β€˜π‘Š)) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)) = (π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)))
8179, 80syl 17 . . . . . . . . . . . . . . 15 ((((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)) = (π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)))
82 nn0cn 12478 . . . . . . . . . . . . . . . . . . . . . 22 ((β™―β€˜π‘Š) ∈ β„•0 β†’ (β™―β€˜π‘Š) ∈ β„‚)
83 ax-1cn 11164 . . . . . . . . . . . . . . . . . . . . . 22 1 ∈ β„‚
84 npcan 11465 . . . . . . . . . . . . . . . . . . . . . 22 (((β™―β€˜π‘Š) ∈ β„‚ ∧ 1 ∈ β„‚) β†’ (((β™―β€˜π‘Š) βˆ’ 1) + 1) = (β™―β€˜π‘Š))
8582, 83, 84sylancl 586 . . . . . . . . . . . . . . . . . . . . 21 ((β™―β€˜π‘Š) ∈ β„•0 β†’ (((β™―β€˜π‘Š) βˆ’ 1) + 1) = (β™―β€˜π‘Š))
865, 85syl 17 . . . . . . . . . . . . . . . . . . . 20 (π‘Š ∈ Word 𝑉 β†’ (((β™―β€˜π‘Š) βˆ’ 1) + 1) = (β™―β€˜π‘Š))
8786adantr 481 . . . . . . . . . . . . . . . . . . 19 ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ (((β™―β€˜π‘Š) βˆ’ 1) + 1) = (β™―β€˜π‘Š))
88873ad2ant1 1133 . . . . . . . . . . . . . . . . . 18 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ (((β™―β€˜π‘Š) βˆ’ 1) + 1) = (β™―β€˜π‘Š))
8988fveq2d 6892 . . . . . . . . . . . . . . . . 17 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1)) = (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)))
90 simp1l 1197 . . . . . . . . . . . . . . . . . 18 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ π‘Š ∈ Word 𝑉)
91 eqidd 2733 . . . . . . . . . . . . . . . . . 18 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ (β™―β€˜π‘Š) = (β™―β€˜π‘Š))
92 simp2l 1199 . . . . . . . . . . . . . . . . . 18 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ 𝑋 ∈ 𝑉)
93 ccatw2s1p1 14582 . . . . . . . . . . . . . . . . . 18 ((π‘Š ∈ Word 𝑉 ∧ (β™―β€˜π‘Š) = (β™―β€˜π‘Š) ∧ 𝑋 ∈ 𝑉) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)) = 𝑋)
9490, 91, 92, 93syl3anc 1371 . . . . . . . . . . . . . . . . 17 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)) = 𝑋)
9589, 94eqtrd 2772 . . . . . . . . . . . . . . . 16 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1)) = 𝑋)
9695adantr 481 . . . . . . . . . . . . . . 15 ((((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1)) = 𝑋)
9781, 96preq12d 4744 . . . . . . . . . . . . . 14 ((((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} = {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋})
98 lsw 14510 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘Š ∈ Word 𝑉 β†’ (lastSβ€˜π‘Š) = (π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)))
9998adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 (((π‘Šβ€˜0) = 𝑋 ∧ π‘Š ∈ Word 𝑉) β†’ (lastSβ€˜π‘Š) = (π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)))
100 simpl 483 . . . . . . . . . . . . . . . . . . . . . 22 (((π‘Šβ€˜0) = 𝑋 ∧ π‘Š ∈ Word 𝑉) β†’ (π‘Šβ€˜0) = 𝑋)
10199, 100preq12d 4744 . . . . . . . . . . . . . . . . . . . . 21 (((π‘Šβ€˜0) = 𝑋 ∧ π‘Š ∈ Word 𝑉) β†’ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} = {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋})
102101eleq1d 2818 . . . . . . . . . . . . . . . . . . . 20 (((π‘Šβ€˜0) = 𝑋 ∧ π‘Š ∈ Word 𝑉) β†’ ({(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸 ↔ {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋} ∈ 𝐸))
103102biimpd 228 . . . . . . . . . . . . . . . . . . 19 (((π‘Šβ€˜0) = 𝑋 ∧ π‘Š ∈ Word 𝑉) β†’ ({(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸 β†’ {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋} ∈ 𝐸))
104103expcom 414 . . . . . . . . . . . . . . . . . 18 (π‘Š ∈ Word 𝑉 β†’ ((π‘Šβ€˜0) = 𝑋 β†’ ({(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸 β†’ {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋} ∈ 𝐸)))
105104com23 86 . . . . . . . . . . . . . . . . 17 (π‘Š ∈ Word 𝑉 β†’ ({(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸 β†’ ((π‘Šβ€˜0) = 𝑋 β†’ {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋} ∈ 𝐸)))
106105imp31 418 . . . . . . . . . . . . . . . 16 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (π‘Šβ€˜0) = 𝑋) β†’ {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋} ∈ 𝐸)
1071063adant2 1131 . . . . . . . . . . . . . . 15 (((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) β†’ {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋} ∈ 𝐸)
108107adantr 481 . . . . . . . . . . . . . 14 ((((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ {(π‘Šβ€˜((β™―β€˜π‘Š) βˆ’ 1)), 𝑋} ∈ 𝐸)
10997, 108eqeltrd 2833 . . . . . . . . . . . . 13 ((((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) ∧ (π‘Šβ€˜0) = 𝑋) ∧ (𝑁 ∈ (β„€β‰₯β€˜3) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2))) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)
110109exp520 1357 . . . . . . . . . . . 12 ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ ((π‘Šβ€˜0) = 𝑋 β†’ (𝑁 ∈ (β„€β‰₯β€˜3) β†’ ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))))
111110com14 96 . . . . . . . . . . 11 (𝑁 ∈ (β„€β‰₯β€˜3) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ ((π‘Šβ€˜0) = 𝑋 β†’ ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))))
1121113ad2ant3 1135 . . . . . . . . . 10 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ ((π‘Šβ€˜0) = 𝑋 β†’ ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))))
11354, 112syld 47 . . . . . . . . 9 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ ((π‘Šβ€˜0) = 𝑋 β†’ ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))))
114113com25 99 . . . . . . . 8 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ ((π‘Šβ€˜0) = 𝑋 β†’ ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))))
115114com14 96 . . . . . . 7 ((π‘Š ∈ Word 𝑉 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ ((π‘Šβ€˜0) = 𝑋 β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))))
1161153adant2 1131 . . . . . 6 ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((β™―β€˜π‘Š) = (𝑁 βˆ’ 2) β†’ ((π‘Šβ€˜0) = 𝑋 β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))))
1171163imp 1111 . . . . 5 (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)))
118117impcom 408 . . . 4 (((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸))
119118imp 407 . . 3 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸)
120 eqidd 2733 . . . . . . . . . . . . . 14 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ (β™―β€˜π‘Š) = (β™―β€˜π‘Š))
121 simprl 769 . . . . . . . . . . . . . 14 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ 𝑋 ∈ 𝑉)
1221, 120, 121, 93syl3anc 1371 . . . . . . . . . . . . 13 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)) = 𝑋)
123 eqid 2732 . . . . . . . . . . . . . 14 (β™―β€˜π‘Š) = (β™―β€˜π‘Š)
124 ccatw2s1p2 14583 . . . . . . . . . . . . . 14 (((π‘Š ∈ Word 𝑉 ∧ (β™―β€˜π‘Š) = (β™―β€˜π‘Š)) ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1)) = π‘Œ)
125123, 124mpanl2 699 . . . . . . . . . . . . 13 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1)) = π‘Œ)
126122, 125preq12d 4744 . . . . . . . . . . . 12 ((π‘Š ∈ Word 𝑉 ∧ (𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉)) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})
127126expcom 414 . . . . . . . . . . 11 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ (π‘Š ∈ Word 𝑉 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ}))
128127a1i 11 . . . . . . . . . 10 ({𝑋, π‘Œ} ∈ 𝐸 β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ (π‘Š ∈ Word 𝑉 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})))
129128com13 88 . . . . . . . . 9 (π‘Š ∈ Word 𝑉 β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})))
1301293ad2ant1 1133 . . . . . . . 8 ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})))
1311303ad2ant1 1133 . . . . . . 7 (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})))
132131com12 32 . . . . . 6 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉) β†’ (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})))
1331323adant3 1132 . . . . 5 ((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) β†’ (((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋) β†’ ({𝑋, π‘Œ} ∈ 𝐸 β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})))
134133imp31 418 . . . 4 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} = {𝑋, π‘Œ})
135 simpr 485 . . . 4 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ {𝑋, π‘Œ} ∈ 𝐸)
136134, 135eqeltrd 2833 . . 3 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} ∈ 𝐸)
137 ovex 7438 . . . 4 ((β™―β€˜π‘Š) βˆ’ 1) ∈ V
138 fvex 6901 . . . 4 (β™―β€˜π‘Š) ∈ V
139 fveq2 6888 . . . . . 6 (𝑖 = ((β™―β€˜π‘Š) βˆ’ 1) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–) = (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)))
140 fvoveq1 7428 . . . . . 6 (𝑖 = ((β™―β€˜π‘Š) βˆ’ 1) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1)) = (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1)))
141139, 140preq12d 4744 . . . . 5 (𝑖 = ((β™―β€˜π‘Š) βˆ’ 1) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} = {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))})
142141eleq1d 2818 . . . 4 (𝑖 = ((β™―β€˜π‘Š) βˆ’ 1) β†’ ({(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸 ↔ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸))
143 fveq2 6888 . . . . . 6 (𝑖 = (β™―β€˜π‘Š) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–) = (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)))
144 fvoveq1 7428 . . . . . 6 (𝑖 = (β™―β€˜π‘Š) β†’ (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1)) = (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1)))
145143, 144preq12d 4744 . . . . 5 (𝑖 = (β™―β€˜π‘Š) β†’ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} = {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))})
146145eleq1d 2818 . . . 4 (𝑖 = (β™―β€˜π‘Š) β†’ ({(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸 ↔ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} ∈ 𝐸))
147137, 138, 142, 146ralpr 4703 . . 3 (βˆ€π‘– ∈ {((β™―β€˜π‘Š) βˆ’ 1), (β™―β€˜π‘Š)} {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸 ↔ ({(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) βˆ’ 1)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(((β™―β€˜π‘Š) βˆ’ 1) + 1))} ∈ 𝐸 ∧ {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(β™―β€˜π‘Š)), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜((β™―β€˜π‘Š) + 1))} ∈ 𝐸))
148119, 136, 147sylanbrc 583 . 2 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ βˆ€π‘– ∈ {((β™―β€˜π‘Š) βˆ’ 1), (β™―β€˜π‘Š)} {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸)
149 ralunb 4190 . 2 (βˆ€π‘– ∈ ((0..^((β™―β€˜π‘Š) βˆ’ 1)) βˆͺ {((β™―β€˜π‘Š) βˆ’ 1), (β™―β€˜π‘Š)}){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸 ↔ (βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸 ∧ βˆ€π‘– ∈ {((β™―β€˜π‘Š) βˆ’ 1), (β™―β€˜π‘Š)} {(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸))
15052, 148, 149sylanbrc 583 1 ((((𝑋 ∈ 𝑉 ∧ π‘Œ ∈ 𝑉 ∧ 𝑁 ∈ (β„€β‰₯β€˜3)) ∧ ((π‘Š ∈ Word 𝑉 ∧ βˆ€π‘– ∈ (0..^((β™―β€˜π‘Š) βˆ’ 1)){(π‘Šβ€˜π‘–), (π‘Šβ€˜(𝑖 + 1))} ∈ 𝐸 ∧ {(lastSβ€˜π‘Š), (π‘Šβ€˜0)} ∈ 𝐸) ∧ (β™―β€˜π‘Š) = (𝑁 βˆ’ 2) ∧ (π‘Šβ€˜0) = 𝑋)) ∧ {𝑋, π‘Œ} ∈ 𝐸) β†’ βˆ€π‘– ∈ ((0..^((β™―β€˜π‘Š) βˆ’ 1)) βˆͺ {((β™―β€˜π‘Š) βˆ’ 1), (β™―β€˜π‘Š)}){(((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜π‘–), (((π‘Š ++ βŸ¨β€œπ‘‹β€βŸ©) ++ βŸ¨β€œπ‘Œβ€βŸ©)β€˜(𝑖 + 1))} ∈ 𝐸)
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106  βˆ€wral 3061   βˆͺ cun 3945  {cpr 4629   class class class wbr 5147  β€˜cfv 6540  (class class class)co 7405  β„‚cc 11104  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   < clt 11244   βˆ’ cmin 11440  β„•cn 12208  2c2 12263  3c3 12264  β„•0cn0 12468  β„€β‰₯cuz 12818  ..^cfzo 13623  β™―chash 14286  Word cword 14460  lastSclsw 14508   ++ cconcat 14516  βŸ¨β€œcs1 14541  Vtxcvtx 28245  Edgcedg 28296
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 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183
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 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7852  df-1st 7971  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-er 8699  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-card 9930  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-nn 12209  df-2 12271  df-3 12272  df-n0 12469  df-z 12555  df-uz 12819  df-fz 13481  df-fzo 13624  df-hash 14287  df-word 14461  df-lsw 14509  df-concat 14517  df-s1 14542
This theorem is referenced by:  clwwlknonex2  29351
  Copyright terms: Public domain W3C validator