ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  wlkres GIF version

Theorem wlkres 16603
Description: The restriction 𝐻, 𝑄 of a walk 𝐹, 𝑃 to an initial segment of the walk (of length 𝑁) forms a walk on the subgraph 𝑆 consisting of the edges in the initial segment. (Contributed by Mario Carneiro, 12-Mar-2015.) (Revised by Mario Carneiro, 3-May-2015.) (Revised by AV, 5-Mar-2021.) Hypothesis revised using the prefix operation. (Revised by AV, 30-Nov-2022.)
Hypotheses
Ref Expression
wlkres.v 𝑉 = (Vtx‘𝐺)
wlkres.i 𝐼 = (iEdg‘𝐺)
wlkres.d (𝜑𝐹(Walks‘𝐺)𝑃)
wlkres.n (𝜑𝑁 ∈ (0..^(♯‘𝐹)))
wlkres.s (𝜑 → (Vtx‘𝑆) = 𝑉)
wlkres.e (𝜑 → (iEdg‘𝑆) = (𝐼 ↾ (𝐹 “ (0..^𝑁))))
wlkres.h 𝐻 = (𝐹 prefix 𝑁)
wlkres.q 𝑄 = (𝑃 ↾ (0...𝑁))
Assertion
Ref Expression
wlkres (𝜑𝐻(Walks‘𝑆)𝑄)

