Changeset 3524
- Timestamp:
- 2015-09-05T15:09:14-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/polynomial.lisp
r3523 r3524 145 145 (defgeneric leading-coefficient (object) 146 146 (:method ((self poly)) 147 ( scalar-coeff(leading-term self)))147 (car (leading-term self))) 148 148 (:documentation "The leading coefficient of a polynomial. It signals error for a zero polynomial.")) 149 149 … … 151 151 (defgeneric second-leading-coefficient (object) 152 152 (:method ((self poly)) 153 ( scalar-coeff(second-leading-term self)))153 (car (second-leading-term self))) 154 154 (:documentation "The second leading coefficient of a polynomial. It 155 155 signals error for a polynomial with at most one term."))
Note:
See TracChangeset
for help on using the changeset viewer.