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