---

Step * 1 of Lemma values-for-distinct-property


1. A : Type
2. V : Type
3. eq : EqDecider(A)
4. L : (A × V) List
⊢ ||values-for-distinct(eq;L)|| = ||remove-repeats(eq;map(λp.(fst(p));L))|| ∈ ℤ
BY
{ (Unfold `values-for-distinct` 0 THEN RWO "length-map" 0 THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  V  :  Type
3.  eq  :  EqDecider(A)
4.  L  :  (A  \mtimes{}  V)  List
\mvdash{}  ||values-for-distinct(eq;L)||  =  ||remove-repeats(eq;map(\mlambda{}p.(fst(p));L))||


By

---

Latex:
(Unfold  `values-for-distinct`  0  THEN  RWO  "length-map"  0  THEN  Auto)

---

Home Index