---

Step * of Lemma e-isect_wf

∀[A,B:EType].  (e-isect(A;B) ∈ EType)
BY
{ (Intros
   THEN Unhide
   THEN D 1
   THEN D -1
   THEN Unfold `e-isect` 0
   THEN Unfold `e-type` 0
   THEN BLemma `quotient-member-eq`
   THEN Auto) }

1
1. A : Base
2. A1 : Base
3. A = A1 ∈ pertype(λA,B. ((A ∈ Type) ∧ (B ∈ Type) ∧ A ≡ B))
4. A ∈ Type
5. A1 ∈ Type
6. A ≡ A1
7. B : Base
8. B1 : Base
9. B = B1 ∈ pertype(λA,B. ((A ∈ Type) ∧ (B ∈ Type) ∧ A ≡ B))
10. B ∈ Type
11. B1 ∈ Type
12. B ≡ B1
⊢ A ⋂ B ≡ A1 ⋂ B1

---

Latex:

---

Latex:
\mforall{}[A,B:EType].    (e-isect(A;B)  \mmember{}  EType)


By

---

Latex:
(Intros
  THEN  Unhide
  THEN  D  1
  THEN  D  -1
  THEN  Unfold  `e-isect`  0
  THEN  Unfold  `e-type`  0
  THEN  BLemma  `quotient-member-eq`
  THEN  Auto)

---

Home Index