- Timestamp:
- 2015-06-17T19:18:57-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/ring.lisp
r2071 r2073 131 131 (defgeneric lcm-divides-lcm-p (object1 object2 object3 object4) 132 132 (:documentation "Returns T if LCM(OBJECT1,OBJECT2) divides LCM(OBJECT3,OBJECT4), NIL otherwise.")) 133 134 (defun lcm-equal-lcm-p (m1 m2 m3 m4) 135 "Returns T if monomial MONOM-LCM(M1,M2) equals MONOM-LCM(M3,M4), NIL otherwise."
Note:
See TracChangeset
for help on using the changeset viewer.