diff options
author | Thomas White <taw@physics.org> | 2013-07-31 17:08:07 +0200 |
---|---|---|
committer | Thomas White <taw@physics.org> | 2013-07-31 17:09:36 +0200 |
commit | 099e243acdb59d19395786b15e7ea3228a413b04 (patch) | |
tree | 75bd55c56aaea5dc8f66edbf6079c35a985e1a7a /src | |
parent | bb98d82fdc16dff7374b19e572fe8a310136d34b (diff) |
Flag crystals as "not refined" if SVD fails
Diffstat (limited to 'src')
-rw-r--r-- | src/post-refinement.c | 2 |
1 files changed, 2 insertions, 0 deletions
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; } |