Commit 0349eef6 authored by Andreas Marek's avatar Andreas Marek

Print result of Toeplitz test

parent 737d3c6f
...@@ -453,6 +453,13 @@ function check_correctness_evp_numeric_residuals_& ...@@ -453,6 +453,13 @@ function check_correctness_evp_numeric_residuals_&
print *,"Eigenvalues differ from analytic solution: maxerr = ",maxerr print *,"Eigenvalues differ from analytic solution: maxerr = ",maxerr
endif endif
endif endif
if (status .eq. 0) then
if (myid .eq. 0) then
print *,"Result of Toeplitz matrix test: test passed"
print *,"Eigenvalues differ from analytic solution: maxerr = ",maxerr
endif
endif
end function end function
function check_correctness_cholesky_& function check_correctness_cholesky_&
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment