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

Theorem crctcshwlkn0 29064
Description: Cyclically shifting the indices of a circuit ⟨𝐹, π‘ƒβŸ© results in a walk ⟨𝐻, π‘„βŸ©. (Contributed by AV, 10-Mar-2021.)
Hypotheses
Ref Expression
crctcsh.v 𝑉 = (Vtxβ€˜πΊ)
crctcsh.i 𝐼 = (iEdgβ€˜πΊ)
crctcsh.d (πœ‘ β†’ 𝐹(Circuitsβ€˜πΊ)𝑃)
crctcsh.n 𝑁 = (β™―β€˜πΉ)
crctcsh.s (πœ‘ β†’ 𝑆 ∈ (0..^𝑁))
crctcsh.h 𝐻 = (𝐹 cyclShift 𝑆)
crctcsh.q 𝑄 = (π‘₯ ∈ (0...𝑁) ↦ if(π‘₯ ≀ (𝑁 βˆ’ 𝑆), (π‘ƒβ€˜(π‘₯ + 𝑆)), (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁))))
Assertion
Ref Expression
crctcshwlkn0 ((πœ‘ ∧ 𝑆 β‰  0) β†’ 𝐻(Walksβ€˜πΊ)𝑄)
Distinct variable groups:   π‘₯,𝑁   π‘₯,𝑃   π‘₯,𝑆   πœ‘,π‘₯   π‘₯,𝐹   π‘₯,𝐼   π‘₯,𝑉
Allowed substitution hints:   𝑄(π‘₯)   𝐺(π‘₯)   𝐻(π‘₯)

Proof of Theorem crctcshwlkn0
Dummy variables 𝑖 𝑗 π‘˜ are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 crctcsh.h . . . . 5 𝐻 = (𝐹 cyclShift 𝑆)
2 crctcsh.d . . . . . . 7 (πœ‘ β†’ 𝐹(Circuitsβ€˜πΊ)𝑃)
3 crctiswlk 29042 . . . . . . 7 (𝐹(Circuitsβ€˜πΊ)𝑃 β†’ 𝐹(Walksβ€˜πΊ)𝑃)
4 crctcsh.i . . . . . . . 8 𝐼 = (iEdgβ€˜πΊ)
54wlkf 28860 . . . . . . 7 (𝐹(Walksβ€˜πΊ)𝑃 β†’ 𝐹 ∈ Word dom 𝐼)
62, 3, 53syl 18 . . . . . 6 (πœ‘ β†’ 𝐹 ∈ Word dom 𝐼)
7 cshwcl 14744 . . . . . 6 (𝐹 ∈ Word dom 𝐼 β†’ (𝐹 cyclShift 𝑆) ∈ Word dom 𝐼)
86, 7syl 17 . . . . 5 (πœ‘ β†’ (𝐹 cyclShift 𝑆) ∈ Word dom 𝐼)
91, 8eqeltrid 2837 . . . 4 (πœ‘ β†’ 𝐻 ∈ Word dom 𝐼)
109adantr 481 . . 3 ((πœ‘ ∧ 𝑆 β‰  0) β†’ 𝐻 ∈ Word dom 𝐼)
112, 3syl 17 . . . . . . . 8 (πœ‘ β†’ 𝐹(Walksβ€˜πΊ)𝑃)
12 crctcsh.v . . . . . . . . . 10 𝑉 = (Vtxβ€˜πΊ)
1312wlkp 28862 . . . . . . . . 9 (𝐹(Walksβ€˜πΊ)𝑃 β†’ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰)
14 simpll 765 . . . . . . . . . . . 12 (((𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ (πœ‘ ∧ π‘₯ ∈ (0...𝑁))) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰)
15 crctcsh.s . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝑆 ∈ (0..^𝑁))
16 elfznn0 13590 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ (0...𝑁) β†’ π‘₯ ∈ β„•0)
1716adantl 482 . . . . . . . . . . . . . . . . . 18 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ π‘₯ ∈ β„•0)
18 elfzonn0 13673 . . . . . . . . . . . . . . . . . . 19 (𝑆 ∈ (0..^𝑁) β†’ 𝑆 ∈ β„•0)
1918adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ 𝑆 ∈ β„•0)
2017, 19nn0addcld 12532 . . . . . . . . . . . . . . . . 17 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ (π‘₯ + 𝑆) ∈ β„•0)
2120adantr 481 . . . . . . . . . . . . . . . 16 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (π‘₯ + 𝑆) ∈ β„•0)
22 crctcsh.n . . . . . . . . . . . . . . . . . 18 𝑁 = (β™―β€˜πΉ)
23 elfz3nn0 13591 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (0...𝑁) β†’ 𝑁 ∈ β„•0)
2422, 23eqeltrrid 2838 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ (0...𝑁) β†’ (β™―β€˜πΉ) ∈ β„•0)
2524ad2antlr 725 . . . . . . . . . . . . . . . 16 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (β™―β€˜πΉ) ∈ β„•0)
26 elfzelz 13497 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ (0...𝑁) β†’ π‘₯ ∈ β„€)
2726zred 12662 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ (0...𝑁) β†’ π‘₯ ∈ ℝ)
2827adantl 482 . . . . . . . . . . . . . . . . . . 19 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ π‘₯ ∈ ℝ)
29 elfzoelz 13628 . . . . . . . . . . . . . . . . . . . . 21 (𝑆 ∈ (0..^𝑁) β†’ 𝑆 ∈ β„€)
3029zred 12662 . . . . . . . . . . . . . . . . . . . 20 (𝑆 ∈ (0..^𝑁) β†’ 𝑆 ∈ ℝ)
3130adantr 481 . . . . . . . . . . . . . . . . . . 19 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ 𝑆 ∈ ℝ)
32 elfzel2 13495 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ (0...𝑁) β†’ 𝑁 ∈ β„€)
3332zred 12662 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ (0...𝑁) β†’ 𝑁 ∈ ℝ)
3433adantl 482 . . . . . . . . . . . . . . . . . . 19 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ 𝑁 ∈ ℝ)
35 leaddsub 11686 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ) β†’ ((π‘₯ + 𝑆) ≀ 𝑁 ↔ π‘₯ ≀ (𝑁 βˆ’ 𝑆)))
3628, 31, 34, 35syl3anc 1371 . . . . . . . . . . . . . . . . . 18 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ ((π‘₯ + 𝑆) ≀ 𝑁 ↔ π‘₯ ≀ (𝑁 βˆ’ 𝑆)))
3736biimpar 478 . . . . . . . . . . . . . . . . 17 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (π‘₯ + 𝑆) ≀ 𝑁)
3837, 22breqtrdi 5188 . . . . . . . . . . . . . . . 16 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (π‘₯ + 𝑆) ≀ (β™―β€˜πΉ))
3921, 25, 383jca 1128 . . . . . . . . . . . . . . 15 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) ∈ β„•0 ∧ (β™―β€˜πΉ) ∈ β„•0 ∧ (π‘₯ + 𝑆) ≀ (β™―β€˜πΉ)))
4015, 39sylanl1 678 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘₯ ∈ (0...𝑁)) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) ∈ β„•0 ∧ (β™―β€˜πΉ) ∈ β„•0 ∧ (π‘₯ + 𝑆) ≀ (β™―β€˜πΉ)))
41 elfz2nn0 13588 . . . . . . . . . . . . . 14 ((π‘₯ + 𝑆) ∈ (0...(β™―β€˜πΉ)) ↔ ((π‘₯ + 𝑆) ∈ β„•0 ∧ (β™―β€˜πΉ) ∈ β„•0 ∧ (π‘₯ + 𝑆) ≀ (β™―β€˜πΉ)))
4240, 41sylibr 233 . . . . . . . . . . . . 13 (((πœ‘ ∧ π‘₯ ∈ (0...𝑁)) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (π‘₯ + 𝑆) ∈ (0...(β™―β€˜πΉ)))
4342adantll 712 . . . . . . . . . . . 12 (((𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ (πœ‘ ∧ π‘₯ ∈ (0...𝑁))) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (π‘₯ + 𝑆) ∈ (0...(β™―β€˜πΉ)))
4414, 43ffvelcdmd 7084 . . . . . . . . . . 11 (((𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ (πœ‘ ∧ π‘₯ ∈ (0...𝑁))) ∧ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (π‘ƒβ€˜(π‘₯ + 𝑆)) ∈ 𝑉)
45 simpll 765 . . . . . . . . . . . 12 (((𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ (πœ‘ ∧ π‘₯ ∈ (0...𝑁))) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰)
46 elfzoel2 13627 . . . . . . . . . . . . . . . . . . 19 (𝑆 ∈ (0..^𝑁) β†’ 𝑁 ∈ β„€)
47 zaddcl 12598 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((π‘₯ ∈ β„€ ∧ 𝑆 ∈ β„€) β†’ (π‘₯ + 𝑆) ∈ β„€)
4847adantrr 715 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ (π‘₯ + 𝑆) ∈ β„€)
49 simprr 771 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ 𝑁 ∈ β„€)
5048, 49zsubcld 12667 . . . . . . . . . . . . . . . . . . . . . . 23 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€)
5150adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 (((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€)
52 zsubcl 12600 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑁 ∈ β„€ ∧ 𝑆 ∈ β„€) β†’ (𝑁 βˆ’ 𝑆) ∈ β„€)
5352ancoms 459 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ (𝑁 βˆ’ 𝑆) ∈ β„€)
5453zred 12662 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ (𝑁 βˆ’ 𝑆) ∈ ℝ)
55 zre 12558 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘₯ ∈ β„€ β†’ π‘₯ ∈ ℝ)
56 ltnle 11289 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑁 βˆ’ 𝑆) ∈ ℝ ∧ π‘₯ ∈ ℝ) β†’ ((𝑁 βˆ’ 𝑆) < π‘₯ ↔ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)))
5754, 55, 56syl2anr 597 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ ((𝑁 βˆ’ 𝑆) < π‘₯ ↔ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)))
58 zre 12558 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ β„€ β†’ 𝑁 ∈ ℝ)
5958adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ 𝑁 ∈ ℝ)
60 zre 12558 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑆 ∈ β„€ β†’ 𝑆 ∈ ℝ)
6160adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ 𝑆 ∈ ℝ)
6255adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ π‘₯ ∈ ℝ)
63 ltsubadd 11680 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑁 ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ π‘₯ ∈ ℝ) β†’ ((𝑁 βˆ’ 𝑆) < π‘₯ ↔ 𝑁 < (π‘₯ + 𝑆)))
6459, 61, 62, 63syl2an23an 1423 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ ((𝑁 βˆ’ 𝑆) < π‘₯ ↔ 𝑁 < (π‘₯ + 𝑆)))
6559adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ 𝑁 ∈ ℝ)
6648zred 12662 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ (π‘₯ + 𝑆) ∈ ℝ)
6765, 66posdifd 11797 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ (𝑁 < (π‘₯ + 𝑆) ↔ 0 < ((π‘₯ + 𝑆) βˆ’ 𝑁)))
68 0red 11213 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ 0 ∈ ℝ)
6950zred 12662 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ ℝ)
70 ltle 11298 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((0 ∈ ℝ ∧ ((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ ℝ) β†’ (0 < ((π‘₯ + 𝑆) βˆ’ 𝑁) β†’ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
7168, 69, 70syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ (0 < ((π‘₯ + 𝑆) βˆ’ 𝑁) β†’ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
7267, 71sylbid 239 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ (𝑁 < (π‘₯ + 𝑆) β†’ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
7364, 72sylbid 239 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ ((𝑁 βˆ’ 𝑆) < π‘₯ β†’ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
7457, 73sylbird 259 . . . . . . . . . . . . . . . . . . . . . . 23 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ (Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆) β†’ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
7574imp 407 . . . . . . . . . . . . . . . . . . . . . 22 (((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁))
7651, 75jca 512 . . . . . . . . . . . . . . . . . . . . 21 (((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€ ∧ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
7776exp31 420 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ β„€ β†’ ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ (Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€ ∧ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))))
7877, 26syl11 33 . . . . . . . . . . . . . . . . . . 19 ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ (π‘₯ ∈ (0...𝑁) β†’ (Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€ ∧ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))))
7929, 46, 78syl2anc 584 . . . . . . . . . . . . . . . . . 18 (𝑆 ∈ (0..^𝑁) β†’ (π‘₯ ∈ (0...𝑁) β†’ (Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€ ∧ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))))
8079imp31 418 . . . . . . . . . . . . . . . . 17 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€ ∧ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
81 elnn0z 12567 . . . . . . . . . . . . . . . . 17 (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„•0 ↔ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„€ ∧ 0 ≀ ((π‘₯ + 𝑆) βˆ’ 𝑁)))
8280, 81sylibr 233 . . . . . . . . . . . . . . . 16 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„•0)
8324ad2antlr 725 . . . . . . . . . . . . . . . 16 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (β™―β€˜πΉ) ∈ β„•0)
84 elfzo0 13669 . . . . . . . . . . . . . . . . . . . . 21 (𝑆 ∈ (0..^𝑁) ↔ (𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁))
85 elfz2nn0 13588 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ (0...𝑁) ↔ (π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁))
86 nn0re 12477 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑆 ∈ β„•0 β†’ 𝑆 ∈ ℝ)
87863ad2ant1 1133 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) β†’ 𝑆 ∈ ℝ)
88 nn0re 12477 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘₯ ∈ β„•0 β†’ π‘₯ ∈ ℝ)
89883ad2ant1 1133 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁) β†’ π‘₯ ∈ ℝ)
9087, 89anim12ci 614 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) ∧ (π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁)) β†’ (π‘₯ ∈ ℝ ∧ 𝑆 ∈ ℝ))
91 nnre 12215 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ β„• β†’ 𝑁 ∈ ℝ)
9291, 91jca 512 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ β„• β†’ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ))
93923ad2ant2 1134 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) β†’ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ))
9493adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) ∧ (π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁)) β†’ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ))
9590, 94jca 512 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) ∧ (π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁)) β†’ ((π‘₯ ∈ ℝ ∧ 𝑆 ∈ ℝ) ∧ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)))
96 simpr3 1196 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) ∧ (π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁)) β†’ π‘₯ ≀ 𝑁)
97 ltle 11298 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ) β†’ (𝑆 < 𝑁 β†’ 𝑆 ≀ 𝑁))
9886, 91, 97syl2an 596 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„•) β†’ (𝑆 < 𝑁 β†’ 𝑆 ≀ 𝑁))
99983impia 1117 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) β†’ 𝑆 ≀ 𝑁)
10099adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) ∧ (π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁)) β†’ 𝑆 ≀ 𝑁)
10195, 96, 100jca32 516 . . . . . . . . . . . . . . . . . . . . 21 (((𝑆 ∈ β„•0 ∧ 𝑁 ∈ β„• ∧ 𝑆 < 𝑁) ∧ (π‘₯ ∈ β„•0 ∧ 𝑁 ∈ β„•0 ∧ π‘₯ ≀ 𝑁)) β†’ (((π‘₯ ∈ ℝ ∧ 𝑆 ∈ ℝ) ∧ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)) ∧ (π‘₯ ≀ 𝑁 ∧ 𝑆 ≀ 𝑁)))
10284, 85, 101syl2anb 598 . . . . . . . . . . . . . . . . . . . 20 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ (((π‘₯ ∈ ℝ ∧ 𝑆 ∈ ℝ) ∧ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)) ∧ (π‘₯ ≀ 𝑁 ∧ 𝑆 ≀ 𝑁)))
103 le2add 11692 . . . . . . . . . . . . . . . . . . . . 21 (((π‘₯ ∈ ℝ ∧ 𝑆 ∈ ℝ) ∧ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)) β†’ ((π‘₯ ≀ 𝑁 ∧ 𝑆 ≀ 𝑁) β†’ (π‘₯ + 𝑆) ≀ (𝑁 + 𝑁)))
104103imp 407 . . . . . . . . . . . . . . . . . . . 20 ((((π‘₯ ∈ ℝ ∧ 𝑆 ∈ ℝ) ∧ (𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)) ∧ (π‘₯ ≀ 𝑁 ∧ 𝑆 ≀ 𝑁)) β†’ (π‘₯ + 𝑆) ≀ (𝑁 + 𝑁))
105102, 104syl 17 . . . . . . . . . . . . . . . . . . 19 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ (π‘₯ + 𝑆) ≀ (𝑁 + 𝑁))
10666, 65, 653jca 1128 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ β„€ ∧ (𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€)) β†’ ((π‘₯ + 𝑆) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ))
107106ex 413 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘₯ ∈ β„€ β†’ ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ ((π‘₯ + 𝑆) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)))
108107, 26syl11 33 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑆 ∈ β„€ ∧ 𝑁 ∈ β„€) β†’ (π‘₯ ∈ (0...𝑁) β†’ ((π‘₯ + 𝑆) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)))
10929, 46, 108syl2anc 584 . . . . . . . . . . . . . . . . . . . . 21 (𝑆 ∈ (0..^𝑁) β†’ (π‘₯ ∈ (0...𝑁) β†’ ((π‘₯ + 𝑆) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ)))
110109imp 407 . . . . . . . . . . . . . . . . . . . 20 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ ((π‘₯ + 𝑆) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ))
111 lesubadd 11682 . . . . . . . . . . . . . . . . . . . 20 (((π‘₯ + 𝑆) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ 𝑁 ∈ ℝ) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ 𝑁 ↔ (π‘₯ + 𝑆) ≀ (𝑁 + 𝑁)))
112110, 111syl 17 . . . . . . . . . . . . . . . . . . 19 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ 𝑁 ↔ (π‘₯ + 𝑆) ≀ (𝑁 + 𝑁)))
113105, 112mpbird 256 . . . . . . . . . . . . . . . . . 18 ((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ 𝑁)
114113adantr 481 . . . . . . . . . . . . . . . . 17 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ 𝑁)
115114, 22breqtrdi 5188 . . . . . . . . . . . . . . . 16 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ (β™―β€˜πΉ))
11682, 83, 1153jca 1128 . . . . . . . . . . . . . . 15 (((𝑆 ∈ (0..^𝑁) ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„•0 ∧ (β™―β€˜πΉ) ∈ β„•0 ∧ ((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ (β™―β€˜πΉ)))
11715, 116sylanl1 678 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„•0 ∧ (β™―β€˜πΉ) ∈ β„•0 ∧ ((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ (β™―β€˜πΉ)))
118 elfz2nn0 13588 . . . . . . . . . . . . . 14 (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ (0...(β™―β€˜πΉ)) ↔ (((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ β„•0 ∧ (β™―β€˜πΉ) ∈ β„•0 ∧ ((π‘₯ + 𝑆) βˆ’ 𝑁) ≀ (β™―β€˜πΉ)))
119117, 118sylibr 233 . . . . . . . . . . . . 13 (((πœ‘ ∧ π‘₯ ∈ (0...𝑁)) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ (0...(β™―β€˜πΉ)))
120119adantll 712 . . . . . . . . . . . 12 (((𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ (πœ‘ ∧ π‘₯ ∈ (0...𝑁))) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ ((π‘₯ + 𝑆) βˆ’ 𝑁) ∈ (0...(β™―β€˜πΉ)))
12145, 120ffvelcdmd 7084 . . . . . . . . . . 11 (((𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ (πœ‘ ∧ π‘₯ ∈ (0...𝑁))) ∧ Β¬ π‘₯ ≀ (𝑁 βˆ’ 𝑆)) β†’ (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁)) ∈ 𝑉)
12244, 121ifclda 4562 . . . . . . . . . 10 ((𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ (πœ‘ ∧ π‘₯ ∈ (0...𝑁))) β†’ if(π‘₯ ≀ (𝑁 βˆ’ 𝑆), (π‘ƒβ€˜(π‘₯ + 𝑆)), (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁))) ∈ 𝑉)
123122exp32 421 . . . . . . . . 9 (𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ β†’ (πœ‘ β†’ (π‘₯ ∈ (0...𝑁) β†’ if(π‘₯ ≀ (𝑁 βˆ’ 𝑆), (π‘ƒβ€˜(π‘₯ + 𝑆)), (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁))) ∈ 𝑉)))
12413, 123syl 17 . . . . . . . 8 (𝐹(Walksβ€˜πΊ)𝑃 β†’ (πœ‘ β†’ (π‘₯ ∈ (0...𝑁) β†’ if(π‘₯ ≀ (𝑁 βˆ’ 𝑆), (π‘ƒβ€˜(π‘₯ + 𝑆)), (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁))) ∈ 𝑉)))
12511, 124mpcom 38 . . . . . . 7 (πœ‘ β†’ (π‘₯ ∈ (0...𝑁) β†’ if(π‘₯ ≀ (𝑁 βˆ’ 𝑆), (π‘ƒβ€˜(π‘₯ + 𝑆)), (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁))) ∈ 𝑉))
126125imp 407 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (0...𝑁)) β†’ if(π‘₯ ≀ (𝑁 βˆ’ 𝑆), (π‘ƒβ€˜(π‘₯ + 𝑆)), (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁))) ∈ 𝑉)
127 crctcsh.q . . . . . 6 𝑄 = (π‘₯ ∈ (0...𝑁) ↦ if(π‘₯ ≀ (𝑁 βˆ’ 𝑆), (π‘ƒβ€˜(π‘₯ + 𝑆)), (π‘ƒβ€˜((π‘₯ + 𝑆) βˆ’ 𝑁))))
128126, 127fmptd 7110 . . . . 5 (πœ‘ β†’ 𝑄:(0...𝑁)βŸΆπ‘‰)
12912, 4, 2, 22, 15, 1crctcshlem2 29061 . . . . . . 7 (πœ‘ β†’ (β™―β€˜π») = 𝑁)
130129oveq2d 7421 . . . . . 6 (πœ‘ β†’ (0...(β™―β€˜π»)) = (0...𝑁))
131130feq2d 6700 . . . . 5 (πœ‘ β†’ (𝑄:(0...(β™―β€˜π»))βŸΆπ‘‰ ↔ 𝑄:(0...𝑁)βŸΆπ‘‰))
132128, 131mpbird 256 . . . 4 (πœ‘ β†’ 𝑄:(0...(β™―β€˜π»))βŸΆπ‘‰)
133132adantr 481 . . 3 ((πœ‘ ∧ 𝑆 β‰  0) β†’ 𝑄:(0...(β™―β€˜π»))βŸΆπ‘‰)
13412, 4wlkprop 28857 . . . . . 6 (𝐹(Walksβ€˜πΊ)𝑃 β†’ (𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))))
1352, 3, 1343syl 18 . . . . 5 (πœ‘ β†’ (𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))))
136135adantr 481 . . . 4 ((πœ‘ ∧ 𝑆 β‰  0) β†’ (𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))))
13722eqcomi 2741 . . . . . . . . . 10 (β™―β€˜πΉ) = 𝑁
138137oveq2i 7416 . . . . . . . . 9 (0..^(β™―β€˜πΉ)) = (0..^𝑁)
139138raleqi 3323 . . . . . . . 8 (βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) ↔ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))))
140 fzo1fzo0n0 13679 . . . . . . . . . . . . . . 15 (𝑆 ∈ (1..^𝑁) ↔ (𝑆 ∈ (0..^𝑁) ∧ 𝑆 β‰  0))
141140simplbi2 501 . . . . . . . . . . . . . 14 (𝑆 ∈ (0..^𝑁) β†’ (𝑆 β‰  0 β†’ 𝑆 ∈ (1..^𝑁)))
14215, 141syl 17 . . . . . . . . . . . . 13 (πœ‘ β†’ (𝑆 β‰  0 β†’ 𝑆 ∈ (1..^𝑁)))
143142imp 407 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑆 β‰  0) β†’ 𝑆 ∈ (1..^𝑁))
144143ad2antlr 725 . . . . . . . . . . 11 ((((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) ∧ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ 𝑆 ∈ (1..^𝑁))
145 simplll 773 . . . . . . . . . . 11 ((((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) ∧ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ 𝐹 ∈ Word dom 𝐼)
146 wkslem1 28853 . . . . . . . . . . . . . 14 (𝑖 = π‘˜ β†’ (if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) ↔ if-((π‘ƒβ€˜π‘˜) = (π‘ƒβ€˜(π‘˜ + 1)), (πΌβ€˜(πΉβ€˜π‘˜)) = {(π‘ƒβ€˜π‘˜)}, {(π‘ƒβ€˜π‘˜), (π‘ƒβ€˜(π‘˜ + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘˜)))))
147146cbvralvw 3234 . . . . . . . . . . . . 13 (βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) ↔ βˆ€π‘˜ ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘˜) = (π‘ƒβ€˜(π‘˜ + 1)), (πΌβ€˜(πΉβ€˜π‘˜)) = {(π‘ƒβ€˜π‘˜)}, {(π‘ƒβ€˜π‘˜), (π‘ƒβ€˜(π‘˜ + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘˜))))
148147biimpi 215 . . . . . . . . . . . 12 (βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) β†’ βˆ€π‘˜ ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘˜) = (π‘ƒβ€˜(π‘˜ + 1)), (πΌβ€˜(πΉβ€˜π‘˜)) = {(π‘ƒβ€˜π‘˜)}, {(π‘ƒβ€˜π‘˜), (π‘ƒβ€˜(π‘˜ + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘˜))))
149148adantl 482 . . . . . . . . . . 11 ((((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) ∧ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ βˆ€π‘˜ ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘˜) = (π‘ƒβ€˜(π‘˜ + 1)), (πΌβ€˜(πΉβ€˜π‘˜)) = {(π‘ƒβ€˜π‘˜)}, {(π‘ƒβ€˜π‘˜), (π‘ƒβ€˜(π‘˜ + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘˜))))
150 crctprop 29038 . . . . . . . . . . . . . 14 (𝐹(Circuitsβ€˜πΊ)𝑃 β†’ (𝐹(Trailsβ€˜πΊ)𝑃 ∧ (π‘ƒβ€˜0) = (π‘ƒβ€˜(β™―β€˜πΉ))))
151137fveq2i 6891 . . . . . . . . . . . . . . . . . 18 (π‘ƒβ€˜(β™―β€˜πΉ)) = (π‘ƒβ€˜π‘)
152151eqeq2i 2745 . . . . . . . . . . . . . . . . 17 ((π‘ƒβ€˜0) = (π‘ƒβ€˜(β™―β€˜πΉ)) ↔ (π‘ƒβ€˜0) = (π‘ƒβ€˜π‘))
153152biimpi 215 . . . . . . . . . . . . . . . 16 ((π‘ƒβ€˜0) = (π‘ƒβ€˜(β™―β€˜πΉ)) β†’ (π‘ƒβ€˜0) = (π‘ƒβ€˜π‘))
154153eqcomd 2738 . . . . . . . . . . . . . . 15 ((π‘ƒβ€˜0) = (π‘ƒβ€˜(β™―β€˜πΉ)) β†’ (π‘ƒβ€˜π‘) = (π‘ƒβ€˜0))
155154adantl 482 . . . . . . . . . . . . . 14 ((𝐹(Trailsβ€˜πΊ)𝑃 ∧ (π‘ƒβ€˜0) = (π‘ƒβ€˜(β™―β€˜πΉ))) β†’ (π‘ƒβ€˜π‘) = (π‘ƒβ€˜0))
1562, 150, 1553syl 18 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘ƒβ€˜π‘) = (π‘ƒβ€˜0))
157156ad2antrl 726 . . . . . . . . . . . 12 (((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) β†’ (π‘ƒβ€˜π‘) = (π‘ƒβ€˜0))
158157adantr 481 . . . . . . . . . . 11 ((((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) ∧ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ (π‘ƒβ€˜π‘) = (π‘ƒβ€˜0))
159144, 127, 1, 22, 145, 149, 158crctcshwlkn0lem7 29059 . . . . . . . . . 10 ((((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) ∧ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ βˆ€π‘— ∈ (0..^𝑁)if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))))
160129oveq2d 7421 . . . . . . . . . . . . 13 (πœ‘ β†’ (0..^(β™―β€˜π»)) = (0..^𝑁))
161160raleqdv 3325 . . . . . . . . . . . 12 (πœ‘ β†’ (βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))) ↔ βˆ€π‘— ∈ (0..^𝑁)if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—)))))
162161ad2antrl 726 . . . . . . . . . . 11 (((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) β†’ (βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))) ↔ βˆ€π‘— ∈ (0..^𝑁)if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—)))))
163162adantr 481 . . . . . . . . . 10 ((((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) ∧ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ (βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))) ↔ βˆ€π‘— ∈ (0..^𝑁)if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—)))))
164159, 163mpbird 256 . . . . . . . . 9 ((((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) ∧ βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))))
165164ex 413 . . . . . . . 8 (((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) β†’ (βˆ€π‘– ∈ (0..^𝑁)if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) β†’ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—)))))
166139, 165biimtrid 241 . . . . . . 7 (((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) ∧ (πœ‘ ∧ 𝑆 β‰  0)) β†’ (βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) β†’ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—)))))
167166ex 413 . . . . . 6 ((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) β†’ ((πœ‘ ∧ 𝑆 β‰  0) β†’ (βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) β†’ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))))))
168167com23 86 . . . . 5 ((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰) β†’ (βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–))) β†’ ((πœ‘ ∧ 𝑆 β‰  0) β†’ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))))))
1691683impia 1117 . . . 4 ((𝐹 ∈ Word dom 𝐼 ∧ 𝑃:(0...(β™―β€˜πΉ))βŸΆπ‘‰ ∧ βˆ€π‘– ∈ (0..^(β™―β€˜πΉ))if-((π‘ƒβ€˜π‘–) = (π‘ƒβ€˜(𝑖 + 1)), (πΌβ€˜(πΉβ€˜π‘–)) = {(π‘ƒβ€˜π‘–)}, {(π‘ƒβ€˜π‘–), (π‘ƒβ€˜(𝑖 + 1))} βŠ† (πΌβ€˜(πΉβ€˜π‘–)))) β†’ ((πœ‘ ∧ 𝑆 β‰  0) β†’ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—)))))
170136, 169mpcom 38 . . 3 ((πœ‘ ∧ 𝑆 β‰  0) β†’ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))))
17110, 133, 1703jca 1128 . 2 ((πœ‘ ∧ 𝑆 β‰  0) β†’ (𝐻 ∈ Word dom 𝐼 ∧ 𝑄:(0...(β™―β€˜π»))βŸΆπ‘‰ ∧ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—)))))
17212, 4, 2, 22, 15, 1, 127crctcshlem3 29062 . . . 4 (πœ‘ β†’ (𝐺 ∈ V ∧ 𝐻 ∈ V ∧ 𝑄 ∈ V))
173172adantr 481 . . 3 ((πœ‘ ∧ 𝑆 β‰  0) β†’ (𝐺 ∈ V ∧ 𝐻 ∈ V ∧ 𝑄 ∈ V))
17412, 4iswlk 28856 . . 3 ((𝐺 ∈ V ∧ 𝐻 ∈ V ∧ 𝑄 ∈ V) β†’ (𝐻(Walksβ€˜πΊ)𝑄 ↔ (𝐻 ∈ Word dom 𝐼 ∧ 𝑄:(0...(β™―β€˜π»))βŸΆπ‘‰ ∧ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))))))
175173, 174syl 17 . 2 ((πœ‘ ∧ 𝑆 β‰  0) β†’ (𝐻(Walksβ€˜πΊ)𝑄 ↔ (𝐻 ∈ Word dom 𝐼 ∧ 𝑄:(0...(β™―β€˜π»))βŸΆπ‘‰ ∧ βˆ€π‘— ∈ (0..^(β™―β€˜π»))if-((π‘„β€˜π‘—) = (π‘„β€˜(𝑗 + 1)), (πΌβ€˜(π»β€˜π‘—)) = {(π‘„β€˜π‘—)}, {(π‘„β€˜π‘—), (π‘„β€˜(𝑗 + 1))} βŠ† (πΌβ€˜(π»β€˜π‘—))))))
176171, 175mpbird 256 1 ((πœ‘ ∧ 𝑆 β‰  0) β†’ 𝐻(Walksβ€˜πΊ)𝑄)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 396  if-wif 1061   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106   β‰  wne 2940  βˆ€wral 3061  Vcvv 3474   βŠ† wss 3947  ifcif 4527  {csn 4627  {cpr 4629   class class class wbr 5147   ↦ cmpt 5230  dom cdm 5675  βŸΆwf 6536  β€˜cfv 6540  (class class class)co 7405  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440  β„•cn 12208  β„•0cn0 12468  β„€cz 12554  ...cfz 13480  ..^cfzo 13623  β™―chash 14286  Word cword 14460   cyclShift ccsh 14734  Vtxcvtx 28245  iEdgciedg 28246  Walkscwlks 28842  Trailsctrls 28936  Circuitsccrcts 29030
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  ax-pre-sup 11184
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-ifp 1062  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-rmo 3376  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-map 8818  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-sup 9433  df-inf 9434  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-div 11868  df-nn 12209  df-2 12271  df-n0 12469  df-z 12555  df-uz 12819  df-rp 12971  df-fz 13481  df-fzo 13624  df-fl 13753  df-mod 13831  df-hash 14287  df-word 14461  df-concat 14517  df-substr 14587  df-pfx 14617  df-csh 14735  df-wlks 28845  df-trls 28938  df-crcts 29032
This theorem is referenced by:  crctcshwlk  29065
  Copyright terms: Public domain W3C validator