Changeset 3393
- Timestamp:
- 2015-08-27T08:55:24-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/symbolic-polynomial.lisp
r3392 r3393 93 93 (if (endp (cddr expr)) ;unary 94 94 (p-eval (cdr expr)) 95 (reduce #' (lambda (p q) (r* p q))(p-eval-list (cdr expr)))))95 (reduce #'r* (p-eval-list (cdr expr))))) 96 96 (/ 97 97 ;; A polynomial can be divided by a scalar
Note:
See TracChangeset
for help on using the changeset viewer.