From 099e243acdb59d19395786b15e7ea3228a413b04 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Wed, 31 Jul 2013 17:08:07 +0200 Subject: Flag crystals as "not refined" if SVD fails --- src/post-refinement.c | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src') diff --git a/src/post-refinement.c b/src/post-refinement.c index b1d99c86..041f3a00 100644 --- a/src/post-refinement.c +++ b/src/post-refinement.c @@ -395,6 +395,7 @@ static gsl_vector *solve_svd(gsl_vector *v, gsl_matrix *M) gsl_vector_free(s_val); gsl_matrix_free(SAS); gsl_matrix_free(S); + crystal_set_user_flag(cr, 1); return NULL; } /* "SAS" is now "U" */ @@ -418,6 +419,7 @@ static gsl_vector *solve_svd(gsl_vector *v, gsl_matrix *M) ERROR("Matrix solution failed: %s\n", gsl_strerror(err)); gsl_matrix_free(S); gsl_vector_free(SinvX); + crystal_set_user_flag(cr, 1); return NULL; } -- cgit v1.2.3