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