Step
*
of Lemma
urefl_functionality_wrt_iff
∀[T:Type]. ∀[R,R':T ⟶ T ⟶ ℙ].
  ((∀[x,y:T].  (R[x;y] 
⇐⇒ R'[x;y])) 
⇒ (UniformlyRefl(T;x,y.R[x;y]) 
⇐⇒ UniformlyRefl(T;x,y.R'[x;y])))
BY
{ (Unfold `urefl` 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{}  (UniformlyRefl(T;x,y.R[x;y])  \mLeftarrow{}{}\mRightarrow{}  UniformlyRefl(T;x,y.R'[x;y])))
By
Latex:
(Unfold  `urefl`  0  THEN  Auto)
Home
Index