diff options
-rw-r--r-- | libcrystfel/src/utils.c | 12 | ||||
-rw-r--r-- | libcrystfel/src/utils.h | 1 |
2 files changed, 13 insertions, 0 deletions
diff --git a/libcrystfel/src/utils.c b/libcrystfel/src/utils.c index b69a816d..ae423eed 100644 --- a/libcrystfel/src/utils.c +++ b/libcrystfel/src/utils.c @@ -97,6 +97,18 @@ void show_matrix(gsl_matrix *M) } +void show_vector(gsl_vector *v) +{ + int i; + + for ( i=0; i<v->size; i++ ) { + STATUS("[ "); + STATUS("%+9.3e ", gsl_vector_get(v, i)); + STATUS("]\n"); + } +} + + static int check_eigen(gsl_vector *e_val, int verbose) { int i; diff --git a/libcrystfel/src/utils.h b/libcrystfel/src/utils.h index 9683039e..82a9aa1c 100644 --- a/libcrystfel/src/utils.h +++ b/libcrystfel/src/utils.h @@ -74,6 +74,7 @@ extern "C" { extern void show_matrix_eqn(gsl_matrix *M, gsl_vector *v); extern void show_matrix(gsl_matrix *M); +extern void show_vector(gsl_vector *M); extern gsl_vector *solve_svd(gsl_vector *v, gsl_matrix *M, int *n_filt, int verbose); |