Unit test module. Compare 2 element of different types. More...
Data Types | |
| interface | compare_coordonnees |
| interface | relative_error |
Public Member Functions | |
| real *8 function | relative_error_d_0d (x, y) |
| Compute the relative error of 2 values. More... | |
| real *8 function, dimension(size(x)) | relative_error_d_1d (x, y) |
| Compute the relative error of 2 1D-arrays. More... | |
| real *8 function, dimension(size(x, 1), size(y, 2)) | relative_error_d_2d (x, y) |
| Compute the relative error of 2 2D-arrays. More... | |
| real function | relative_error_s_0d (x, y) |
| Compute the relative error of 2 real single values. More... | |
| real function, dimension(size(x)) | relative_error_s_1d (x, y) |
| Compute the relative error of 2 real-single 1D-arrays. More... | |
| real function, dimension(size(x, 1), size(y, 2)) | relative_error_s_2d (x, y) |
| Compute the relative error of 2 real-single 2D-arrays. More... | |
| real *8 function, dimension(size(x, 1), size(x, 2)) | relative_error_coordonnees_2d (x, y, key) |
| Compute the relative error of 2 coordonnees field. More... | |
| logical function | compare_espece (x, y, tol) |
| Compare 2 coordonnees type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_neutral (x, y, tol) |
| Compare 2 neutral type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_coordonnees_0d (x, y, tol) |
| Compare 2 coordonnees type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_coordonnees_2d (x, y, tol) |
| Compare 2 2d-array coordonnees type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_tube_description (x, y, tol) |
| Compare 2 compare_tube_description type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_simulation_data (x, y, tol) |
| Compare 2 simulation_data type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_emissions (x, y, tol) |
| Compare 2 emissions type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_wave_energy (x, y, tol) |
| Compare 2 wave_energy type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_fieldline_type (x, y, tol) |
| Compare 2 fieldline type. Return true if 2 items are identical or relative difference less than a threshold (tol) More... | |
| logical function | compare_reac (ref, test) |
| Compare 2 reac objects. | |
| subroutine | print_diff_simulation_data (x, y) |
| Print difference between 2 simulation_data objects in console. | |
| subroutine | print_diff_coordonnees (x, y) |
| Print difference between 2 coordonnees objects in console. | |
| subroutine | print_diff_neutral (x, y) |
| Print difference between 2 neutral objects in console. | |
| subroutine | print_diff_espece (x, y) |
| Print difference between 2 espece objects in console. | |
| subroutine | print_diff_emissions (x, y) |
| Print difference between 2 emissions objects in console. | |
| subroutine | print_diff_wave_energy (x, y) |
| Print difference between 2 wave_energy objects in console. | |
| subroutine | print_diff_fieldline (x, y) |
| Print difference between 2 fieldline objects in console. | |
| subroutine | print_diff_tube_description (x, y) |
| Print difference between 2 tube_description objects in console. | |
Unit test module. Compare 2 element of different types.
| logical function module_unittest::compare_coordonnees_0d | ( | type(coordonnees), intent(in) | x, |
| type(coordonnees), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 coordonnees type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| logical function module_unittest::compare_coordonnees_2d | ( | type(coordonnees), dimension(:,:), intent(in) | x, |
| type(coordonnees), dimension(:,:), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 2d-array coordonnees type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| logical function module_unittest::compare_emissions | ( | type(emissions), intent(in) | x, |
| type(emissions), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 emissions type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| logical function module_unittest::compare_espece | ( | type(espece), dimension(:), intent(in) | x, |
| type(espece), dimension(:), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 coordonnees type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| logical function module_unittest::compare_fieldline_type | ( | type(fieldline_type), intent(in) | x, |
| type(fieldline_type), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 fieldline type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| logical function module_unittest::compare_neutral | ( | type(neutral), dimension(:), intent(in) | x, |
| type(neutral), dimension(:), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 neutral type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| logical function module_unittest::compare_simulation_data | ( | type(simulation_data), intent(in) | x, |
| type(simulation_data), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 simulation_data type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| logical function module_unittest::compare_tube_description | ( | type(tube_description), intent(in) | x, |
| type(tube_description), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 compare_tube_description type. Return true if 2 items are identical or relative difference less than a threshold (tol)
| logical function module_unittest::compare_wave_energy | ( | type(wave_energy), intent(in) | x, |
| type(wave_energy), intent(in) | y, | ||
| real*8, optional | tol | ||
| ) |
Compare 2 wave_energy type. Return true if 2 items are identical or relative difference less than a threshold (tol)

| real*8 function, dimension(size(x,1),size(x,2)) module_unittest::relative_error_coordonnees_2d | ( | type(coordonnees), dimension(:,:), intent(in) | x, |
| type(coordonnees), dimension(:,:), intent(in) | y, | ||
| character(len=*), optional | key | ||
| ) |
Compute the relative error of 2 coordonnees field.
| [in] | x(,:,:) | Coordonnees type |
| [in] | y(,:,:) | Coordonnees type |
| [in] | key | Optional argument: name of coordonnees type to compare (default: longeo) |

| real*8 function module_unittest::relative_error_d_0d | ( | real*8, intent(in) | x, |
| real*8, intent(in) | y | ||
| ) |
Compute the relative error of 2 values.

| real*8 function, dimension(size(x)) module_unittest::relative_error_d_1d | ( | real*8, dimension(:), intent(in) | x, |
| real*8, dimension(:), intent(in) | y | ||
| ) |
Compute the relative error of 2 1D-arrays.

| real*8 function, dimension(size(x,1),size(y,2)) module_unittest::relative_error_d_2d | ( | real*8, dimension(:,:), intent(in) | x, |
| real*8, dimension(:,:), intent(in) | y | ||
| ) |
Compute the relative error of 2 2D-arrays.

| real function module_unittest::relative_error_s_0d | ( | real, intent(in) | x, |
| real, intent(in) | y | ||
| ) |
Compute the relative error of 2 real single values.

| real function, dimension(size(x)) module_unittest::relative_error_s_1d | ( | real, dimension(:), intent(in) | x, |
| real, dimension(:), intent(in) | y | ||
| ) |
Compute the relative error of 2 real-single 1D-arrays.

| real function, dimension(size(x,1),size(y,2)) module_unittest::relative_error_s_2d | ( | real, dimension(:,:), intent(in) | x, |
| real, dimension(:,:), intent(in) | y | ||
| ) |
Compute the relative error of 2 real-single 2D-arrays.

1.8.5