From: Paul K. <pki...@us...> - 2004-05-14 10:29:58
|
Update of /cvsroot/octave/octave-forge/main/signal In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24970 Modified Files: pwelch.m Log Message: [for Roland Kaufmann] support complex inputs Index: pwelch.m =================================================================== RCS file: /cvsroot/octave/octave-forge/main/signal/pwelch.m,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- pwelch.m 21 Aug 2003 00:11:11 -0000 1.3 +++ pwelch.m 14 May 2004 10:29:47 -0000 1.4 @@ -97,8 +97,7 @@ (!isempty(y) && columns(y) != 1 && rows(y) != 1) error ([calledby, " data must be a vector"]); end - if columns(x) != 1, x = x'; end - if columns(y) != 1, y = y'; end + x = x(:); y = y(:); if !isempty(y) && rows(x)!=rows(y) error ([calledby, " x and y vectors must be the same length"]); endif |