- Timestamp:
- 2016-06-03T18:37:20-07:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/pair-queue.lisp
r4185 r4186 85 85 86 86 (defparameter +min-total-degree-strategy+ 87 #.(make-instance87 (make-instance 88 88 'selection-strategy 89 89 :pair-key-fn #'(lambda (p q) (total-degree (universal-lcm (leading-monomial p) (leading-monomial q)))) … … 93 93 94 94 (defparameter +min-combined-length-strategy+ 95 #.(make-instance95 (make-instance 96 96 'selection-strategy 97 97 :pair-key-fn #'(lambda (p q) (+ (poly-length p) (poly-length q)))
Note:
See TracChangeset
for help on using the changeset viewer.