diff options
Diffstat (limited to 'macros/buffer.sci')
| -rw-r--r-- | macros/buffer.sci | 45 |
1 files changed, 2 insertions, 43 deletions
diff --git a/macros/buffer.sci b/macros/buffer.sci index ef043a6..723e762 100644 --- a/macros/buffer.sci +++ b/macros/buffer.sci @@ -1,3 +1,5 @@ + +function [y, z, opt] = buffer (x, n, p, opt) //This function buffers the given data into a matrix of signal frames //Calling Sequence //[y] = buffer (x, n) @@ -18,49 +20,6 @@ // 0 1 // 1 0 -//Older code - -//function [y, z, opt] = buffer (x, n, p, opt) -//funcprot(0); -//lhs = argn(1) -//rhs = argn(2) -//if (rhs < 2 | rhs > 4) -//error("Wrong number of input arguments.") -//end -// -//select(rhs) -// -// case 2 then -// if(lhs==1) -// y = callOctave("buffer",x,n) -// elseif(lhs==3) -// [y,z,opt] = callOctave("buffer",x,n) -// else -// error("Wrong number of output argments.") -// end -// -// case 3 then -// if(lhs==1) -// y = callOctave("buffer",x,n,p) -// elseif(lhs==3) -// [y,z,op] = callOctave("buffer",x,n,p) -// else -// error("Wrong number of output argments.") -// end -// case 4 then -// if(lhs==1) -// y = callOctave("buffer",x,n,p,opt) -// elseif(lhs==3) -// [y,z,opt] = callOctave("buffer",x,n,p,opt) -// else -// error("Wrong number of output argments.") -// end -// end -//endfunction - - -function [y, z, opt] = buffer (x, n, p, opt) - [nargout, nargin] = argn() ; if (nargin < 2 | nargin > 4) |