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