aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/irexpand.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/irexpand.spad.pamphlet')
-rw-r--r--src/algebra/irexpand.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/irexpand.spad.pamphlet b/src/algebra/irexpand.spad.pamphlet
index 1441447a..6661642a 100644
--- a/src/algebra/irexpand.spad.pamphlet
+++ b/src/algebra/irexpand.spad.pamphlet
@@ -110,7 +110,7 @@ IntegrationResultToFunction(R, F): Exports == Implementation where
sqrn := s.ans1 * rootSimp sqrt(-s.ans2)
nn := lgp + d * sqrn * ilog(e, f * sqrn,
setUnion(setUnion(kernels a, kernels b), kernels p0))
- sqr.sgn > 0 => [pp]
+ positive? sqr.sgn => [pp]
negative? sqr.sgn => [nn]
[pp, nn]