---

Step * 2 1 2 1 1 of Lemma decidable-last-rel

.....assertion..... 
1. T : Type
2. P : (T List) ⟶ T ⟶ ℙ
3. ∀L:T List. ∀x:T.  Dec(P[L;x])
4. L : T List
5. ¬↑null(L)
6. L' : T List
7. L = (L' @ [last(L)]) ∈ (T List)
8. L1 : T List
9. x : T
10. L = (L1 @ [x]) ∈ (T List)
11. P[L1;x]
⊢ L' = firstn(||L'||;L) ∈ (T List)
BY
{ xxx((((HypSubst (-5) 0) THEN Auto THEN RWO "firstn_append" 0) THENA Auto') THEN RWO "firstn_length" 0 THEN Auto)xxx }

---

Latex:

---

Latex:
.....assertion..... 
1.  T  :  Type
2.  P  :  (T  List)  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  \mforall{}L:T  List.  \mforall{}x:T.    Dec(P[L;x])
4.  L  :  T  List
5.  \mneg{}\muparrow{}null(L)
6.  L'  :  T  List
7.  L  =  (L'  @  [last(L)])
8.  L1  :  T  List
9.  x  :  T
10.  L  =  (L1  @  [x])
11.  P[L1;x]
\mvdash{}  L'  =  firstn(||L'||;L)


By

---

Latex:
xxx((((HypSubst  (-5)  0)  THEN  Auto  THEN  RWO  "firstn\_append"  0)  THENA  Auto')
        THEN  RWO  "firstn\_length"  0
        THEN  Auto)xxx

---

Home Index