---

Step * of Lemma per-quotient-squash

∀[T:Type]. ∀[E:T ⟶ T ⟶ ℙ].  x,y:T/per/E[x;y] ≡ x,y:T/per/(↓E[x;y]) supposing EquivRel(T;x,y.E[x;y])
BY
{ (TACTIC:InstLemma `quotient-squash` [] THEN NthHypSq (-1) THEN EqCD THEN Auto THEN Computation) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[E:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
    x,y:T/per/E[x;y]  \mequiv{}  x,y:T/per/(\mdownarrow{}E[x;y])  supposing  EquivRel(T;x,y.E[x;y])


By

---

Latex:
(TACTIC:InstLemma  `quotient-squash`  []  THEN  NthHypSq  (-1)  THEN  EqCD  THEN  Auto  THEN  Computation)

---

Home Index