---

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


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)
BY
{ (RWO  "-3" 0 THEN Auto) }

1
.....rewrite subgoal..... 
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||
⊢ 0 < ||insert(u2;L)||

2
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(insert(u2;L)) = last(L) ∈ (ℤ List)

---

Latex:

---

Latex:

1.  u1  :  \mBbbZ{}\msupminus{}\msupzero{}
2.  u2  :  \{vs:\mBbbZ{}  List|  sorted(vs)\} 
3.  v  :  iMonomial()  List
4.  \mforall{}L:\mBbbZ{}  List  List.  (0  <  ||L||  {}\mRightarrow{}  (last(polynomial-mon-vars(L;v))  =  last(L)))
5.  L  :  \mBbbZ{}  List  List
6.  0  <  ||L||
\mvdash{}  last(polynomial-mon-vars(insert(u2;L);v))  =  last(L)


By

---

Latex:
(RWO    "-3"  0  THEN  Auto)

---

Home Index