Changeset 701 for branches/f4grobner
- Timestamp:
- 2015-06-08T18:08:11-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/termlist.lisp
r700 r701 200 200 201 201 (defun termlist-unit (ring dimension) 202 (declare (fixnum dimension) )202 (declare (fixnum dimension) (ring ring)) 203 203 (list (make-term (make-monom dimension :initial-element 0) 204 204 (funcall (ring-unit ring)))))
Note:
See TracChangeset
for help on using the changeset viewer.