- Timestamp:
- 2015-06-09T09:22:26-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/term.lisp
r826 r853 54 54 defaults to the unit of the RING." 55 55 (declare (fixnum nvars pos power)) 56 (let ((m (make-monom nvars)))56 (let ((m (make-monom :dimension nvars))) 57 57 (setf (monom-elt m pos) power) 58 58 (make-term m coeff)))
Note:
See TracChangeset
for help on using the changeset viewer.