Commit b4eb929a authored by Andreas Marek's avatar Andreas Marek
Browse files

Fix single precision transpose_multiply test

parent 925b3703
...@@ -282,7 +282,7 @@ program test_transpose_multiply ...@@ -282,7 +282,7 @@ program test_transpose_multiply
print *," Maximum error of result: ", normmax print *," Maximum error of result: ", normmax
endif endif
if (normmax .gt. 5e-4_rk4) then if (normmax .gt. 5e-2_rk4) then
status = 1 status = 1
endif endif
......
...@@ -284,7 +284,7 @@ program test_transpose_multiply ...@@ -284,7 +284,7 @@ program test_transpose_multiply
print *," Maximum error of result: ", normmax print *," Maximum error of result: ", normmax
endif endif
if (normmax .gt. 5e-4_rk4) then if (normmax .gt. 5e-2_rk4) then
status = 1 status = 1
endif endif
......
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