Step * of Lemma assert-nonneg-monomial

m:iMonomial(). ((↑nonneg-monomial(m))  (∃m':iMonomial(). ∃k:ℕ+(mul-monomials(m';m') mul-monomials(m;<k, []>) ∈ iM\000Conomial())))
BY
(Auto THEN THEN RepUR ``nonneg-monomial`` -1 THEN (RW assert_pushdownC (-1) THENA Auto) THEN -1) }

1
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())


Latex:


Latex:
\mforall{}m:iMonomial()
    ((\muparrow{}nonneg-monomial(m))  {}\mRightarrow{}  (\mexists{}m':iMonomial().  \mexists{}k:\mBbbN{}\msupplus{}.  (mul-monomials(m';m')  =  mul-monomials(m;<k,  []>\000C))))


By


Latex:
(Auto
  THEN  D  1
  THEN  RepUR  ``nonneg-monomial``  -1
  THEN  (RW  assert\_pushdownC  (-1)  THENA  Auto)
  THEN  D  -1)




Home Index