Step
*
of Lemma
sq_stable__sublist
∀[T:Type]. ∀l1,l2:T List.  ((∀x,y:T.  Dec(x = y ∈ T)) 
⇒ SqStable(l1 ⊆ l2))
BY
{ (Auto
   THEN Unfold `sq_stable` 0
   THEN Auto
   THEN (RWO "sublist-rec-iff-sublist" 0 THENA Auto)
   THEN (RWO "sublist-rec-iff-sublist" (-1) THENA Auto)
   THEN MoveToConcl (-1)
   THEN Try (Fold `sq_stable` 0)
   THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}l1,l2:T  List.    ((\mforall{}x,y:T.    Dec(x  =  y))  {}\mRightarrow{}  SqStable(l1  \msubseteq{}  l2))
By
Latex:
(Auto
  THEN  Unfold  `sq\_stable`  0
  THEN  Auto
  THEN  (RWO  "sublist-rec-iff-sublist"  0  THENA  Auto)
  THEN  (RWO  "sublist-rec-iff-sublist"  (-1)  THENA  Auto)
  THEN  MoveToConcl  (-1)
  THEN  Try  (Fold  `sq\_stable`  0)
  THEN  Auto)
Home
Index