stardis-solver

Solve coupled heat transfers
git clone git://git.meso-star.fr/stardis-solver.git
Log | Files | Refs | README | LICENSE

commit c43f289e34c8deaaf9a45f339583e2547646df4f
parent fb4d7e519ec3548dac7d667ee35cb9131132b0b0
Author: Christophe Coustet <christophe.coustet@meso-star.com>
Date:   Thu, 21 Oct 2021 11:18:43 +0200

Activate some green tests in transcient mode (were active only for t=inf)

This causes crashes in debug that reveal a bug

Diffstat:
Msrc/test_sdis_convection.c | 32++++++++++++++------------------
Msrc/test_sdis_convection_non_uniform.c | 32++++++++++++++------------------
2 files changed, 28 insertions(+), 36 deletions(-)

diff --git a/src/test_sdis_convection.c b/src/test_sdis_convection.c @@ -304,15 +304,13 @@ main(int argc, char** argv) printf("#failures = %lu/%lu\n", (unsigned long)nfails, (unsigned long)N); CHK(eq_eps(T.E, ref, T.SE * 3)); - if(IS_INF(time)) { /* Check green function */ - OK(sdis_solve_probe_green_function(box_scn, &solve_args, &green)); - OK(sdis_green_function_solve(green, &estimator2)); - check_green_function(green); - check_estimator_eq(estimator, estimator2); - check_green_serialization(green, box_scn); - OK(sdis_estimator_ref_put(estimator2)); - OK(sdis_green_function_ref_put(green)); - } + OK(sdis_solve_probe_green_function(box_scn, &solve_args, &green)); + OK(sdis_green_function_solve(green, &estimator2)); + check_green_function(green); + check_estimator_eq(estimator, estimator2); + check_green_serialization(green, box_scn); + OK(sdis_estimator_ref_put(estimator2)); + OK(sdis_green_function_ref_put(green)); OK(sdis_estimator_ref_put(estimator)); printf("\n"); @@ -346,15 +344,13 @@ main(int argc, char** argv) printf("#failures = %lu/%lu\n", (unsigned long)nfails, (unsigned long)N); CHK(eq_eps(T.E, ref, T.SE * 3)); - if(IS_INF(time)) { /* Check green function */ - OK(sdis_solve_probe_green_function(square_scn, &solve_args, &green)); - OK(sdis_green_function_solve(green, &estimator2)); - check_green_function(green); - check_estimator_eq(estimator, estimator2); - check_green_serialization(green, square_scn); - OK(sdis_estimator_ref_put(estimator2)); - OK(sdis_green_function_ref_put(green)); - } + OK(sdis_solve_probe_green_function(square_scn, &solve_args, &green)); + OK(sdis_green_function_solve(green, &estimator2)); + check_green_function(green); + check_estimator_eq(estimator, estimator2); + check_green_serialization(green, square_scn); + OK(sdis_estimator_ref_put(estimator2)); + OK(sdis_green_function_ref_put(green)); OK(sdis_estimator_ref_put(estimator)); printf("\n"); diff --git a/src/test_sdis_convection_non_uniform.c b/src/test_sdis_convection_non_uniform.c @@ -320,15 +320,13 @@ main(int argc, char** argv) printf("#failures = %lu/%lu\n", (unsigned long)nfails,(unsigned long)N); CHK(eq_eps(T.E, ref, T.SE * 3)); - if(IS_INF(time)) { /* Check green function */ - OK(sdis_solve_probe_green_function(box_scn, &solve_args, &green)); - OK(sdis_green_function_solve(green, &estimator2)); - check_green_function(green); - check_estimator_eq(estimator, estimator2); - check_green_serialization(green, box_scn); - OK(sdis_estimator_ref_put(estimator2)); - OK(sdis_green_function_ref_put(green)); - } + OK(sdis_solve_probe_green_function(box_scn, &solve_args, &green)); + OK(sdis_green_function_solve(green, &estimator2)); + check_green_function(green); + check_estimator_eq(estimator, estimator2); + check_green_serialization(green, box_scn); + OK(sdis_estimator_ref_put(estimator2)); + OK(sdis_green_function_ref_put(green)); OK(sdis_estimator_ref_put(estimator)); printf("\n"); @@ -361,15 +359,13 @@ main(int argc, char** argv) printf("#failures = %lu/%lu\n", (unsigned long)nfails,(unsigned long)N); CHK(eq_eps(T.E, ref, T.SE * 3)); - if(IS_INF(time)) { /* Check green function */ - OK(sdis_solve_probe_green_function(square_scn, &solve_args, &green)); - OK(sdis_green_function_solve(green, &estimator2)); - check_green_function(green); - check_estimator_eq(estimator, estimator2); - check_green_serialization(green, square_scn); - OK(sdis_estimator_ref_put(estimator2)); - OK(sdis_green_function_ref_put(green)); - } + OK(sdis_solve_probe_green_function(square_scn, &solve_args, &green)); + OK(sdis_green_function_solve(green, &estimator2)); + check_green_function(green); + check_estimator_eq(estimator, estimator2); + check_green_serialization(green, square_scn); + OK(sdis_estimator_ref_put(estimator2)); + OK(sdis_green_function_ref_put(green)); OK(sdis_estimator_ref_put(estimator)); printf("\n");