---

Step * 1 1 1 1 1 1 2 1 of Lemma streamless-implies-not-not-enum

.....equality..... 
1. T : Type
2. streamless(T)
3. ∀x,y:T.  Dec(x = y ∈ T)
4. s : T List
5. ∀t:T. ((¬no_repeats(T;s @ [t])) ∨ (¬¬(∃L:T List. ∀x:T. (x ∈ L))))
6. no_repeats(T;s)
7. ¬(∃L:T List. ∀x:T. (x ∈ L))
8. x : T
9. ¬(x ∈ s)
10. i : ℕ
11. ¬i < ||s||
12. j : ℕ
13. i < ||s @ [x]||
14. j < ||s @ [x]||
15. ¬(i = j ∈ ℕ)
16. j < ||s||
⊢ i - ||s|| ~ 0
BY
{ xxx((RWO "length-append" (-4) THEN Reduce (-4)) THEN Auto')xxx }

---

Latex:

---

Latex:
.....equality..... 
1.  T  :  Type
2.  streamless(T)
3.  \mforall{}x,y:T.    Dec(x  =  y)
4.  s  :  T  List
5.  \mforall{}t:T.  ((\mneg{}no\_repeats(T;s  @  [t]))  \mvee{}  (\mneg{}\mneg{}(\mexists{}L:T  List.  \mforall{}x:T.  (x  \mmember{}  L))))
6.  no\_repeats(T;s)
7.  \mneg{}(\mexists{}L:T  List.  \mforall{}x:T.  (x  \mmember{}  L))
8.  x  :  T
9.  \mneg{}(x  \mmember{}  s)
10.  i  :  \mBbbN{}
11.  \mneg{}i  <  ||s||
12.  j  :  \mBbbN{}
13.  i  <  ||s  @  [x]||
14.  j  <  ||s  @  [x]||
15.  \mneg{}(i  =  j)
16.  j  <  ||s||
\mvdash{}  i  -  ||s||  \msim{}  0


By

---

Latex:
xxx((RWO  "length-append"  (-4)  THEN  Reduce  (-4))  THEN  Auto')xxx

---

Home Index