---

Step * of Lemma add-remove-nth

∀[T:Type]. ∀[L:T List]. ∀[n:ℕ||L||].  (let x,L' = remove-nth(n;L) in add-nth(n;x;L') ~ L)
BY
{ TACTIC:InductionOnList }

1
1. T : Type
⊢ ∀[n:ℕ||[]||]. (let x,L' = remove-nth(n;[]) in add-nth(n;x;L') ~ [])

2
1. T : Type
2. u : T
3. v : T List
4. ∀[n:ℕ||v||]. (let x,L' = remove-nth(n;v) in add-nth(n;x;L') ~ v)
⊢ ∀[n:ℕ||[u / v]||]. (let x,L' = remove-nth(n;[u / v]) in add-nth(n;x;L') ~ [u / v])

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[L:T  List].  \mforall{}[n:\mBbbN{}||L||].    (let  x,L'  =  remove-nth(n;L)  in  add-nth(n;x;L')  \msim{}  L)


By

---

Latex:
TACTIC:InductionOnList

---

Home Index