aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/plot.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/plot.spad.pamphlet')
-rw-r--r--src/algebra/plot.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/plot.spad.pamphlet b/src/algebra/plot.spad.pamphlet
index fdeeafed..d03da277 100644
--- a/src/algebra/plot.spad.pamphlet
+++ b/src/algebra/plot.spad.pamphlet
@@ -387,7 +387,7 @@ Plot(): Exports == Implementation where
todo1 := rest todo1
todo2 := rest todo2
if not null todo1 then (t := first(todo1); p := first(todo2))
- n > 0 =>
+ positive? n =>
NUMFUNEVALS := NUMFUNEVALS + n
t := curve.knots; p := curve.points
xRange := select(p,xCoord,min) .. select(p,xCoord,max)