Changeset 2847 for branches/f4grobner
- Timestamp:
- 2015-06-21T10:44:08-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/monom.lisp
r2837 r2847 99 99 :element-type 'exponent))))))))) 100 100 101 (defun monom-clone (m)101 (defun r-clone ((m monom)) 102 102 (make-instance 'monom 103 103 :dimension (monom-dimension m) … … 225 225 (monom-equalp m1 m2)) 226 226 227 (defmethod r-clone ((self monom))228 (monom-clone self))229 230 227 (defmethod r-lcm ((m1 monom) (m2 monom)) 231 228 "Returns least common multiple of monomials M1 and M2."
Note:
See TracChangeset
for help on using the changeset viewer.