diff options
Diffstat (limited to 'src/algebra/fs2ups.spad.pamphlet')
| -rw-r--r-- | src/algebra/fs2ups.spad.pamphlet | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/algebra/fs2ups.spad.pamphlet b/src/algebra/fs2ups.spad.pamphlet index b43416e3..e27f4900 100644 --- a/src/algebra/fs2ups.spad.pamphlet +++ b/src/algebra/fs2ups.spad.pamphlet @@ -267,8 +267,7 @@ FunctionSpaceToUnivariatePowerSeries(R,FE,Expon,UPS,TRAN,x):_ -- is the function a power with exponent other than 0 or 1? (expt := isPower fcn) case "failed" => "failed" power := expt :: Record(val:FE,exponent:I) --- one? power.exponent => "failed" - (power.exponent = 1) => "failed" + one? power.exponent => "failed" power powerToUPS(fcn,n,posCheck?,atanFlag) == |