- Timestamp:
- 2015-06-22T21:49:23-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/symbolic-polynomial.lisp
r3274 r3278 48 48 49 49 (defmethod r-equalp ((self symbolic-poly) (other symbolic-poly)) 50 (when ( equalp (symbolic-poly-vars self) (symbolic-poly-vars other))50 (when (r-equalp (symbolic-poly-vars self) (symbolic-poly-vars other)) 51 51 (call-next-method))) 52 52
Note:
See TracChangeset
for help on using the changeset viewer.