Step
*
of Lemma
equiv_rel_squash2
∀[T:Type]. ∀[E:T ⟶ T ⟶ ℙ].  ((↓EquivRel(T;x,y.E[x;y])) 
⇒ EquivRel(T;x,y.↓E[x;y]))
BY
{ (Auto THEN All (RepUR ``equiv_rel refl sym trans``) THEN Auto THEN D 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[E:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].    ((\mdownarrow{}EquivRel(T;x,y.E[x;y]))  {}\mRightarrow{}  EquivRel(T;x,y.\mdownarrow{}E[x;y]))
By
Latex:
(Auto  THEN  All  (RepUR  ``equiv\_rel  refl  sym  trans``)  THEN  Auto  THEN  D  0  THEN  Auto)
Home
Index