- Timestamp:
- 2015-06-14T21:52:28-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner.lisp
r1706 r1707 239 239 (defun maxima->poly-list-of-lists (poly-list-of-lists vars 240 240 &optional 241 (ring-and-order (find-ring-and-order-by-name)) 242 &aux 243 (ring (ro-ring ring-and-order))) 241 (ring-and-order (find-ring-and-order-by-name))) 244 242 "Parse a Maxima representation of a list of lists of polynomials." 245 (mapcar #'(lambda (g) (maxima->poly-list g vars ring 243 (mapcar #'(lambda (g) (maxima->poly-list g vars ring-and-order)) 246 244 (coerce-maxima-list poly-list-of-lists))) 247 245
Note:
See TracChangeset
for help on using the changeset viewer.