Changeset 3422
- Timestamp:
- 2015-08-27T17:19:47-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/symbolic-polynomial.lisp
r3421 r3422 114 114 ;; Negative power means division in coefficient ring 115 115 ;; Non-integer power means non-polynomial coefficient 116 (coerce-coeff ring expr vars))116 expr) 117 117 (t (r-expt (p-eval (cadr expr)) (caddr expr))))) 118 118 (otherwise 119 (coerce-coeff ring expr vars))))))))119 expr))))))) 120 120 121 121 #|
Note:
See TracChangeset
for help on using the changeset viewer.