---

Step * 2 of Lemma product-unit-disjoint


1. T : Type
2. S : Type
3. x : T × S ⋂ Unit
4. ispair(x) = tt
⊢ ispair(x) = ff
BY
{ (GenConcl ⌜x = p ∈ Unit⌝⋅ THEN Auto THEN D (-2) THEN Reduce 0 THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  S  :  Type
3.  x  :  T  \mtimes{}  S  \mcap{}  Unit
4.  ispair(x)  =  tt
\mvdash{}  ispair(x)  =  ff


By

---

Latex:
(GenConcl  \mkleeneopen{}x  =  p\mkleeneclose{}\mcdot{}  THEN  Auto  THEN  D  (-2)  THEN  Reduce  0  THEN  Auto)

---

Home Index