---

Step * 6 of Lemma ring_term_polynomial


1. r : CRng
2. num : int_term()
3. ipolynomial-term(int_term_to_ipoly(num)) ≡ num
⊢ ipolynomial-term(minus-poly(int_term_to_ipoly(num))) ≡ "-"num
BY
{ (xxx(InstLemma `minus-poly-ringeq` [⌜r⌝]⋅ THENA Auto)xxx THEN (RWW "-1 -2" 0 THENM RelRST) THEN Auto) }

---

Latex:

---

Latex:

1.  r  :  CRng
2.  num  :  int\_term()
3.  ipolynomial-term(int\_term\_to\_ipoly(num))  \mequiv{}  num
\mvdash{}  ipolynomial-term(minus-poly(int\_term\_to\_ipoly(num)))  \mequiv{}  "-"num


By

---

Latex:
(xxx(InstLemma  `minus-poly-ringeq`  [\mkleeneopen{}r\mkleeneclose{}]\mcdot{}  THENA  Auto)xxx
  THEN  (RWW  "-1  -2"  0  THENM  RelRST)
  THEN  Auto)

---

Home Index