24 #if defined (HAVE_CONFIG_H)
38 #if defined (HAVE_FFTW)
39 # define FFTSRC "@sc{fftw}"
41 # define FFTSRC "@sc{fftpack}"
49 if (nargin < 1 || nargin > 3)
59 double dval =
args(1).double_value ();
61 error (
"%s: number of rows (N) cannot be NaN", fcn);
65 error (
"%s: number of rows (N) must be greater than zero", fcn);
71 double dval =
args(2).double_value ();
73 error (
"%s: number of columns (M) cannot be NaN", fcn);
77 error (
"%s: number of columns (M) must be greater than zero", fcn);
80 for (
int i = 0;
i < dims.
ndims ();
i++)
94 if (dims.
all_zero () || n_rows == 0 || n_cols == 0)
ComplexNDArray complex_array_value(bool frc_str_conv=false) const
bool is_real_type(void) const
ComplexNDArray ifourier2d(void) const
OCTINTERP_API void print_usage(void)
octave_idx_type length(void) const
FloatComplexNDArray fourier2d(void) const
#define DEFUN(name, args_name, nargout_name, doc)
void error(const char *fmt,...)
static octave_value do_fft2(const octave_value_list &args, const char *fcn, int type)
ComplexNDArray fourier2d(void) const
FloatComplexNDArray fourier2d(void) const
FloatComplexNDArray ifourier2d(void) const
FloatNDArray float_array_value(bool frc_str_conv=false) const
FloatComplexNDArray float_complex_array_value(bool frc_str_conv=false) const
ComplexNDArray ifourier2d(void) const
bool is_complex_type(void) const
void resize(const dim_vector &dv, const T &rfv)
the exceeded dimensions are set to if fewer subscripts than dimensions are the exceeding dimensions are merged into the final requested dimension For consider the following dims
dim_vector dims(void) const
bool all_zero(void) const
void err_wrong_type_arg(const char *name, const char *s)
NDArray array_value(bool frc_str_conv=false) const
=val(i)}if ode{val(i)}occurs in table i
octave_idx_type nint_big(double x)
octave_idx_type ndims(void) const
Number of dimensions.
ComplexNDArray fourier2d(void) const
FloatComplexNDArray ifourier2d(void) const
bool is_single_type(void) const
Vector representing the dimensions (size) of an Array.
return octave_value(v1.char_array_value().concat(v2.char_array_value(), ra_idx),((a1.is_sq_string()||a2.is_sq_string())? '\'': '"'))