Changeset 4185
- Timestamp:
- 2016-06-03T18:21:25-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/pair-queue.lisp
r4184 r4185 76 76 pair-key-fn pair-order-fn)))) 77 77 78 (def constant+normal-strategy+78 (defparameter +normal-strategy+ 79 79 (make-instance 80 80 'selection-strategy … … 84 84 leading monomials is selected.") 85 85 86 (def constant+min-total-degree-strategy+87 (make-instance86 (defparameter +min-total-degree-strategy+ 87 #.(make-instance 88 88 'selection-strategy 89 89 :pair-key-fn #'(lambda (p q) (total-degree (universal-lcm (leading-monomial p) (leading-monomial q)))) … … 92 92 LCM of leading monomials is selected.") 93 93 94 (def constant+min-combined-length-strategy+95 (make-instance94 (defparameter +min-combined-length-strategy+ 95 #.(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.