Mercurial > hg > octave-nkf

diff scripts/general/interp1.m @ 15193:2d5e4d283688

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Modified interp1.m file to check whether X has distinct values or not.
author Vivek Dogra <vivek.dogra.iitd@gmail.com>
date Fri, 17 Aug 2012 08:22:30 -0400
parents 5d3a684236b0
children 94d512d712e3
line wrap: on
line diff
--- a/scripts/general/interp1.m
+++ b/scripts/general/interp1.m
@@ -168,6 +168,11 @@
     y = y(p,:);
   endif
 
+ ## check whether sample point @var{x} are distinct; give error if not.
+  if (any (diff (x) == 0))
+    error ("interp1: X should have distinct values");
+  endif
+
   starmethod = method(1) == "*";
 
   if (starmethod)