Step
*
1
2
of Lemma
firstn_last
1. T : Type
2. u : T
3. v : T List
4. v = (firstn(||v|| - 1;v) @ [last(v)]) ∈ (T List) supposing ¬↑null(v)
5. ¬False
6. ((||v|| + 1) - 1) ≤ 0
⊢ [u / v] = [last([u / v])] ∈ (T List)
BY
{ TACTIC:(Subst ⌜v = [] ∈ (T List)⌝ 0⋅ THEN Reduce 0 THEN Auto) }
1
.....equality..... 
1. T : Type
2. u : T
3. v : T List
4. v = (firstn(||v|| - 1;v) @ [last(v)]) ∈ (T List) supposing ¬↑null(v)
5. ¬False
6. ((||v|| + 1) - 1) ≤ 0
⊢ v = [] ∈ (T List)
Latex:
Latex:
1.  T  :  Type
2.  u  :  T
3.  v  :  T  List
4.  v  =  (firstn(||v||  -  1;v)  @  [last(v)])  supposing  \mneg{}\muparrow{}null(v)
5.  \mneg{}False
6.  ((||v||  +  1)  -  1)  \mleq{}  0
\mvdash{}  [u  /  v]  =  [last([u  /  v])]
By
Latex:
TACTIC:(Subst  \mkleeneopen{}v  =  []\mkleeneclose{}  0\mcdot{}  THEN  Reduce  0  THEN  Auto)
Home
Index