- Timestamp:
- 2015-06-11T23:12:18-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/ideal.lisp
r1395 r1396 199 199 (cond 200 200 ((endp plist) 201 (reduced-grobner ring f start top-reduction-only))201 (reduced-grobner ring-and-order f start top-reduction-only)) 202 202 (t (let ((g (ideal-saturation-1 ring f (car plist) start top-reduction-only))) 203 203 (ideal-polysaturation-1 ring g (rest plist) (length g) top-reduction-only)))))
Note:
See TracChangeset
for help on using the changeset viewer.