summaryrefslogtreecommitdiff
path: root/macros/durbinlevinson.sci
diff options
context:
space:
mode:
Diffstat (limited to 'macros/durbinlevinson.sci')
-rw-r--r--macros/durbinlevinson.sci14
1 files changed, 14 insertions, 0 deletions
diff --git a/macros/durbinlevinson.sci b/macros/durbinlevinson.sci
new file mode 100644
index 0000000..cd56e48
--- /dev/null
+++ b/macros/durbinlevinson.sci
@@ -0,0 +1,14 @@
+function y= durbinlevinson(C, varargin)
+ rhs=argn(2);
+ if(rhs<1 | rhs>3)
+ error("Wrong number of input arguments");
+ end
+ select(rhs)
+ case 1 then
+ y=callOctave("durbinlevinson",C);
+ case 2 then
+ y=callOctave("durbinlevinson",C, varargin(1));
+ case 3 then
+ y=callOctave("durbinlevinson",C, varargin(1), varargin(2));
+ end
+endfunction \ No newline at end of file