Changeset 1782 for branches/f4grobner/mx-grobner.lisp
- Timestamp:
- 2015-06-15T11:18:37-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner.lisp
r1781 r1782 405 405 (poly->maxima 406 406 ,value-type 407 (let ((,ring-and-order-var ,(find-ring-and-order-by-name))) 407 (let* ((,ring-and-order-var ,(find-ring-and-order-by-name)) 408 (,ring (ro ring-and-order))) 408 409 (let ,(let ((args nil)) 409 410 (dolist (p polynomials args)
Note:
See TracChangeset
for help on using the changeset viewer.