diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/pr_p_gradient_check.c | 4 | ||||
| -rw-r--r-- | tests/prediction_gradient_check.c | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/tests/pr_p_gradient_check.c b/tests/pr_p_gradient_check.c index 1ae7b049..17709741 100644 --- a/tests/pr_p_gradient_check.c +++ b/tests/pr_p_gradient_check.c @@ -320,12 +320,12 @@ static double test_gradients(Crystal *cr, double incr_val, int refine, vec2[n_line] = grad; n_line++; - if ( (fabs(cgrad) < 5e-8) && (fabs(grad) < 5e-8) ) { + if ( (fabsl(cgrad) < 5e-8) && (fabsl(grad) < 5e-8) ) { n_small++; continue; } - total += fabs(cgrad - grad); + total += fabsl(cgrad - grad); ntot++; if ( !within_tolerance(grad, cgrad, 5.0) diff --git a/tests/prediction_gradient_check.c b/tests/prediction_gradient_check.c index c5d4206b..0ab8a2ec 100644 --- a/tests/prediction_gradient_check.c +++ b/tests/prediction_gradient_check.c @@ -326,12 +326,12 @@ static double test_gradients(Crystal *cr, double incr_val, int refine, vec2[n_line] = grad; n_line++; - if ( (fabs(cgrad) < 5e-12) && (fabs(grad) < 5e-12) ) { + if ( (fabsl(cgrad) < 5e-12) && (fabsl(grad) < 5e-12) ) { n_small++; continue; } - total += fabs(cgrad - grad); + total += fabsl(cgrad - grad); ntot++; if ( !within_tolerance(grad, cgrad, 5.0) |