- Timestamp:
- 2016-06-10T09:55:23-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/symbolic-polynomial.lisp
r4365 r4435 50 50 (when (universal-equalp (symbolic-poly-vars self) (symbolic-poly-vars other)) 51 51 (call-next-method))) 52 53 (defmethod universal-equalp ((self symbolic-poly) (other poly)) 54 "Compare SELF, which is an instance of SYMBOLIC-POLY, to OTHER, which 55 is an instance of POLY. We simply ignore variables of SELF, and compare 56 SELF and OTHER as POLY." 57 (call-next-method)) 52 58 53 59 (defmethod universal-equalp ((self symbol) (other symbol))
Note:
See TracChangeset
for help on using the changeset viewer.