Mercurial > hg > octave-lyh

diff scripts/linear-algebra/orth.m @ 12906:d7a91b3fb7f9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Return empty matrix if the argument to orth is empty (bug #33301)
author Jordi Gutiérrez Hermoso <jordigh@gmail.com>
date Tue, 02 Aug 2011 11:40:27 -0500
parents 7ef7e20057fa
children 69a4609e61e2
line wrap: on
line diff
--- a/scripts/linear-algebra/orth.m
+++ b/scripts/linear-algebra/orth.m
@@ -39,6 +39,11 @@
 
   if (nargin == 1 || nargin == 2)
 
+    if (isempty (A))
+      retval = [];
+      return;
+    endif
+
     [U, S, V] = svd (A);
 
     [rows, cols] = size (A);