Step
*
of Lemma
sqle-mono-implies-equal
∀[T:Type]. ∀[x,y:Base].  (x = y ∈ T) supposing ((x ∈ T) and (x ≤ y)) supposing mono(T)
BY
{ (Auto THEN Unfold `mono` 2 THEN InstHyp [⌜x⌝;⌜y⌝] 2⋅ THEN Auto THEN D 0 With ⌜x⌝  THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[x,y:Base].    (x  =  y)  supposing  ((x  \mmember{}  T)  and  (x  \mleq{}  y))  supposing  mono(T)
By
Latex:
(Auto  THEN  Unfold  `mono`  2  THEN  InstHyp  [\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{}]  2\mcdot{}  THEN  Auto  THEN  D  0  With  \mkleeneopen{}x\mkleeneclose{}    THEN  Auto)
Home
Index