aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/pscat.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/pscat.spad.pamphlet')
-rw-r--r--src/algebra/pscat.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/pscat.spad.pamphlet b/src/algebra/pscat.spad.pamphlet
index 0930aa2b..fbc1806f 100644
--- a/src/algebra/pscat.spad.pamphlet
+++ b/src/algebra/pscat.spad.pamphlet
@@ -313,7 +313,7 @@ UnivariateTaylorSeriesCategory(Coef): Category == Definition where
eq?(uu,rst uu) and frst uu = 0 => l
concat(prefix("O" :: OUT,[vv ** (n :: OUT)]),l)
empty? l => (0$Coef) :: OUT
- reduce("+",reverse_! l)
+ reduce("+",reverse! l)
if Coef has Field then
(x:%) ** (r:Coef) == series power(r,coefficients x)$STTA