diff options
| author | Thomas White <taw@physics.org> | 2011-02-03 12:03:43 +0100 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2012-02-22 15:27:13 +0100 |
| commit | 7198ffd1070a0bd9bca88ae1384aef0e562482a4 (patch) | |
| tree | 2546168fe0cdaed04ce56caed245509011b82c81 /src/hrs-scaling.c | |
| parent | 4398834ad2897c83987d8537ea305d84f6d7b64c (diff) | |
Move show_matrix_eqn() to utils.c
Diffstat (limited to 'src/hrs-scaling.c')
| -rw-r--r-- | src/hrs-scaling.c | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/src/hrs-scaling.c b/src/hrs-scaling.c index c0308483..0b0b700a 100644 --- a/src/hrs-scaling.c +++ b/src/hrs-scaling.c @@ -27,23 +27,12 @@ #include "symmetry.h" #include "geometry.h" #include "cell.h" +#include "utils.h" /* Maximum number of iterations of NLSq scaling per macrocycle. */ #define MAX_CYCLES (30) -static void show_matrix_eqn(gsl_matrix *M, gsl_vector *v, int r) -{ - int i, j; - - for ( i=0; i<r; i++ ) { - STATUS("[ "); - for ( j=0; j<r; j++ ) { - STATUS("%+9.3e ", gsl_matrix_get(M, i, j)); - } - STATUS("][ a%2i ] = [ %+9.3e ]\n", i, gsl_vector_get(v, i)); - } -} static double s_uha(signed int hat, signed int kat, signed int lat, struct image *images, int n, const char *sym, int a) |