From aa129f3b4eaacbeae2837fb7e5c67a1a1a373eaa Mon Sep 17 00:00:00 2001 From: dos-reis Date: Mon, 18 May 2009 23:46:53 +0000 Subject: * algebra/curve.spad.pamphlet: Use literal symbols. * algebra/defintef.spad.pamphlet: Likewise. * algebra/defintrf.spad.pamphlet: Likewise. * algebra/divisor.spad.pamphlet: Likewise. * algebra/efstruc.spad.pamphlet: Likewise. * algebra/exprode.spad.pamphlet: Likewise. * algebra/fspace.spad.pamphlet: Likewise. * algebra/intaf.spad.pamphlet: Likewise. * algebra/intef.spad.pamphlet: Likewise. * algebra/integrat.spad.pamphlet: Likewise. * algebra/intpm.spad.pamphlet: Likewise. * algebra/laplace.spad.pamphlet: Likewise. * algebra/limitps.spad.pamphlet: Likewise. * algebra/liouv.spad.pamphlet: Likewise. * algebra/odeef.spad.pamphlet: Likewise. * algebra/oderf.spad.pamphlet: Likewise. * algebra/rdeef.spad.pamphlet: Likewise. * algebra/symbol.spad.pamphlet: Likewise. * algebra/transsolve.spad.pamphlet: Likewise. --- src/algebra/transsolve.spad.pamphlet | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/algebra/transsolve.spad.pamphlet') 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 -- cgit v1.2.3