---

Step * of Lemma iseg_select

∀[T:Type]. ∀l1,l2:T List.  (l1 ≤ l2 ⇐⇒ (||l1|| ≤ ||l2||) c∧ (∀i:ℕ. l1[i] = l2[i] ∈ T supposing i < ||l1||))
BY
{ (((D 0 THENM D 0) THENA Auto) THEN ListInd (-1)) }

1
1. [T] : Type
⊢ ∀l2:T List. ([] ≤ l2 ⇐⇒ (||[]|| ≤ ||l2||) c∧ (∀i:ℕ. [][i] = l2[i] ∈ T supposing i < ||[]||))

2
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||))
⊢ ∀l2:T List. ([u / v] ≤ l2 ⇐⇒ (||[u / v]|| ≤ ||l2||) c∧ (∀i:ℕ. [u / v][i] = l2[i] ∈ T supposing i < ||[u / v]||))

---

Latex:

---

Latex:
\mforall{}[T:Type]
    \mforall{}l1,l2:T  List.    (l1  \mleq{}  l2  \mLeftarrow{}{}\mRightarrow{}  (||l1||  \mleq{}  ||l2||)  c\mwedge{}  (\mforall{}i:\mBbbN{}.  l1[i]  =  l2[i]  supposing  i  <  ||l1||))


By

---

Latex:
(((D  0  THENM  D  0)  THENA  Auto)  THEN  ListInd  (-1))

---

Home Index