X-Git-Url: http://gitweb.michael.orlitzky.com/?p=octave.git;a=blobdiff_plain;f=run-tests.m;fp=run-tests.m;h=ef72b10731fecb8f6f324d4b25150153140af948;hp=0000000000000000000000000000000000000000;hb=62d652799ded51169bda744d8728e1d33582fa5f;hpb=8aa8cc9c12fe18887eb13a08962bde982dad996d

diff --git a/run-tests.m b/run-tests.m
new file mode 100755
index 0000000..ef72b10
--- /dev/null
+++ b/run-tests.m
@@ -0,0 +1,15 @@
+#!/usr/bin/octave --silent
+
+unit_init(1, {});
+
+unit_test_equals("sin[0] == 0", ...
+		 0, ...
+		 divided_difference(@sin, 0));
+
+unit_test_equals("sin[0, pi] == 0", ...
+		 0, ...
+		 divided_difference(@sin, [0,pi]));
+
+unit_test_equals("sin[0, pi, 2*pi] == 0", ...
+		 0, ...
+		 divided_difference(@sin, [0,pi,2*pi]));