diff options
Diffstat (limited to 'src/algebra/manip.spad.pamphlet')
| -rw-r--r-- | src/algebra/manip.spad.pamphlet | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/algebra/manip.spad.pamphlet b/src/algebra/manip.spad.pamphlet index 4735b5e7..04fdbce5 100644 --- a/src/algebra/manip.spad.pamphlet +++ b/src/algebra/manip.spad.pamphlet @@ -330,6 +330,9 @@ AlgebraicManipulations(R, F): Exports == Implementation where concat([concat(k, same), concat(n, expo)], ll) rootProduct x == + import P,F,Z + import List K + import List Z for rec in breakup rootkernels tower x repeat k0 := first(l := rec.ker) nx := numer x; dx := denom x |