Changeset 4198 for branches/f4grobner
- Timestamp:
- 2016-06-04T09:09:42-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/5am-buchberger.lisp
r4197 r4198 75 75 76 76 ;; poly_grobner([x-3*u-3*u*v^2+u^3,y-3*v-3*u^2*v+v^3,z-3*u^2+3*v^2],[u,v,x,y,z]); 77 78 77 (test buchberger-advanced 79 78 "Buchberger algorithm - advanced case" … … 109 108 +118098*y^4*z^2-118098*x^4*z^2+59049*y^4*z-118098*x^2*y^2*z 110 109 +59049*x^4*z+19683*y^6-59049*x^2*y^4+59049*x^4*y^2-19683*x^6]" '(u v x y z))))) 111 ;;(is-true (grobner-test gb fl))112 (is (every #'universal-equalp (buchberger fl) gb))110 (is-true (grobner-test gb fl)) 111 ;;(is (every #'universal-equalp (buchberger fl) gb)) 113 112 ;;(is (every #'universal-equalp (parallel-buchberger fl) gb)) 114 113 ))
Note:
See TracChangeset
for help on using the changeset viewer.