- Timestamp:
- 2015-06-17T19:29:42-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/monom.lisp
r2080 r2081 230 230 (every #'= exponents1 exponents2)))) 231 231 232 (defmethod lcm ((m1 monom) (m2 monom))232 (defmethod ring-lcm ((m1 monom) (m2 monom)) 233 233 "Returns least common multiple of monomials M1 and M2." 234 234 (let* ((exponents (copy-seq exponents1))
Note:
See TracChangeset
for help on using the changeset viewer.