aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/intaux.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/intaux.spad.pamphlet')
-rw-r--r--src/algebra/intaux.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/intaux.spad.pamphlet b/src/algebra/intaux.spad.pamphlet
index d88eb62b..b5267540 100644
--- a/src/algebra/intaux.spad.pamphlet
+++ b/src/algebra/intaux.spad.pamphlet
@@ -171,7 +171,7 @@ IntegrationResult(F:Field): Exports == Implementation where
l := reverse! [LOG2O f for f in logpart u]$List(O)
if ratpart u ~= 0 then l := concat(ratpart(u)::O, l)
if not elem? u then l := concat([NE2O f for f in notelem u], l)
- null l => 0::O
+ null l => 0@F::O
reduce("+", l)
NE2O ne ==