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