Step
*
of Lemma
iseg-subtype
∀[A,B:Type].  ∀xs,ys:A List.  {xs ≤ ys 
⇒ xs ≤ ys} supposing strong-subtype(A;B)
BY
{ (Unfold `guard` 0 THEN Auto THEN Try ((D (-1) THEN Complete (Auto)))) }
1
1. [A] : Type
2. [B] : Type
3. xs : A List
4. ys : A List
5. strong-subtype(A;B)
6. xs ≤ ys
⊢ xs ≤ ys
Latex:
Latex:
\mforall{}[A,B:Type].    \mforall{}xs,ys:A  List.    \{xs  \mleq{}  ys  {}\mRightarrow{}  xs  \mleq{}  ys\}  supposing  strong-subtype(A;B)
By
Latex:
(Unfold  `guard`  0  THEN  Auto  THEN  Try  ((D  (-1)  THEN  Complete  (Auto))))
Home
Index