Changeset 1466 for branches/f4grobner
- Timestamp:
- 2015-06-12T11:39:29-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/5am-tests.lisp
r1465 r1466 350 350 "Equality of ideal generated by Groebner bases" 351 351 (let* (($poly_grobner_algorithm :buchberger) 352 (fl (cdr (string->poly "[x, y]" '(x y))))353 (gl (cdr (string->poly "[x-y,x+2*y ]" '(x y))))352 (fl (cdr (string->poly "[x,x-y,y]" '(x y)))) 353 (gl (cdr (string->poly "[x-y,x+2*y,y]" '(x y)))) 354 354 (ring *ring-of-integers*) 355 355 (order #'lex>)
Note:
See TracChangeset
for help on using the changeset viewer.