diff options
Diffstat (limited to 'src/algebra/transsolve.spad.pamphlet')
| -rw-r--r-- | src/algebra/transsolve.spad.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/transsolve.spad.pamphlet b/src/algebra/transsolve.spad.pamphlet index d3c23777..f4bb6f6b 100644 --- a/src/algebra/transsolve.spad.pamphlet +++ b/src/algebra/transsolve.spad.pamphlet @@ -283,7 +283,7 @@ TransSolvePackage(R) : Exports == Implementation where while testRootk(var1,y) repeat varlistk1:=tableXkernels(var1,y) for i in varlistk1 repeat - if is?(i, "nthRoot"::S) then + if is?(i, 'nthRoot) then var1:=eliminateKernRoot(var1,first kernels(i::RE)) var1 |