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