aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/rinterp.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/rinterp.spad.pamphlet')
-rw-r--r--src/algebra/rinterp.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/rinterp.spad.pamphlet b/src/algebra/rinterp.spad.pamphlet
index 73d12ede..468f9004 100644
--- a/src/algebra/rinterp.spad.pamphlet
+++ b/src/algebra/rinterp.spad.pamphlet
@@ -116,7 +116,7 @@ some of the data points may not be interpolated correctly. However, the
solution is often still useful, thus we do not signal an error.
<<RINTERP Implementation>>=
- if #res~=1 then output("Warning: unattainable points!" _
+ if not one?(#res) then output("Warning: unattainable points!" _
::OutputForm)$OutputPackage
@