Step
*
of Lemma
sp_refl_cl_le_rel
∀[T:Type]. ∀[r:T ⟶ T ⟶ ℙ].  ((ro\) ≡>{T} r)
BY
{ ((Eval ``refl_cl s_part binrel_le`` 0 
THENM RepD) THENA Auto) }
1
1. [T] : Type
2. [r] : T ⟶ T ⟶ ℙ
3. x : T@i
4. y : T@i
5. (x = y ∈ T) ∨ (r x y)@i
6. ¬((y = x ∈ T) ∨ (r y x))@i
⊢ r x y
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[r:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].    ((r\msupzero{}\mbackslash{})  \mequiv{}>\{T\}  r)
By
Latex:
((Eval  ``refl\_cl  s\_part  binrel\_le``  0 
THENM  RepD)  THENA  Auto)
Home
Index