Changeset 1852
- Timestamp:
- 2015-06-15T14:09:28-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner-0.lisp
r1670 r1852 519 519 (defmfun $poly_lm (f vars) 520 520 (with-parsed-polynomials ((vars) :polynomials (f) :value-type :polynomial) 521 (make-poly-from-termlist (list (make-term (poly-lm f)(funcall (ring-unit +maxima-ring+)))))))522 521 (make-poly-from-termlist (list (make-term :monom (poly-lm f) :coeff (funcall (ring-unit +maxima-ring+))))))) 522
Note:
See TracChangeset
for help on using the changeset viewer.