bug in multi-column input resolved

winplot.m

@@ -32,6 +32,9 @@ function out=winplot(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.2  2004/11/10 07:04:57  marwan
+% initial import
+%
 %
 % This program is part of the new generation XXII series.
 %
@@ -670,11 +673,14 @@ if size(x,1)==1
   y(:,2)=x(1,:)'; 
 else
   if size(x,2)>1 
-    y(:,1)=x(:,1);
-    y(:,2)=x(:,2);
-    if sum(diff(x(:,1))<0) 
-      error('X-scale must be monotonically non-decreasing.')
+    if sum(diff(x(:,1))<0)
+        y(:,1)=(1:length(x))';
+        y(:,2)=x(:,1);
+    else
+        y(:,1)=x(:,1);
+        y(:,2)=x(:,2);
     end
+%      error('X-scale must be monotonically non-decreasing.')
   else
     y(:,1)=(1:length(x))';
     y(:,2)=x;