Step
*
of Lemma
pos_length
∀[A:Type]. ∀[l:A List].  ||l|| ≥ 1  supposing ¬(l = [] ∈ (A List))
BY
{ ((RepeatMFor 2 (D 0) THENM D 2) THENA Auto) }
1
1. A : Type
⊢ ||[]|| ≥ 1  supposing ¬([] = [] ∈ (A List))
2
1. A : Type
2. u : A
3. v : A List
⊢ ||[u / v]|| ≥ 1  supposing ¬([u / v] = [] ∈ (A List))
Latex:
Latex:
\mforall{}[A:Type].  \mforall{}[l:A  List].    ||l||  \mgeq{}  1    supposing  \mneg{}(l  =  [])
By
Latex:
((RepeatMFor  2  (D  0)  THENM  D  2)  THENA  Auto)
Home
Index