# HG changeset patch
# User Antonio Pino Robles <data.script93@gmail.com>
# Date 1431716585 -7200
# Node ID a5b2cfcf4a194b387488c0b0291bcd4d6142a491
# Parent  0aae72032c25e5e11373d2dc3b94080d29191417
Added stupid test for the sin function (in funm_files). Using octave version
4.0.0-rc3 at this point. Note: mctdemo.m (in matrixcomp) breaks giving error
"'qmult' not defined".

diff -r 0aae72032c25 -r a5b2cfcf4a19 Makefile
--- a/Makefile	Fri May 15 20:30:21 2015 +0200
+++ b/Makefile	Fri May 15 21:03:05 2015 +0200
@@ -1,5 +1,6 @@
 paths = funm_files
-test_fun_files : tests/fun_cos
-	octave -q --eval 'addpath("funm_files:tests");' \
-		  --eval 'test fun_cos'
+test_fun_files : test/fun_cos test/fun_sin 
+	octave -q --eval 'addpath("funm_files:test");' \
+		  --eval 'test fun_cos;' \
+		  --eval 'test fun_sin;' 
 
diff -r 0aae72032c25 -r a5b2cfcf4a19 test/fun_sin
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/fun_sin	Fri May 15 21:03:05 2015 +0200
@@ -0,0 +1,15 @@
+%!test
+%! A = rand (5,5);
+%! [P,lambda] = eig (A);
+%! D = diag(sin (diag (lambda))); 
+%! B = P * D / P;
+%! sinA = myfunm (A,@sin);
+%! assert(sinA,B,1e-9)
+%!
+%!
+%!
+%!
+%!
+%!
+%!
+