---

Step * 1 1 2 of Lemma equipollent-list-as-product

.....wf..... 
1. T : Type
2. a1 : T List
3. a2 : T List
⊢ istype(<||a1||, a1> = <||a2||, a2> ∈ (k:ℕ × (T^k)))
BY
{ (EqualityIsType1 THEN Auto THEN BLemma `list-subtype-power-type` THEN Auto) }

---

Latex:

---

Latex:
.....wf..... 
1.  T  :  Type
2.  a1  :  T  List
3.  a2  :  T  List
\mvdash{}  istype(<||a1||,  a1>  =  <||a2||,  a2>)


By

---

Latex:
(EqualityIsType1  THEN  Auto  THEN  BLemma  `list-subtype-power-type`  THEN  Auto)

---

Home Index