Changeset 1788
- Timestamp:
- 2015-06-15T11:32:40-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner.lisp
r1787 r1788 409 409 (poly->maxima 410 410 ,value-type 411 ( let*((,ring-and-order-var ,(find-ring-and-order-by-name))412 411 (symbol-macrolet ((,ring-and-order-var ,(find-ring-and-order-by-name)) 412 (,ring-var (ro-ring ring-and-order))) 413 413 (let ,(let ((args nil)) 414 414 (dolist (p polynomials args)
Note:
See TracChangeset
for help on using the changeset viewer.