- Timestamp:
- 2015-06-19T13:36:50-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/polynomial.lisp
r2525 r2526 77 77 (defgeneric leading-coefficient (object) 78 78 (:method ((self poly)) 79 (r-coeff (leading-term self)))) 79 (r-coeff (leading-term self))) 80 (:documentation "The leading coefficient of a polynomial. It signals error for a zero polynomial.") 80 81 81 82 ;; Second coefficient 82 83 (defgeneric second-leading-coefficient (object) 83 84 (:method ((self poly)) 84 (r-coeff (second-leading-term self)))) 85 (r-coeff (second-leading-term self))) 86 (:documentation "The second leading coefficient of a polynomial. It signals error for a polynomial with at most one term.")) 85 87 86 88 ;; Testing for a zero polynomial
Note:
See TracChangeset
for help on using the changeset viewer.