Step
*
of Lemma
sq_stable__fs-in-subtype
∀[K:RngSig]. ∀[S,T:Type].  ∀[f:formal-sum(K;S)]. SqStable(fs-in-subtype(K;S;T;f)) supposing strong-subtype(T;S)
BY
{ (Auto
   THEN (RWO "strong-subtype-iff-respects-equality" 4 THENA Auto)
   THEN InstLemma `equal-wf` [⌜S⌝;⌜S⌝;⌜T⌝]⋅
   THEN Auto
   THEN RepUR ``fs-in-subtype fs-predicate`` 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[K:RngSig].  \mforall{}[S,T:Type].
    \mforall{}[f:formal-sum(K;S)].  SqStable(fs-in-subtype(K;S;T;f))  supposing  strong-subtype(T;S)
By
Latex:
(Auto
  THEN  (RWO  "strong-subtype-iff-respects-equality"  4  THENA  Auto)
  THEN  InstLemma  `equal-wf`  [\mkleeneopen{}S\mkleeneclose{};\mkleeneopen{}S\mkleeneclose{};\mkleeneopen{}T\mkleeneclose{}]\mcdot{}
  THEN  Auto
  THEN  RepUR  ``fs-in-subtype  fs-predicate``  0
  THEN  Auto)
Home
Index