- Timestamp:
- 2015-06-20T14:59:57-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/polynomial.lisp
r2650 r2651 42 42 43 43 (defmethod r-equalp ((self poly) (other poly)) 44 (every #'r-equalp (poly-termlist self) (poly-termlist other))) 44 (and (every #'r-equalp (poly-termlist self) (poly-termlist other)) 45 (eq (poly-term-order self) (poly-term-order other)))) 45 46 46 47 (defmethod insert-item ((self poly) (item term))
Note:
See TracChangeset
for help on using the changeset viewer.