X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=src%2Ftest%2FOLD_TEST_MATLAB%2FcheckOutput.m;fp=src%2Ftest%2FOLD_TEST_MATLAB%2FcheckOutput.m;h=c56ed0bc63050ca53d48c64e55d4197059d30595;hb=7b2720733e9aebe177c211119a9ec160c7e7117b;hp=0000000000000000000000000000000000000000;hpb=4725af564bfdbeb40d0caf7f124ab94ac05a97eb;p=valse.git

diff --git a/src/test/OLD_TEST_MATLAB/checkOutput.m b/src/test/OLD_TEST_MATLAB/checkOutput.m
new file mode 100644
index 0000000..c56ed0b
--- /dev/null
+++ b/src/test/OLD_TEST_MATLAB/checkOutput.m
@@ -0,0 +1,11 @@
+function[]=checkOutput(varName, matrix, refMatrix, tol)
+
+	fprintf('Checking %s\n',varName);
+	maxError = max(max(max(max(abs(matrix - refMatrix)))));
+	if maxError >= tol
+		fprintf('    Inaccuracy: max(abs(error)) = %g >= %g\n',maxError,tol);
+	else
+		fprintf('    OK\n');
+	end
+
+end