Commit 8052fd38 authored by Sebastian Müller's avatar Sebastian Müller 🐈
Browse files

Tests: I am very good at writing tests

parent 007b0247
Pipeline #31733 passed with stages
in 2 minutes and 39 seconds
......@@ -26,9 +26,9 @@ contains
@assertEqual(2._dp, global_real, tolerance=0.001, message='global real')
@assertEqual(dat, global_array, tolerance=0.001, message='global array')
@assertEqual(1, global_container%type_int, message='container int')
@assertEqual(2._dp, global_container%type_real, tolerance=0.001, message='container real')
@assertEqual(dat, global_container%type_array, tolerance=0.001, message='container array')
@assertEqual(2, global_container%type_int, message='container int')
@assertEqual(3._dp, global_container%type_real, tolerance=0.001, message='container real')
@assertEqual(2.0 * dat, global_container%type_array, tolerance=0.001, message='container array')
end subroutine test_globals
......
Supports Markdown
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