---

Step * 1 1 1 of Lemma bsublist_append_diff


1. s : DSet
2. as : |s| List
3. bs : |s| List
4. ↑bsublist(s;as;bs)
5. x : |s|
6. (x #∈ as) ≤ (x #∈ bs)
⊢ (((x #∈ bs) -- (x #∈ as)) + (x #∈ as)) = (x #∈ bs) ∈ ℤ
BY
{ (((RWH (LemmaC `ndiff_add_eq_imax`) 0 THENM (RWO "imax_unfold" 0 THENA Auto)) THENM SplitOnConclITE) THEN Auto) }

---

Latex:

---

Latex:

1.  s  :  DSet
2.  as  :  |s|  List
3.  bs  :  |s|  List
4.  \muparrow{}bsublist(s;as;bs)
5.  x  :  |s|
6.  (x  \#\mmember{}  as)  \mleq{}  (x  \#\mmember{}  bs)
\mvdash{}  (((x  \#\mmember{}  bs)  --  (x  \#\mmember{}  as))  +  (x  \#\mmember{}  as))  =  (x  \#\mmember{}  bs)


By

---

Latex:
(((RWH  (LemmaC  `ndiff\_add\_eq\_imax`)  0  THENM  (RWO  "imax\_unfold"  0  THENA  Auto))  THENM  SplitOnConclITE)
  THEN  Auto
  )

---

Home Index