Step
*
of Lemma
minus-poly_wf
∀[p:iPolynomial()]. (minus-poly(p) ∈ iPolynomial())
BY
{ ((Auto THEN D 1) THEN Unfold `minus-poly` 0 THEN MemTypeCD THEN Auto) }
1
1. p : iMonomial() List
2. ∀i:ℕ||p||. ∀j:ℕi.  imonomial-less(p[j];p[i])
3. i : ℕ||map(λm.minus-monomial(m);p)||
4. j : ℕi
⊢ imonomial-less(map(λm.minus-monomial(m);p)[j];map(λm.minus-monomial(m);p)[i])
Latex:
Latex:
\mforall{}[p:iPolynomial()].  (minus-poly(p)  \mmember{}  iPolynomial())
By
Latex:
((Auto  THEN  D  1)  THEN  Unfold  `minus-poly`  0  THEN  MemTypeCD  THEN  Auto)
Home
Index