- Timestamp:
- 2016-06-14T19:53:22-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/buchberger.lisp
r4463 r4465 49 49 (grobner-test (subseq f 0 start) (subseq f 0 start))) 50 50 ;;Initialize critical pairs 51 (let ((b (make-critical-pair-queue * min-total-degree-strategy* f start))51 (let ((b (make-critical-pair-queue *normal-strategy* f start)) 52 52 (b-done (make-hash-table :test #'equal))) 53 53 (declare (type critical-pair-queue b) (type hash-table b-done))
Note:
See TracChangeset
for help on using the changeset viewer.