Changeset 1539 for branches/f4grobner/division.lisp
- Timestamp:
- 2015-06-12T14:45:50-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/division.lisp
r1433 r1539 211 211 (top-reduction-only $poly_top_reduction_only) 212 212 (ring (ro-ring ring-and-order))) 213 #+grobner-check(when (null fl) (warn "normal-form: empty divisor list.") )213 #+grobner-check(when (null fl) (warn "normal-form: empty divisor list.") (break)) 214 214 (do ((r (make-poly-zero)) 215 215 (c (funcall (ring-unit ring)))
Note:
See TracChangeset
for help on using the changeset viewer.