Step
*
of Lemma
iseg_implies_member
∀[T:Type]. ∀l1,l2:T List.  (l1 ≤ l2 
⇒ {∀x:T. ((x ∈ l1) 
⇒ (x ∈ l2))})
BY
{ (RepeatFor 3 (Intro) THEN Unfold `guard` 0 THEN (RWW "iseg_select" 0 THENM Unfold `l_member` 0) THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}l1,l2:T  List.    (l1  \mleq{}  l2  {}\mRightarrow{}  \{\mforall{}x:T.  ((x  \mmember{}  l1)  {}\mRightarrow{}  (x  \mmember{}  l2))\})
By
Latex:
(RepeatFor  3  (Intro)
  THEN  Unfold  `guard`  0
  THEN  (RWW  "iseg\_select"  0  THENM  Unfold  `l\_member`  0)
  THEN  Auto)
Home
Index