---

Step * 2 of Lemma iseg_same_length


1. T : Type
2. L1 : T List
3. L2 : T List
4. u : T
5. v : T List
6. L2 = (L1 @ [u / v]) ∈ (T List)
7. ||L1|| = ||L2|| ∈ ℤ
⊢ L1 = L2 ∈ (T List)
BY
{ ((HypSubst' (-2) (-1) THENM RWO "length-append" (-1) THENM Reduce (-1)) THEN Auto') }

---

Latex:

---

Latex:

1.  T  :  Type
2.  L1  :  T  List
3.  L2  :  T  List
4.  u  :  T
5.  v  :  T  List
6.  L2  =  (L1  @  [u  /  v])
7.  ||L1||  =  ||L2||
\mvdash{}  L1  =  L2


By

---

Latex:
((HypSubst'  (-2)  (-1)  THENM  RWO  "length-append"  (-1)  THENM  Reduce  (-1))  THEN  Auto')

---

Home Index