- Timestamp:
- 2015-08-27T17:43:18-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/polynomial.lisp
r3429 r3430 312 312 (add-to (copy-instance POLY1) (change-class (copy-instance POLY2) 'poly))) 313 313 314 (defmethod r- ((minuend poly) subtrahends)314 (defmethod r- ((minuend poly) &rest subtrahends) 315 315 "Non-destructively subtract MINUEND and SUBTRAHENDS." 316 316 (subtract-from (copy-instance minuend) (reduce #'r+ subtrahends)))
Note:
See TracChangeset
for help on using the changeset viewer.