- Timestamp:
- 2015-06-11T20:39:17-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/buchberger.lisp
r1290 r1291 71 71 ((criterion-2 pair b-done f) nil) 72 72 (t 73 (let ((sp (normal-form ring-and-order (spoly ring-and-order 74 (pair-first pair) 75 (pair-second pair)) 73 (let ((sp (normal-form ring-and-order 74 (spoly ring-and-order 75 (pair-first pair) 76 (pair-second pair)) 76 77 f top-reduction-only))) 77 78 (declare (type poly sp))
Note:
See TracChangeset
for help on using the changeset viewer.