Step * of Lemma equipollent_functionality_wrt_equipollent3

∀[A,B1,B2:Type].  (B2 ~ B1 ⇒ (B1 ~ A ⇐⇒ B2 ~ A))
BY
{ (Auto THEN RelRST THEN Auto) }


Latex:


Latex:
\mforall{}[A,B1,B2:Type].    (B2  \msim{}  B1  {}\mRightarrow{}  (B1  \msim{}  A  \mLeftarrow{}{}\mRightarrow{}  B2  \msim{}  A))


By


Latex:
(Auto  THEN  RelRST  THEN  Auto)




Home Index