---

Step * of Lemma s_part_functionality_wrt_breqv

∀[T:Type]. ∀[R,R':T ⟶ T ⟶ ℙ].  ((R <≡>{T} R') ⇒ ((R\) <≡>{T} (R'\)))
BY
{ ((Eval ``s_part binrel_eqv`` 0 
THENM RepD) THENA Auto) }

1
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [R'] : T ⟶ T ⟶ ℙ
4. ∀x,y:T.  (R x y ⇐⇒ R' x y)@i
5. x : T@i
6. y : T@i
⊢ (R x y) ∧ (¬(R y x)) ⇐⇒ (R' x y) ∧ (¬(R' y x))

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[R,R':T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].    ((R  <\mequiv{}>\{T\}  R')  {}\mRightarrow{}  ((R\mbackslash{})  <\mequiv{}>\{T\}  (R'\mbackslash{})))


By

---

Latex:
((Eval  ``s\_part  binrel\_eqv``  0 
THENM  RepD)  THENA  Auto)

---

Home Index