diff options
Diffstat (limited to 'macros/fftconv.sci')
| -rw-r--r-- | macros/fftconv.sci | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/macros/fftconv.sci b/macros/fftconv.sci new file mode 100644 index 0000000..4ec2815 --- /dev/null +++ b/macros/fftconv.sci @@ -0,0 +1,15 @@ +function y = fftconv(X, Y, varargin) + +funcprot(0); +rhs = argn(2) +if(rhs<2 | rhs>3) +error("Wrong number of input arguments."); +end + + select(rhs) + case 2 then + y = callOctave("fftconv", X, Y); + case 3 then + y = callOctave("ifftn",X, Y, varargin(1)); + end +endfunction |