- Timestamp:
- 2015-06-06T23:00:15-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner.lisp
r577 r578 164 164 165 165 (defun parse-poly-list (expr vars) 166 "Parse a Maxima representation of a list of polynomials." 166 167 (case (caar expr) 167 168 (mlist (mapcar #'(lambda (p) (parse-poly p vars)) (cdr expr))) … … 170 171 171 172 (defun parse-poly-list-list (poly-list-list vars) 173 "Parse a Maxima representation of a list of lists of polynomials." 172 174 (mapcar #'(lambda (g) (parse-poly-list g vars)) (coerce-maxima-list poly-list-list))) 173 175
Note:
See TracChangeset
for help on using the changeset viewer.