---

Step * of Lemma equiv_rel_and

∀[T:Type]. ∀[E1,E2:T ⟶ T ⟶ ℙ].
  (EquivRel(T;x,y.E2[x;y]) ⇒ EquivRel(T;x,y.E1[x;y]) ⇒ EquivRel(T;x,y.E1[x;y] ∧ E2[x;y]))
BY
{ (Auto THEN All (RepUR ``equiv_rel refl sym trans``) THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[E1,E2:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
    (EquivRel(T;x,y.E2[x;y])  {}\mRightarrow{}  EquivRel(T;x,y.E1[x;y])  {}\mRightarrow{}  EquivRel(T;x,y.E1[x;y]  \mwedge{}  E2[x;y]))


By

---

Latex:
(Auto  THEN  All  (RepUR  ``equiv\_rel  refl  sym  trans``)  THEN  Auto)

---

Home Index