---

Step * 2 1 2 of Lemma general-append-cancellation


1. T : Type
2. u : T
3. v : T List
4. ∀[bs,cs,ds:T List].
     ({(v = bs ∈ (T List)) ∧ (cs = ds ∈ (T List))}) supposing 
        (((||v|| = ||bs|| ∈ ℤ) ∨ (||cs|| = ||ds|| ∈ ℤ)) and 
        ((v @ cs) = (bs @ ds) ∈ (T List)))
5. cs : T List
6. ds : T List
7. [u / (v @ cs)] = ds ∈ (T List)
8. ||cs|| = ||ds|| ∈ ℤ
⊢ False
BY
{ ((((RevHypSubst (-2) (-1)) THENM (Reduce (-1))) THENM (RWO "length_append" (-1))) THEN Auto') }

---

Latex:

---

Latex:

1.  T  :  Type
2.  u  :  T
3.  v  :  T  List
4.  \mforall{}[bs,cs,ds:T  List].
          (\{(v  =  bs)  \mwedge{}  (cs  =  ds)\})  supposing 
                (((||v||  =  ||bs||)  \mvee{}  (||cs||  =  ||ds||))  and 
                ((v  @  cs)  =  (bs  @  ds)))
5.  cs  :  T  List
6.  ds  :  T  List
7.  [u  /  (v  @  cs)]  =  ds
8.  ||cs||  =  ||ds||
\mvdash{}  False


By

---

Latex:
((((RevHypSubst  (-2)  (-1))  THENM  (Reduce  (-1)))  THENM  (RWO  "length\_append"  (-1)))  THEN  Auto')

---

Home Index