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