- Timestamp:
- 2015-06-09T00:07:38-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/polynomial.lisp
r818 r819 154 154 (poly-sugar p))) 155 155 156 (defun poly-extend (p &optional (m (make-monom 1 :initial-exponent 0)))156 (defun poly-extend (p &optional (m (make-monom 1))) 157 157 (make-poly-from-termlist 158 158 (termlist-extend (poly-termlist p) m)
Note:
See TracChangeset
for help on using the changeset viewer.