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