Changeset 2147 for branches/f4grobner
- Timestamp:
- 2015-06-17T21:30:42-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/monom.lisp
r2146 r2147 253 253 (with-slots (exponents2 exponents) 254 254 m2 255 (make-instance 'monom256 :dim dim257 :exponents (concatenate 'vector exponents1 exponents2)))))255 (make-instance 'monom 256 :dim dim 257 :exponents (concatenate 'vector exponents1 exponents2))))) 258 258 259 259 (defmethod contract ((m monom) k)
Note:
See TracChangeset
for help on using the changeset viewer.