Step
*
of Lemma
fseg_member
∀[T:Type]. ∀l1,l2:T List. ∀x:T.  (fseg(T;l1;l2) 
⇒ (x ∈ l1) 
⇒ (x ∈ l2))
BY
{ (Auto THEN D -2 THEN (HypSubst' -2 0 THENA Auto) THEN (RWO "member_append" 0 THENM OrRight) THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}l1,l2:T  List.  \mforall{}x:T.    (fseg(T;l1;l2)  {}\mRightarrow{}  (x  \mmember{}  l1)  {}\mRightarrow{}  (x  \mmember{}  l2))
By
Latex:
(Auto
  THEN  D  -2
  THEN  (HypSubst'  -2  0  THENA  Auto)
  THEN  (RWO  "member\_append"  0  THENM  OrRight)
  THEN  Auto)
Home
Index