diff options
Diffstat (limited to 'src/algebra/plot3d.spad.pamphlet')
| -rw-r--r-- | src/algebra/plot3d.spad.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/plot3d.spad.pamphlet b/src/algebra/plot3d.spad.pamphlet index 804a1207..575498d5 100644 --- a/src/algebra/plot3d.spad.pamphlet +++ b/src/algebra/plot3d.spad.pamphlet @@ -218,7 +218,7 @@ Plot3D(): Exports == Implementation where NUMFUNEVALS := NUMFUNEVALS + 1 t := c := reverse_! c; p := q := reverse_! q s := (h-l)/(MINPOINTS::F-1) - if (first t) ^= l then + if (first t) ~= l then t := c := concat(l,c); p := q := concat(f l,p) NUMFUNEVALS := NUMFUNEVALS + 1 while not null rest t repeat |