Changeset 1781 for branches/f4grobner
- Timestamp:
- 2015-06-15T11:17:28-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/mx-grobner.lisp
r1780 r1781 434 434 (defmfun $poly_content (p vars) 435 435 (with-ring-and-order ((vars) :polynomials (p)) 436 (poly-content (ro-ring ring-and-order p))))436 (poly-content (ro-ring ring-and-order) p))) 437 437 438 438 #| … … 483 483 (with-ring-and-order ((vars) :poly-lists (plist) 484 484 :value-type :poly-list) 485 (poly-normalize-list ring-and-orderplist)))485 (poly-normalize-list (ro-ring ring-and-order) plist))) 486 486 487 487 (defmfun $poly_grobner (f vars)
Note:
See TracChangeset
for help on using the changeset viewer.