Mercurial > hg > octave-max

changeset 734:c7173dfd9279

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-09-23 12:52:57 by jwe]
author jwe
date Fri, 23 Sep 1994 12:53:05 +0000
parents e77b62b20824
children 7455048010b9
files src/fft.cc src/ifft.cc
diffstat 2 files changed, 16 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/fft.cc
+++ b/src/fft.cc
@@ -79,7 +79,10 @@
 
       if (! error_state)
 	{
-	  m.resize (n_points, m.columns (), 0.0);
+	  if (m.rows () == 1)
+	    m.resize (1, n_points, 0.0);
+	  else
+	    m.resize (n_points, m.columns (), 0.0);
 	  retval = m.fourier ();
 	}
     }
@@ -89,7 +92,10 @@
 
       if (! error_state)
 	{
-	  m.resize (n_points, m.columns (), 0.0);
+	  if (m.rows () == 1)
+	    m.resize (1, n_points, 0.0);
+	  else
+	    m.resize (n_points, m.columns (), 0.0);
 	  retval = m.fourier ();
 	}
     }
--- a/src/ifft.cc
+++ b/src/ifft.cc
@@ -79,7 +79,10 @@
 
       if (! error_state)
 	{
-	  m.resize (n_points, m.columns (), 0.0);
+	  if (m.rows () == 1)
+	    m.resize (1, n_points, 0.0);
+	  else
+	    m.resize (n_points, m.columns (), 0.0);
 	  retval = m.ifourier ();
 	}
     }
@@ -89,7 +92,10 @@
 
       if (! error_state)
 	{
-	  m.resize (n_points, m.columns (), 0.0);
+	  if (m.rows () == 1)
+	    m.resize (1, n_points, 0.0);
+	  else
+	    m.resize (n_points, m.columns (), 0.0);
 	  retval = m.ifourier ();
 	}
     }