---

Step * 2 2 of Lemma deq-member-firstn


1. A : Type
2. eq : EqDecider(A)
3. L : A List
4. n : ℕ+
5. n - 1 < ||L||
6. x : A
7. (x ∈ firstn(n - 1;L)) ∨ (x = L[n - 1] ∈ A)
⊢ (x ∈ firstn(n - 1;L) @ [L[n - 1]])
BY
{ ((RWW "member_append member_singleton" 0 THEN Auto) THEN ParallelLast) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  eq  :  EqDecider(A)
3.  L  :  A  List
4.  n  :  \mBbbN{}\msupplus{}
5.  n  -  1  <  ||L||
6.  x  :  A
7.  (x  \mmember{}  firstn(n  -  1;L))  \mvee{}  (x  =  L[n  -  1])
\mvdash{}  (x  \mmember{}  firstn(n  -  1;L)  @  [L[n  -  1]])


By

---

Latex:
((RWW  "member\_append  member\_singleton"  0  THEN  Auto)  THEN  ParallelLast)

---

Home Index