Step
*
of Lemma
refl_functionality_wrt_iff
∀[T:Type]. ∀[R,R':T ⟶ T ⟶ ℙ].  ((∀x,y:T.  (R[x;y] 
⇐⇒ R'[x;y])) 
⇒ (Refl(T;x,y.R[x;y]) 
⇐⇒ Refl(T;x,y.R'[x;y])))
BY
{ (Unfold `refl` 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[R,R':T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
    ((\mforall{}x,y:T.    (R[x;y]  \mLeftarrow{}{}\mRightarrow{}  R'[x;y]))  {}\mRightarrow{}  (Refl(T;x,y.R[x;y])  \mLeftarrow{}{}\mRightarrow{}  Refl(T;x,y.R'[x;y])))
By
Latex:
(Unfold  `refl`  0  THEN  Auto)
Home
Index