---

Step * 1 1 2 of Lemma remove-repeats-length-one


1. T : Type
2. eq : EqDecider(T)
3. L : T List
4. ||remove-repeats(eq;L)|| = 1 ∈ ℤ
5. set-equal(T;remove-repeats(eq;L);L)
6. (hd(remove-repeats(eq;L)) ∈ L)
7. y : T
8. (y ∈ L)
9. (y ∈ remove-repeats(eq;L))
⊢ y = hd(remove-repeats(eq;L)) ∈ T
BY
{ (RWO "length-one-iff" 4 THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  L  :  T  List
4.  ||remove-repeats(eq;L)||  =  1
5.  set-equal(T;remove-repeats(eq;L);L)
6.  (hd(remove-repeats(eq;L))  \mmember{}  L)
7.  y  :  T
8.  (y  \mmember{}  L)
9.  (y  \mmember{}  remove-repeats(eq;L))
\mvdash{}  y  =  hd(remove-repeats(eq;L))


By

---

Latex:
(RWO  "length-one-iff"  4  THEN  Auto)

---

Home Index