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