Step
*
of Lemma
equiv_rel_squash
∀[T:Type]. ∀[E:T ⟶ T ⟶ ℙ].  (EquivRel(T;x,y.E[x;y]) 
⇒ EquivRel(T;x,y.↓E[x;y]))
BY
{ (Auto THEN BLemma `equiv_rel_squash2` THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[E:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].    (EquivRel(T;x,y.E[x;y])  {}\mRightarrow{}  EquivRel(T;x,y.\mdownarrow{}E[x;y]))
By
Latex:
(Auto  THEN  BLemma  `equiv\_rel\_squash2`  THEN  Auto)
Home
Index