- Timestamp:
- 2015-06-15T09:48:22-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner.lisp
r1765 r1766 443 443 (multiple-value-bind (quot rem c division-count) 444 444 (poly-pseudo-divide ring-and-order f fl) 445 `((mquote) 446 ((mlist) 447 ,(poly->maxima :poly-list quot vars) 448 ,(poly->maxima :polynomial rem vars) 449 ,c 450 ,division-count))))) 445 `((mlist) 446 ,(poly->maxima :poly-list quot vars) 447 ,(poly->maxima :polynomial rem vars) 448 ,c 449 ,division-count)))) 451 450 452 451 #|
Note:
See TracChangeset
for help on using the changeset viewer.