From b31a273b8191bd0688d1382168ce9ba3500e6604 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Fri, 15 Mar 2013 11:04:17 +0100 Subject: tests/pr_gradient_check: Fix criterion --- tests/pr_gradient_check.c | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) diff --git a/tests/pr_gradient_check.c b/tests/pr_gradient_check.c index c7b70563..68a625a7 100644 --- a/tests/pr_gradient_check.c +++ b/tests/pr_gradient_check.c @@ -459,51 +459,51 @@ int main(int argc, char *argv[]) incr_val = incr_frac * image.div; val = test_gradients(cr, incr_val, REF_DIV, "div", "div", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * crystal_get_profile_radius(cr); val = test_gradients(cr, incr_val, REF_R, "R", "R", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * ax; val = test_gradients(cr, incr_val, REF_ASX, "ax*", "x", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * bx; val = test_gradients(cr, incr_val, REF_BSX, "bx*", "x", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * cx; val = test_gradients(cr, incr_val, REF_CSX, "cx*", "x", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * ay; val = test_gradients(cr, incr_val, REF_ASY, "ay*", "y", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * by; val = test_gradients(cr, incr_val, REF_BSY, "by*", "y", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * cy; val = test_gradients(cr, incr_val, REF_CSY, "cy*", "y", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * az; val = test_gradients(cr, incr_val, REF_ASZ, "az*", "z", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * bz; val = test_gradients(cr, incr_val, REF_BSZ, "bz*", "z", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; incr_val = incr_frac * cz; val = test_gradients(cr, incr_val, REF_CSZ, "cz*", "z", pmodel, quiet, plot); - if ( val > 0.1 ) fail = 1; + if ( val < 0.99 ) fail = 1; } -- cgit v1.2.3