Step 
*
 of Lemma 
s-insert_wf
∀[T:Type]. ∀[x:T]. ∀[L:T List].  (s-insert(x;L) ∈ T List) supposing T ⊆r ℤ
BY
 
{ (InductionOnList THEN Unfold `s-insert` 0 THEN Reduce 0 THEN Try (Fold `s-insert` 0) THEN Auto) }
 
Latex: 
Latex:
\mforall{}[T:Type].  \mforall{}[x:T].  \mforall{}[L:T  List].    (s-insert(x;L)  \mmember{}  T  List)  supposing  T  \msubseteq{}r  \mBbbZ{}
 By 
Latex:
(InductionOnList  THEN  Unfold  `s-insert`  0  THEN  Reduce  0  THEN  Try  (Fold  `s-insert`  0)  THEN  Auto)
Home
Index