summaryrefslogtreecommitdiff
path: root/macros/hamming.sci
diff options
context:
space:
mode:
Diffstat (limited to 'macros/hamming.sci')
-rw-r--r--macros/hamming.sci14
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