---

Step * 1 of Lemma assert-nonneg-monomial


1. m1 : ℤ-o
2. m2 : {vs:ℤ List| sorted(vs)} 
3. 0 ≤ m1
4. ↑even-int-list(m2)
⊢ ∃m':iMonomial(). ∃k:ℕ+. (mul-monomials(m';m') = mul-monomials(<m1, m2>;<k, []>) ∈ iMonomial())
BY
{ Assert ⌜∃u:{vs:ℤ List| sorted(vs)} . (m2 = merge-int-accum(u;u) ∈ (ℤ List))⌝⋅ }

1
.....assertion..... 
1. m1 : ℤ-o
2. m2 : {vs:ℤ List| sorted(vs)} 
3. 0 ≤ m1
4. ↑even-int-list(m2)
⊢ ∃u:{vs:ℤ List| sorted(vs)} . (m2 = merge-int-accum(u;u) ∈ (ℤ List))

2
1. m1 : ℤ-o
2. m2 : {vs:ℤ List| sorted(vs)} 
3. 0 ≤ m1
4. ↑even-int-list(m2)
5. ∃u:{vs:ℤ List| sorted(vs)} . (m2 = merge-int-accum(u;u) ∈ (ℤ List))
⊢ ∃m':iMonomial(). ∃k:ℕ+. (mul-monomials(m';m') = mul-monomials(<m1, m2>;<k, []>) ∈ iMonomial())

---

Latex:

---

Latex:

1.  m1  :  \mBbbZ{}\msupminus{}\msupzero{}
2.  m2  :  \{vs:\mBbbZ{}  List|  sorted(vs)\} 
3.  0  \mleq{}  m1
4.  \muparrow{}even-int-list(m2)
\mvdash{}  \mexists{}m':iMonomial().  \mexists{}k:\mBbbN{}\msupplus{}.  (mul-monomials(m';m')  =  mul-monomials(<m1,  m2><k,  []>))


By

---

Latex:
Assert  \mkleeneopen{}\mexists{}u:\{vs:\mBbbZ{}  List|  sorted(vs)\}  .  (m2  =  merge-int-accum(u;u))\mkleeneclose{}\mcdot{}

---

Home Index