- Timestamp:
- 2015-06-22T12:12:12-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/term.lisp
r3158 r3159 77 77 ;; happen when OLD is an instance of TERM, in which case the 78 78 ;; value of the coefficient should be preserved. 79 (apply #'call-next-method (list* old new :coeff 1 nitargs))) 79 (setf initargs (list* :coeff 1 initargs)) 80 (call-next-method)) 80 81 81 82 #|
Note:
See TracChangeset
for help on using the changeset viewer.