- Timestamp:
- 2015-08-27T17:12:16-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/symbolic-polynomial.lisp
r3399 r3420 100 100 ((endp (cddr expr)) 101 101 ;; A special case (/ ?), the inverse 102 (r/ (c dr expr)))102 (r/ (cadr expr))) 103 103 (t 104 104 (let ((num (p-eval (cadr expr)))
Note:
See TracChangeset
for help on using the changeset viewer.