---

Step * 2 1 1 1 of Lemma iseg_select


1. [T] : Type
2. u : T@i
3. v : T List@i
4. ∀l2:T List. (v ≤ l2 ⇐⇒ (||v|| ≤ ||l2||) c∧ (∀i:ℕ. v[i] = l2[i] ∈ T supposing i < ||v||))
5. l : T List@i
6. [] = ([u / v] @ l) ∈ (T List)
⊢ ((||v|| + 1) ≤ 0) c∧ (∀i:ℕ. [u / v][i] = ⊥ ∈ T supposing i < ||v|| + 1)
BY
{ ((ApFunToHypEquands `z' ||z|| ℕ (-1) THEN Reduce (-1)) THEN Auto') }

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  u  :  T@i
3.  v  :  T  List@i
4.  \mforall{}l2:T  List.  (v  \mleq{}  l2  \mLeftarrow{}{}\mRightarrow{}  (||v||  \mleq{}  ||l2||)  c\mwedge{}  (\mforall{}i:\mBbbN{}.  v[i]  =  l2[i]  supposing  i  <  ||v||))
5.  l  :  T  List@i
6.  []  =  ([u  /  v]  @  l)
\mvdash{}  ((||v||  +  1)  \mleq{}  0)  c\mwedge{}  (\mforall{}i:\mBbbN{}.  [u  /  v][i]  =  \mbot{}  supposing  i  <  ||v||  +  1)


By

---

Latex:
((ApFunToHypEquands  `z'  ||z||  \mBbbN{}  (-1)  THEN  Reduce  (-1))  THEN  Auto')

---

Home Index