Mercurial > octave

diff src/pinv.cc @ 712:36ba0576bd1b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-09-19 14:18:15 by jwe]
author jwe
date Mon, 19 Sep 1994 14:18:48 +0000
parents 5d852fb75139
children e81d3a66725e
line wrap: on
line diff
--- a/src/pinv.cc	Sun Sep 18 23:34:35 1994 +0000
+++ b/src/pinv.cc	Mon Sep 19 14:18:48 1994 +0000
@@ -44,17 +44,17 @@
 
   int nargin = args.length ();
 
-  if (nargin < 2 || nargin > 3)
+  if (nargin < 1 || nargin > 2)
     {
       print_usage ("pinv");
       return retval;
     }
 
-  tree_constant arg = args(1);
+  tree_constant arg = args(0);
 
   double tol = 0.0;
-  if (nargin == 3)
-    tol = args(2).double_value ();
+  if (nargin == 2)
+    tol = args(1).double_value ();
 
   if (error_state)
     return retval;