---

Step * 1 1 2 1 2 1 1 1 of Lemma hd-rev-pcs-mon-vars


1. u : iMonomial()
2. v : iMonomial() List
3. ∀L:ℤ List List. (0 < ||L|| ⇒ (last(polynomial-mon-vars(L;v)) = last(L) ∈ (ℤ List)))
4. L : ℤ List List
5. 0 < ||L||
⊢ last(polynomial-mon-vars(let c,vs = u in insert(vs;L);v)) = last(L) ∈ (ℤ List)
BY
{ (DVar `u' THEN Reduce 0) }

1
1. u1 : ℤ-o
2. u2 : {vs:ℤ List| sorted(vs)} 
3. v : iMonomial() List
4. ∀L:ℤ List List. (0 < ||L|| ⇒ (last(polynomial-mon-vars(L;v)) = last(L) ∈ (ℤ List)))
5. L : ℤ List List
6. 0 < ||L||
⊢ last(polynomial-mon-vars(insert(u2;L);v)) = last(L) ∈ (ℤ List)

---

Latex:

---

Latex:

1.  u  :  iMonomial()
2.  v  :  iMonomial()  List
3.  \mforall{}L:\mBbbZ{}  List  List.  (0  <  ||L||  {}\mRightarrow{}  (last(polynomial-mon-vars(L;v))  =  last(L)))
4.  L  :  \mBbbZ{}  List  List
5.  0  <  ||L||
\mvdash{}  last(polynomial-mon-vars(let  c,vs  =  u  in  insert(vs;L);v))  =  last(L)


By

---

Latex:
(DVar  `u'  THEN  Reduce  0)

---

Home Index