Metamath Proof Explorer


Theorem ewlkle

Description: An s-walk of edges is also a t-walk of edges if t <_ s . (Contributed by AV, 4-Jan-2021)

Ref Expression
Assertion ewlkle ⊢ F ∈ G EdgWalks S ∧ T ∈ ℕ 0 * ∧ T ≤ S → F ∈ G EdgWalks T

Proof

Step Hyp Ref Expression
1 eqid ⊢ iEdg ⁡ G = iEdg ⁡ G
2 1 ewlkprop ⊢ F ∈ G EdgWalks S → G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
3 simpl2 ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∧ T ∈ ℕ 0 * ∧ T ≤ S → F ∈ Word dom ⁡ iEdg ⁡ G
4 xnn0xr ⊢ T ∈ ℕ 0 * → T ∈ ℝ *
5 4 adantl ⊢ S ∈ ℕ 0 * ∧ T ∈ ℕ 0 * → T ∈ ℝ *
6 xnn0xr ⊢ S ∈ ℕ 0 * → S ∈ ℝ *
7 6 adantr ⊢ S ∈ ℕ 0 * ∧ T ∈ ℕ 0 * → S ∈ ℝ *
8 fvex ⊢ iEdg ⁡ G ⁡ F ⁡ k − 1 ∈ V
9 8 inex1 ⊢ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∈ V
10 hashxrcl ⊢ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∈ V → iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∈ ℝ *
11 9 10 mp1i ⊢ S ∈ ℕ 0 * ∧ T ∈ ℕ 0 * → iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∈ ℝ *
12 xrletr ⊢ T ∈ ℝ * ∧ S ∈ ℝ * ∧ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∈ ℝ * → T ≤ S ∧ S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
13 5 7 11 12 syl3anc ⊢ S ∈ ℕ 0 * ∧ T ∈ ℕ 0 * → T ≤ S ∧ S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
14 13 exp4b ⊢ S ∈ ℕ 0 * → T ∈ ℕ 0 * → T ≤ S → S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
15 14 adantl ⊢ G ∈ V ∧ S ∈ ℕ 0 * → T ∈ ℕ 0 * → T ≤ S → S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
16 15 imp32 ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ T ∈ ℕ 0 * ∧ T ≤ S → S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
17 16 ralimdv ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ T ∈ ℕ 0 * ∧ T ≤ S → ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → ∀ k ∈ 1 ..^ F T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
18 17 ex ⊢ G ∈ V ∧ S ∈ ℕ 0 * → T ∈ ℕ 0 * ∧ T ≤ S → ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → ∀ k ∈ 1 ..^ F T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
19 18 com23 ⊢ G ∈ V ∧ S ∈ ℕ 0 * → ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ∈ ℕ 0 * ∧ T ≤ S → ∀ k ∈ 1 ..^ F T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
20 19 a1d ⊢ G ∈ V ∧ S ∈ ℕ 0 * → F ∈ Word dom ⁡ iEdg ⁡ G → ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ∈ ℕ 0 * ∧ T ≤ S → ∀ k ∈ 1 ..^ F T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
21 20 3imp1 ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∧ T ∈ ℕ 0 * ∧ T ≤ S → ∀ k ∈ 1 ..^ F T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
22 simpl1l ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∧ T ∈ ℕ 0 * ∧ T ≤ S → G ∈ V
23 simprl ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∧ T ∈ ℕ 0 * ∧ T ≤ S → T ∈ ℕ 0 *
24 1 isewlk ⊢ G ∈ V ∧ T ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G → F ∈ G EdgWalks T ↔ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
25 22 23 3 24 syl3anc ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∧ T ∈ ℕ 0 * ∧ T ≤ S → F ∈ G EdgWalks T ↔ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F T ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k
26 3 21 25 mpbir2and ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k ∧ T ∈ ℕ 0 * ∧ T ≤ S → F ∈ G EdgWalks T
27 26 ex ⊢ G ∈ V ∧ S ∈ ℕ 0 * ∧ F ∈ Word dom ⁡ iEdg ⁡ G ∧ ∀ k ∈ 1 ..^ F S ≤ iEdg ⁡ G ⁡ F ⁡ k − 1 ∩ iEdg ⁡ G ⁡ F ⁡ k → T ∈ ℕ 0 * ∧ T ≤ S → F ∈ G EdgWalks T
28 2 27 syl ⊢ F ∈ G EdgWalks S → T ∈ ℕ 0 * ∧ T ≤ S → F ∈ G EdgWalks T
29 28 3impib ⊢ F ∈ G EdgWalks S ∧ T ∈ ℕ 0 * ∧ T ≤ S → F ∈ G EdgWalks T