- Timestamp:
- 2015-06-12T16:04:58-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/division.lisp
r1539 r1568 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.") (break))213 #+grobner-check(when (null fl) (warn "normal-form: empty divisor list.")) 214 214 (do ((r (make-poly-zero)) 215 215 (c (funcall (ring-unit ring)))
Note:
See TracChangeset
for help on using the changeset viewer.