---

Step * 1 of Lemma list_decomp_last


1. [T] : Type
2. u : T
3. v : T List
4. 0 < ||v|| ⇒ (∃L':T List. (v = (L' @ [last(v)]) ∈ (T List)))
5. 0 < ||v|| + 1
6. ||v|| = 0 ∈ ℤ
⊢ ∃L':T List. ([u / v] = (L' @ [last([u / v])]) ∈ (T List))
BY
{ ((FLemma `length-zero-implies-sq-nil` [-1] THENA Auto)
   THEN RWO "-1" 0
   THEN InstConcl [⌜[]⌝]⋅
   THEN Auto
   THEN Reduce 0
   THEN Auto
   THEN RepUR ``last`` 0
   THEN Auto) }

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  u  :  T
3.  v  :  T  List
4.  0  <  ||v||  {}\mRightarrow{}  (\mexists{}L':T  List.  (v  =  (L'  @  [last(v)])))
5.  0  <  ||v||  +  1
6.  ||v||  =  0
\mvdash{}  \mexists{}L':T  List.  ([u  /  v]  =  (L'  @  [last([u  /  v])]))


By

---

Latex:
((FLemma  `length-zero-implies-sq-nil`  [-1]  THENA  Auto)
  THEN  RWO  "-1"  0
  THEN  InstConcl  [\mkleeneopen{}[]\mkleeneclose{}]\mcdot{}
  THEN  Auto
  THEN  Reduce  0
  THEN  Auto
  THEN  RepUR  ``last``  0
  THEN  Auto)

---

Home Index