From 001e19b08ba7fb1b9e6f6bdb44a82ba3db3fc532 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 3 Apr 2008 04:23:42 +0000
Subject: Replace `^=' with `~='.

---
 src/algebra/plot3d.spad.pamphlet | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/algebra/plot3d.spad.pamphlet')

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
-- 
cgit v1.2.3