- Timestamp:
- 2016-06-04T21:17:14-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/monom.lisp
r4284 r4285 565 565 copy)) 566 566 567 #| 567 568 (defmethod multiply-by ((self term) (other number)) 568 569 (reinitialize-instance self :coeff (multiply-by (term-coeff self) other))) … … 570 571 (defmethod divide-by ((self term) (other number)) 571 572 (reinitialize-instance self :coeff (divide-by (term-coeff self) other))) 573 |# 572 574 573 575 (defmethod unary-inverse :after ((self term))
Note:
See TracChangeset
for help on using the changeset viewer.