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

Theorem wlkdlem4 26938
Description: Lemma 4 for wlkd 26939. (Contributed by Alexander van der Vekens, 1-Feb-2018.) (Revised by AV, 23-Jan-2021.)
Hypotheses
Ref Expression
wlkd.p (𝜑𝑃 ∈ Word V)
wlkd.f (𝜑𝐹 ∈ Word V)
wlkd.l (𝜑 → (♯‘𝑃) = ((♯‘𝐹) + 1))
wlkd.e (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹)){(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)))
wlkd.n (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹))(𝑃𝑘) ≠ (𝑃‘(𝑘 + 1)))
Assertion
Ref Expression
wlkdlem4 (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))))
Distinct variable groups:   𝑘,𝐹   𝑃,𝑘   𝑘,𝐼   𝜑,𝑘

Proof of Theorem wlkdlem4
StepHypRef Expression
1 wlkd.e . 2 (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹)){(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)))
2 wlkd.n . 2 (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹))(𝑃𝑘) ≠ (𝑃‘(𝑘 + 1)))
3 r19.26 3245 . . 3 (∀𝑘 ∈ (0..^(♯‘𝐹))({(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)) ∧ (𝑃𝑘) ≠ (𝑃‘(𝑘 + 1))) ↔ (∀𝑘 ∈ (0..^(♯‘𝐹)){(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)) ∧ ∀𝑘 ∈ (0..^(♯‘𝐹))(𝑃𝑘) ≠ (𝑃‘(𝑘 + 1))))
4 df-ne 2972 . . . . . 6 ((𝑃𝑘) ≠ (𝑃‘(𝑘 + 1)) ↔ ¬ (𝑃𝑘) = (𝑃‘(𝑘 + 1)))
5 ifpfal 1098 . . . . . 6 (¬ (𝑃𝑘) = (𝑃‘(𝑘 + 1)) → (if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))) ↔ {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))))
64, 5sylbi 209 . . . . 5 ((𝑃𝑘) ≠ (𝑃‘(𝑘 + 1)) → (if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))) ↔ {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))))
76biimparc 472 . . . 4 (({(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)) ∧ (𝑃𝑘) ≠ (𝑃‘(𝑘 + 1))) → if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))))
87ralimi 3133 . . 3 (∀𝑘 ∈ (0..^(♯‘𝐹))({(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)) ∧ (𝑃𝑘) ≠ (𝑃‘(𝑘 + 1))) → ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))))
93, 8sylbir 227 . 2 ((∀𝑘 ∈ (0..^(♯‘𝐹)){(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘)) ∧ ∀𝑘 ∈ (0..^(♯‘𝐹))(𝑃𝑘) ≠ (𝑃‘(𝑘 + 1))) → ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))))
101, 2, 9syl2anc 580 1 (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹))if-((𝑃𝑘) = (𝑃‘(𝑘 + 1)), (𝐼‘(𝐹𝑘)) = {(𝑃𝑘)}, {(𝑃𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹𝑘))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 198  wa 385  if-wif 1086   = wceq 1653  wcel 2157  wne 2971  wral 3089  Vcvv 3385  wss 3769  {csn 4368  {cpr 4370  cfv 6101  (class class class)co 6878  0cc0 10224  1c1 10225   + caddc 10227  ..^cfzo 12720  chash 13370  Word cword 13534
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1891  ax-4 1905
This theorem depends on definitions:  df-bi 199  df-an 386  df-or 875  df-ifp 1087  df-ne 2972  df-ral 3094
This theorem is referenced by:  wlkd  26939
  Copyright terms: Public domain W3C validator