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