Changeset 3584
- Timestamp:
- 2015-09-05T17:05:13-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/monom.lisp
r3583 r3584 414 414 (:method ((p monom) (q monom) &optional (start 0) (end (monom-dimension p))) 415 415 (declare (type fixnum start end)) 416 (let ((d1 ( monom-total-degree p start end))417 (d2 ( monom-total-degree q start end)))416 (let ((d1 (total-degree p start end)) 417 (d2 (total-degree q start end))) 418 418 (declare (type fixnum d1 d2)) 419 419 (cond
Note:
See TracChangeset
for help on using the changeset viewer.