- Timestamp:
- 2015-06-05T13:23:52-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/ideal.lisp
r149 r156 65 65 (if (every #'poly-zerop f) 66 66 (error "First ideal must be non-zero.") 67 (list (make-poly 67 (list (make-poly-from-termlist 68 68 (list (make-term 69 69 (make-monom (monom-dimension (poly-lm (find-if-not #'poly-zerop f)))
Note:
See TracChangeset
for help on using the changeset viewer.