---

Step * 2 1 of Lemma mul-ipoly-equiv


1. u : iMonomial()
2. v : iMonomial() List
3. q : iMonomial() List
4. q = [] ∈ (iMonomial() List)
⊢ ipolynomial-term([]) ≡ ipolynomial-term([u / v]) (*) ipolynomial-term(q)
BY
{ ((DVar `q' THEN Auto)
   THEN RepUR ``ipolynomial-term`` 0
   THEN (D 0 THEN Auto)
   THEN RepUR ``int_term_value`` 0
   THEN Fold `int_term_value` 0
   THEN Auto) }

---

Latex:

---

Latex:

1.  u  :  iMonomial()
2.  v  :  iMonomial()  List
3.  q  :  iMonomial()  List
4.  q  =  []
\mvdash{}  ipolynomial-term([])  \mequiv{}  ipolynomial-term([u  /  v])  (*)  ipolynomial-term(q)


By

---

Latex:
((DVar  `q'  THEN  Auto)
  THEN  RepUR  ``ipolynomial-term``  0
  THEN  (D  0  THEN  Auto)
  THEN  RepUR  ``int\_term\_value``  0
  THEN  Fold  `int\_term\_value`  0
  THEN  Auto)

---

Home Index