- Timestamp:
- 2016-05-31T20:49:35-07:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/division.lisp
r4074 r4075 201 201 #+grobner-check(when (null fl) (warn "normal-form: empty divisor list.")) 202 202 (do ((r (make-zero-for f)) 203 (c (make-zero-for f))203 (c 1) 204 204 (division-count 0)) 205 205 ((or (universal-zerop f)
Note:
See TracChangeset
for help on using the changeset viewer.