Proof of Theorem wlkres
Dummy variables 𝑥 𝑘 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 wlkres.d . . . . 5 (𝜑𝐹(Walks‘𝐺)𝑃)
2 wlkres.i . . . . . 6 𝐼 = (iEdg‘𝐺)
32wlkf 16554 . . . . 5 (𝐹(Walks‘𝐺)𝑃𝐹 ∈ Word dom 𝐼)
41, 3syl 14 . . . 4 (𝜑𝐹 ∈ Word dom 𝐼)
5 wlkres.n . . . . 5 (𝜑𝑁 ∈ (0..^(♯‘𝐹)))
6 elfzonn0 10581 . . . . 5 (𝑁 ∈ (0..^(♯‘𝐹)) → 𝑁 ∈ ℕ0)
75, 6syl 14 . . . 4 (𝜑𝑁 ∈ ℕ0)
8 pfxwrdsymbg 11445 . . . 4 ((𝐹 ∈ Word dom 𝐼𝑁 ∈ ℕ0) → (𝐹 prefix 𝑁) ∈ Word (𝐹 “ (0..^𝑁)))
94, 7, 8syl2anc 415 . . 3 (𝜑 → (𝐹 prefix 𝑁) ∈ Word (𝐹 “ (0..^𝑁)))
10 wlkres.h . . . 4 𝐻 = (𝐹 prefix 𝑁)
1110a1i 9 . . 3 (𝜑𝐻 = (𝐹 prefix 𝑁))
12 wlkres.e . . . . . 6 (𝜑 → (iEdg‘𝑆) = (𝐼 ↾ (𝐹 “ (0..^𝑁))))
1312dmeqd 4981 . . . . 5 (𝜑 → dom (iEdg‘𝑆) = dom (𝐼 ↾ (𝐹 “ (0..^𝑁))))
14 wrdf 11293 . . . . . . 7 (𝐹 ∈ Word dom 𝐼𝐹:(0..^(♯‘𝐹))⟶dom 𝐼)
15 fimass 5548 . . . . . . 7 (𝐹:(0..^(♯‘𝐹))⟶dom 𝐼 → (𝐹 “ (0..^𝑁)) ⊆ dom 𝐼)
164, 14, 153syl 17 . . . . . 6 (𝜑 → (𝐹 “ (0..^𝑁)) ⊆ dom 𝐼)
17 ssdmres 5083 . . . . . 6 ((𝐹 “ (0..^𝑁)) ⊆ dom 𝐼 ↔ dom (𝐼 ↾ (𝐹 “ (0..^𝑁))) = (𝐹 “ (0..^𝑁)))
1816, 17sylib 122 . . . . 5 (𝜑 → dom (𝐼 ↾ (𝐹 “ (0..^𝑁))) = (𝐹 “ (0..^𝑁)))
1913, 18eqtrd 2271 . . . 4 (𝜑 → dom (iEdg‘𝑆) = (𝐹 “ (0..^𝑁)))
20 wrdeq 11309 . . . 4 (dom (iEdg‘𝑆) = (𝐹 “ (0..^𝑁)) → Word dom (iEdg‘𝑆) = Word (𝐹 “ (0..^𝑁)))
2119, 20syl 14 . . 3 (𝜑 → Word dom (iEdg‘𝑆) = Word (𝐹 “ (0..^𝑁)))
229, 11, 213eltr4d 2322 . 2 (𝜑𝐻 ∈ Word dom (iEdg‘𝑆))
23 wlkres.v . . . . . . . 8 𝑉 = (Vtx‘𝐺)
2423wlkp 16558 . . . . . . 7 (𝐹(Walks‘𝐺)𝑃𝑃:(0...(♯‘𝐹))⟶𝑉)
251, 24syl 14 . . . . . 6 (𝜑𝑃:(0...(♯‘𝐹))⟶𝑉)
26 wlkres.s . . . . . . 7 (𝜑 → (Vtx‘𝑆) = 𝑉)
2726feq3d 5520 . . . . . 6 (𝜑 → (𝑃:(0...(♯‘𝐹))⟶(Vtx‘𝑆) ↔ 𝑃:(0...(♯‘𝐹))⟶𝑉))
2825, 27mpbird 167 . . . . 5 (𝜑𝑃:(0...(♯‘𝐹))⟶(Vtx‘𝑆))
29 fzossfz 10556 . . . . . . 7 (0..^(♯‘𝐹)) ⊆ (0...(♯‘𝐹))
3029, 5sselid 3246 . . . . . 6 (𝜑𝑁 ∈ (0...(♯‘𝐹)))
31 elfzuz3 10408 . . . . . 6 (𝑁 ∈ (0...(♯‘𝐹)) → (♯‘𝐹) ∈ (ℤ𝑁))
32 fzss2 10453 . . . . . 6 ((♯‘𝐹) ∈ (ℤ𝑁) → (0...𝑁) ⊆ (0...(♯‘𝐹)))
3330, 31, 323syl 17 . . . . 5 (𝜑 → (0...𝑁) ⊆ (0...(♯‘𝐹)))
3428, 33fssresd 5564 . . . 4 (𝜑 → (𝑃 ↾ (0...𝑁)):(0...𝑁)⟶(Vtx‘𝑆))
3510fveq2i 5696 . . . . . . 7 (♯‘𝐻) = (♯‘(𝐹 prefix 𝑁))
36 pfxlen 11440 . . . . . . . 8 ((𝐹 ∈ Word dom 𝐼𝑁 ∈ (0...(♯‘𝐹))) → (♯‘(𝐹 prefix 𝑁)) = 𝑁)
374, 30, 36syl2anc 415 . . . . . . 7 (𝜑 → (♯‘(𝐹 prefix 𝑁)) = 𝑁)
3835, 37eqtrid 2283 . . . . . 6 (𝜑 → (♯‘𝐻) = 𝑁)
3938oveq2d 6095 . . . . 5 (𝜑 → (0...(♯‘𝐻)) = (0...𝑁))
4039feq2d 5519 . . . 4 (𝜑 → ((𝑃 ↾ (0...𝑁)):(0...(♯‘𝐻))⟶(Vtx‘𝑆) ↔ (𝑃 ↾ (0...𝑁)):(0...𝑁)⟶(Vtx‘𝑆)))
4134, 40mpbird 167 . . 3 (𝜑 → (𝑃 ↾ (0...𝑁)):(0...(♯‘𝐻))⟶(Vtx‘𝑆))
42 wlkres.q . . . 4 𝑄 = (𝑃 ↾ (0...𝑁))
4342feq1i 5524 . . 3 (𝑄:(0...(♯‘𝐻))⟶(Vtx‘𝑆) ↔ (𝑃 ↾ (0...𝑁)):(0...(♯‘𝐻))⟶(Vtx‘𝑆))
4441, 43sylibr 134 . 2 (𝜑𝑄:(0...(♯‘𝐻))⟶(Vtx‘𝑆))
4523, 2wlkprop 16551 . . . . . 6 (𝐹(Walks‘𝐺)𝑃 → (𝐹 ∈ Word dom 𝐼𝑃:(0...(♯‘𝐹))⟶𝑉 ∧ ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)))))
461, 45syl 14 . . . . 5 (𝜑 → (𝐹 ∈ Word dom 𝐼𝑃:(0...(♯‘𝐹))⟶𝑉 ∧ ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)))))
4746adantr 276 . . . 4 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (𝐹 ∈ Word dom 𝐼𝑃:(0...(♯‘𝐹))⟶𝑉 ∧ ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)))))
4838oveq2d 6095 . . . . . . . . . . 11 (𝜑 → (0..^(♯‘𝐻)) = (0..^𝑁))
4948eleq2d 2308 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (0..^(♯‘𝐻)) ↔ 𝑥 ∈ (0..^𝑁)))
5042fveq1i 5694 . . . . . . . . . . . . 13 (𝑄𝑥) = ((𝑃 ↾ (0...𝑁))‘𝑥)
51 fzossfz 10556 . . . . . . . . . . . . . . . 16 (0..^𝑁) ⊆ (0...𝑁)
5251a1i 9 . . . . . . . . . . . . . . 15 (𝜑 → (0..^𝑁) ⊆ (0...𝑁))
5352sselda 3248 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (0..^𝑁)) → 𝑥 ∈ (0...𝑁))
5453fvresd 5718 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (0..^𝑁)) → ((𝑃 ↾ (0...𝑁))‘𝑥) = (𝑃𝑥))
5550, 54eqtr2id 2284 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (0..^𝑁)) → (𝑃𝑥) = (𝑄𝑥))
5642fveq1i 5694 . . . . . . . . . . . . 13 (𝑄‘(𝑥 + 1)) = ((𝑃 ↾ (0...𝑁))‘(𝑥 + 1))
57 fzofzp1 10628 . . . . . . . . . . . . . . 15 (𝑥 ∈ (0..^𝑁) → (𝑥 + 1) ∈ (0...𝑁))
5857adantl 277 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (0..^𝑁)) → (𝑥 + 1) ∈ (0...𝑁))
5958fvresd 5718 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (0..^𝑁)) → ((𝑃 ↾ (0...𝑁))‘(𝑥 + 1)) = (𝑃‘(𝑥 + 1)))
6056, 59eqtr2id 2284 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (0..^𝑁)) → (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1)))
6155, 60jca 306 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (0..^𝑁)) → ((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))))
6261ex 115 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (0..^𝑁) → ((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1)))))
6349, 62sylbid 150 . . . . . . . . 9 (𝜑 → (𝑥 ∈ (0..^(♯‘𝐻)) → ((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1)))))
6463imp 124 . . . . . . . 8 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → ((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))))
654ancli 323 . . . . . . . . . . . . . 14 (𝜑 → (𝜑𝐹 ∈ Word dom 𝐼))
6614ffund 5535 . . . . . . . . . . . . . . . . 17 (𝐹 ∈ Word dom 𝐼 → Fun 𝐹)
6766adantl 277 . . . . . . . . . . . . . . . 16 ((𝜑𝐹 ∈ Word dom 𝐼) → Fun 𝐹)
6867adantr 276 . . . . . . . . . . . . . . 15 (((𝜑𝐹 ∈ Word dom 𝐼) ∧ 𝑥 ∈ (0..^𝑁)) → Fun 𝐹)
69 fdm 5537 . . . . . . . . . . . . . . . . . 18 (𝐹:(0..^(♯‘𝐹))⟶dom 𝐼 → dom 𝐹 = (0..^(♯‘𝐹)))
70 elfzouz2 10552 . . . . . . . . . . . . . . . . . . . 20 (𝑁 ∈ (0..^(♯‘𝐹)) → (♯‘𝐹) ∈ (ℤ𝑁))
71 fzoss2 10564 . . . . . . . . . . . . . . . . . . . 20 ((♯‘𝐹) ∈ (ℤ𝑁) → (0..^𝑁) ⊆ (0..^(♯‘𝐹)))
725, 70, 713syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (0..^𝑁) ⊆ (0..^(♯‘𝐹)))
73 sseq2 3272 . . . . . . . . . . . . . . . . . . 19 (dom 𝐹 = (0..^(♯‘𝐹)) → ((0..^𝑁) ⊆ dom 𝐹 ↔ (0..^𝑁) ⊆ (0..^(♯‘𝐹))))
7472, 73imbitrrid 156 . . . . . . . . . . . . . . . . . 18 (dom 𝐹 = (0..^(♯‘𝐹)) → (𝜑 → (0..^𝑁) ⊆ dom 𝐹))
7514, 69, 743syl 17 . . . . . . . . . . . . . . . . 17 (𝐹 ∈ Word dom 𝐼 → (𝜑 → (0..^𝑁) ⊆ dom 𝐹))
7675impcom 125 . . . . . . . . . . . . . . . 16 ((𝜑𝐹 ∈ Word dom 𝐼) → (0..^𝑁) ⊆ dom 𝐹)
7776adantr 276 . . . . . . . . . . . . . . 15 (((𝜑𝐹 ∈ Word dom 𝐼) ∧ 𝑥 ∈ (0..^𝑁)) → (0..^𝑁) ⊆ dom 𝐹)
78 simpr 110 . . . . . . . . . . . . . . 15 (((𝜑𝐹 ∈ Word dom 𝐼) ∧ 𝑥 ∈ (0..^𝑁)) → 𝑥 ∈ (0..^𝑁))
7968, 77, 78resfvresima 5950 . . . . . . . . . . . . . 14 (((𝜑𝐹 ∈ Word dom 𝐼) ∧ 𝑥 ∈ (0..^𝑁)) → ((𝐼 ↾ (𝐹 “ (0..^𝑁)))‘((𝐹 ↾ (0..^𝑁))‘𝑥)) = (𝐼‘(𝐹𝑥)))
8065, 79sylan 283 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (0..^𝑁)) → ((𝐼 ↾ (𝐹 “ (0..^𝑁)))‘((𝐹 ↾ (0..^𝑁))‘𝑥)) = (𝐼‘(𝐹𝑥)))
8180eqcomd 2244 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (0..^𝑁)) → (𝐼‘(𝐹𝑥)) = ((𝐼 ↾ (𝐹 “ (0..^𝑁)))‘((𝐹 ↾ (0..^𝑁))‘𝑥)))
8281ex 115 . . . . . . . . . . 11 (𝜑 → (𝑥 ∈ (0..^𝑁) → (𝐼‘(𝐹𝑥)) = ((𝐼 ↾ (𝐹 “ (0..^𝑁)))‘((𝐹 ↾ (0..^𝑁))‘𝑥))))
8349, 82sylbid 150 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (0..^(♯‘𝐻)) → (𝐼‘(𝐹𝑥)) = ((𝐼 ↾ (𝐹 “ (0..^𝑁)))‘((𝐹 ↾ (0..^𝑁))‘𝑥))))
8483imp 124 . . . . . . . . 9 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (𝐼‘(𝐹𝑥)) = ((𝐼 ↾ (𝐹 “ (0..^𝑁)))‘((𝐹 ↾ (0..^𝑁))‘𝑥)))
8512adantr 276 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (iEdg‘𝑆) = (𝐼 ↾ (𝐹 “ (0..^𝑁))))
8610fveq1i 5694 . . . . . . . . . . 11 (𝐻𝑥) = ((𝐹 prefix 𝑁)‘𝑥)
874adantr 276 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → 𝐹 ∈ Word dom 𝐼)
8830adantr 276 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → 𝑁 ∈ (0...(♯‘𝐹)))
89 pfxres 11436 . . . . . . . . . . . . 13 ((𝐹 ∈ Word dom 𝐼𝑁 ∈ (0...(♯‘𝐹))) → (𝐹 prefix 𝑁) = (𝐹 ↾ (0..^𝑁)))
9087, 88, 89syl2anc 415 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (𝐹 prefix 𝑁) = (𝐹 ↾ (0..^𝑁)))
9190fveq1d 5695 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → ((𝐹 prefix 𝑁)‘𝑥) = ((𝐹 ↾ (0..^𝑁))‘𝑥))
9286, 91eqtrid 2283 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (𝐻𝑥) = ((𝐹 ↾ (0..^𝑁))‘𝑥))
9385, 92fveq12d 5700 . . . . . . . . 9 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → ((iEdg‘𝑆)‘(𝐻𝑥)) = ((𝐼 ↾ (𝐹 “ (0..^𝑁)))‘((𝐹 ↾ (0..^𝑁))‘𝑥)))
9484, 93eqtr4d 2274 . . . . . . . 8 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥)))
9564, 94jca 306 . . . . . . 7 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))))
965, 70syl 14 . . . . . . . . . . 11 (𝜑 → (♯‘𝐹) ∈ (ℤ𝑁))
9738fveq2d 5697 . . . . . . . . . . 11 (𝜑 → (ℤ‘(♯‘𝐻)) = (ℤ𝑁))
9896, 97eleqtrrd 2318 . . . . . . . . . 10 (𝜑 → (♯‘𝐹) ∈ (ℤ‘(♯‘𝐻)))
99 fzoss2 10564 . . . . . . . . . 10 ((♯‘𝐹) ∈ (ℤ‘(♯‘𝐻)) → (0..^(♯‘𝐻)) ⊆ (0..^(♯‘𝐹)))
10098, 99syl 14 . . . . . . . . 9 (𝜑 → (0..^(♯‘𝐻)) ⊆ (0..^(♯‘𝐹)))
101100sselda 3248 . . . . . . . 8 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → 𝑥 ∈ (0..^(♯‘𝐹)))
102 wkslem1 16544 . . . . . . . . 9 (𝑘 = 𝑥 → (if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))) ↔ if-((𝑃𝑥) = (𝑃‘(𝑥 + 1)), (𝐼‘(𝐹𝑥)) = {(𝑃𝑥)}, {(𝑃𝑥), (𝑃‘(𝑥 + 1))} ⊆ (𝐼‘(𝐹𝑥)))))
103102rspcv 2925 . . . . . . . 8 (𝑥 ∈ (0..^(♯‘𝐹)) → (∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))) → if-((𝑃𝑥) = (𝑃‘(𝑥 + 1)), (𝐼‘(𝐹𝑥)) = {(𝑃𝑥)}, {(𝑃𝑥), (𝑃‘(𝑥 + 1))} ⊆ (𝐼‘(𝐹𝑥)))))
104101, 103syl 14 . . . . . . 7 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))) → if-((𝑃𝑥) = (𝑃‘(𝑥 + 1)), (𝐼‘(𝐹𝑥)) = {(𝑃𝑥)}, {(𝑃𝑥), (𝑃‘(𝑥 + 1))} ⊆ (𝐼‘(𝐹𝑥)))))
105 eqeq12 2251 . . . . . . . . . 10 (((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) → ((𝑃𝑥) = (𝑃‘(𝑥 + 1)) ↔ (𝑄𝑥) = (𝑄‘(𝑥 + 1))))
106105adantr 276 . . . . . . . . 9 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → ((𝑃𝑥) = (𝑃‘(𝑥 + 1)) ↔ (𝑄𝑥) = (𝑄‘(𝑥 + 1))))
107 simpr 110 . . . . . . . . . 10 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥)))
108 sneq 3719 . . . . . . . . . . . 12 ((𝑃𝑥) = (𝑄𝑥) → {(𝑃𝑥)} = {(𝑄𝑥)})
109108adantr 276 . . . . . . . . . . 11 (((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) → {(𝑃𝑥)} = {(𝑄𝑥)})
110109adantr 276 . . . . . . . . . 10 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → {(𝑃𝑥)} = {(𝑄𝑥)})
111107, 110eqeq12d 2253 . . . . . . . . 9 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → ((𝐼‘(𝐹𝑥)) = {(𝑃𝑥)} ↔ ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}))
112 preq12 3789 . . . . . . . . . . 11 (((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) → {(𝑃𝑥), (𝑃‘(𝑥 + 1))} = {(𝑄𝑥), (𝑄‘(𝑥 + 1))})
113112adantr 276 . . . . . . . . . 10 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → {(𝑃𝑥), (𝑃‘(𝑥 + 1))} = {(𝑄𝑥), (𝑄‘(𝑥 + 1))})
114113, 107sseq12d 3279 . . . . . . . . 9 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → ({(𝑃𝑥), (𝑃‘(𝑥 + 1))} ⊆ (𝐼‘(𝐹𝑥)) ↔ {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥))))
115106, 111, 114ifpbi123d 1005 . . . . . . . 8 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → (if-((𝑃𝑥) = (𝑃‘(𝑥 + 1)), (𝐼‘(𝐹𝑥)) = {(𝑃𝑥)}, {(𝑃𝑥), (𝑃‘(𝑥 + 1))} ⊆ (𝐼‘(𝐹𝑥))) ↔ if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥)))))
116115biimpd 144 . . . . . . 7 ((((𝑃𝑥) = (𝑄𝑥) ∧ (𝑃‘(𝑥 + 1)) = (𝑄‘(𝑥 + 1))) ∧ (𝐼‘(𝐹𝑥)) = ((iEdg‘𝑆)‘(𝐻𝑥))) → (if-((𝑃𝑥) = (𝑃‘(𝑥 + 1)), (𝐼‘(𝐹𝑥)) = {(𝑃𝑥)}, {(𝑃𝑥), (𝑃‘(𝑥 + 1))} ⊆ (𝐼‘(𝐹𝑥))) → if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥)))))
11795, 104, 116sylsyld 58 . . . . . 6 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → (∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))) → if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥)))))
118117com12 30 . . . . 5 (∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))) → ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥)))))
1191183ad2ant3 1051 . . . 4 ((𝐹 ∈ Word dom 𝐼𝑃:(0...(♯‘𝐹))⟶𝑉 ∧ ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)))) → ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥)))))
12047, 119mpcom 36 . . 3 ((𝜑𝑥 ∈ (0..^(♯‘𝐻))) → if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥))))
121120ralrimiva 2623 . 2 (𝜑 → ∀𝑥 ∈ (0..^(♯‘𝐻))if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥))))
12223, 2, 1, 5, 26wlkreslem 16602 . . 3 (𝜑𝑆 ∈ V)
123 eqid 2238 . . . 4 (Vtx‘𝑆) = (Vtx‘𝑆)
124 eqid 2238 . . . 4 (iEdg‘𝑆) = (iEdg‘𝑆)
125123, 124iswlkg 16553 . . 3 (𝑆 ∈ V → (𝐻(Walks‘𝑆)𝑄 ↔ (𝐻 ∈ Word dom (iEdg‘𝑆) ∧ 𝑄:(0...(♯‘𝐻))⟶(Vtx‘𝑆) ∧ ∀𝑥 ∈ (0..^(♯‘𝐻))if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥))))))
126122, 125syl 14 . 2 (𝜑 → (𝐻(Walks‘𝑆)𝑄 ↔ (𝐻 ∈ Word dom (iEdg‘𝑆) ∧ 𝑄:(0...(♯‘𝐻))⟶(Vtx‘𝑆) ∧ ∀𝑥 ∈ (0..^(♯‘𝐻))if-((𝑄𝑥) = (𝑄‘(𝑥 + 1)), ((iEdg‘𝑆)‘(𝐻𝑥)) = {(𝑄𝑥)}, {(𝑄𝑥), (𝑄‘(𝑥 + 1))} ⊆ ((iEdg‘𝑆)‘(𝐻𝑥))))))
12722, 44, 121, 126mpbir3and 1211 1 (𝜑𝐻(Walks‘𝑆)𝑄)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105  if-wif 990  w3a 1009   = wceq 1402  wcel 2209  wral 2528  Vcvv 2821  wss 3220  {csn 3708  {cpr 3709   class class class wbr 4128  dom cdm 4772  cres 4774  cima 4775  Fun wfun 5369  wf 5371  cfv 5375  (class class class)co 6079  0cc0 8173  1c1 8174   + caddc 8176  0cn0 9546  cuz 9904  ...cfz 10394  ..^cfzo 10532  chash 11197  Word cword 11287   prefix cpfx 11427  Vtxcvtx 16236  iEdgciedg 16237  Walkscwlks 16541
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4244  ax-sep 4247  ax-nul 4257  ax-pow 4309  ax-pr 4344  ax-un 4576  ax-setind 4682  ax-iinf 4733  ax-cnex 8264  ax-resscn 8265  ax-1cn 8266  ax-1re 8267  ax-icn 8268  ax-addcl 8269  ax-addrcl 8270  ax-mulcl 8271  ax-addcom 8273  ax-mulcom 8274  ax-addass 8275  ax-mulass 8276  ax-distr 8277  ax-i2m1 8278  ax-0lt1 8279  ax-1rid 8280  ax-0id 8281  ax-rnegex 8282  ax-cnre 8284  ax-pre-ltirr 8285  ax-pre-ltwlin 8286  ax-pre-lttrn 8287  ax-pre-apti 8288  ax-pre-ltadd 8289
This theorem depends on definitions:  df-bi 117  df-dc 847  df-ifp 991  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3714  df-pr 3715  df-op 3717  df-uni 3934  df-int 3969  df-iun 4012  df-br 4129  df-opab 4191  df-mpt 4192  df-tr 4228  df-id 4436  df-iord 4509  df-on 4511  df-ilim 4512  df-suc 4514  df-iom 4736  df-xp 4778  df-rel 4779  df-cnv 4780  df-co 4781  df-dm 4782  df-rn 4783  df-res 4784  df-ima 4785  df-iota 5335  df-fun 5377  df-fn 5378  df-f 5379  df-f1 5380  df-fo 5381  df-f1o 5382  df-fv 5383  df-riota 6032  df-ov 6082  df-oprab 6083  df-mpo 6084  df-1st 6368  df-2nd 6369  df-recs 6570  df-frec 6656  df-1o 6681  df-er 6801  df-map 6918  df-en 7017  df-dom 7018  df-fin 7019  df-pnf 8356  df-mnf 8357  df-xr 8358  df-ltxr 8359  df-le 8360  df-sub 8493  df-neg 8494  df-inn 9288  df-2 9346  df-3 9347  df-4 9348  df-5 9349  df-6 9350  df-7 9351  df-8 9352  df-9 9353  df-n0 9547  df-z 9628  df-dec 9761  df-uz 9905  df-fz 10395  df-fzo 10533  df-ihash 11198  df-word 11288  df-substr 11401  df-pfx 11428  df-ndx 13338  df-slot 13339  df-base 13341  df-edgf 16229  df-vtx 16238  df-iedg 16239  df-wlks 16542
This theorem is referenced by:  trlres  16614  eupthres  16681
  Copyright terms: Public domain W3C validator