---

Step * 1 1 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)
⊢ y = hd(remove-repeats(eq;L)) ∈ T
BY
{ Assert ⌜(y ∈ remove-repeats(eq;L))⌝⋅ }

1
.....assertion..... 
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)
⊢ (y ∈ remove-repeats(eq;L))

2
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

---

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)
\mvdash{}  y  =  hd(remove-repeats(eq;L))


By

---

Latex:
Assert  \mkleeneopen{}(y  \mmember{}  remove-repeats(eq;L))\mkleeneclose{}\mcdot{}

---

Home Index