---

Step * 2 1 of Lemma split_tail_rel


1. A : Type
2. f : A ⟶ 𝔹
3. u : A
4. v : A List
5. p1 : A List
6. p2 : A List
7. ↑f[u]
⊢ ((p1 @ p2) = v ∈ (A List))
⇒ (((fst(case p1 of [] => <[], [u / p2]> | x::y => <[u / p1], p2> esac)) @ (snd(case p1 of [] => <[], [u / p2]> | x::y \000C=> <[u / p1], p2> esac))) = [u / v] ∈ (A List))
BY
{ (ListInd (-3) THEN Reduce 0 THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  f  :  A  {}\mrightarrow{}  \mBbbB{}
3.  u  :  A
4.  v  :  A  List
5.  p1  :  A  List
6.  p2  :  A  List
7.  \muparrow{}f[u]
\mvdash{}  ((p1  @  p2)  =  v)
{}\mRightarrow{}  (((fst(case  p1  of  []  =>  <[],  [u  /  p2]>  |  x::y  =>  <[u  /  p1],  p2>  esac))  @  (snd(case  p1  of  []  =>  <[\000C],  [u  /  p2]>  |  x::y  =>  <[u  /  p1],  p2>  esac)))  =  [u  /  v])


By

---

Latex:
(ListInd  (-3)  THEN  Reduce  0  THEN  Auto)

---

Home Index