- Timestamp:
- 2015-06-15T10:19:13-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner.lisp
r1776 r1777 573 573 (make-poly-from-termlist (list (poly-lt f))))) 574 574 575 #|576 577 575 (defmfun $poly_lm (f vars) 578 576 (with-ring-and-order ((vars) :polynomials (f) :value-type :polynomial) 579 577 (make-poly-from-termlist (list (make-term (poly-lm f) (funcall (ring-unit ring-and-order))))))) 580 581 |#
Note:
See TracChangeset
for help on using the changeset viewer.