X-Git-Url: http://gitweb.michael.orlitzky.com/?p=octave.git;a=blobdiff_plain;f=tests%2Fextended_powell_hessian1_tests.m;fp=tests%2Fextended_powell_hessian1_tests.m;h=6b6553388d1b37dc35d7451403600cabd1f34316;hp=0000000000000000000000000000000000000000;hb=30c26967dbc89131a09979fa8937eac0ef7a73b4;hpb=120959c85ebb6544fa0a00c3d1c3f8941e7da3e0

diff --git a/tests/extended_powell_hessian1_tests.m b/tests/extended_powell_hessian1_tests.m
new file mode 100644
index 0000000..6b65533
--- /dev/null
+++ b/tests/extended_powell_hessian1_tests.m
@@ -0,0 +1,9 @@
+## When m=1 we should agree with powell_hessian1().
+
+x = [4;5;6;7];
+f1 = powell_hessian1(x);
+f2 = extended_powell_hessian1(x);
+
+unit_test_equals("(extended_)powell_hessian1 agree for m=1", ...
+		 true, ...
+		 f1 == f2);