diff options
author | Thomas White <taw@physics.org> | 2013-07-31 16:57:41 +0200 |
---|---|---|
committer | Thomas White <taw@physics.org> | 2013-07-31 17:09:36 +0200 |
commit | 779e5ef54907a28ea5fdf5863faaf525b0063c24 (patch) | |
tree | 3e9830ba7f7519bd579d0f6becf70aa1eaf91101 /libcrystfel/src/cell.c | |
parent | b4972dfd829faad526d77c4650830341bde135cb (diff) |
Set C=0 for gsl_cblas_dgemm()
Diffstat (limited to 'libcrystfel/src/cell.c')
-rw-r--r-- | libcrystfel/src/cell.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libcrystfel/src/cell.c b/libcrystfel/src/cell.c index 11aa83fa..8c14cce4 100644 --- a/libcrystfel/src/cell.c +++ b/libcrystfel/src/cell.c @@ -718,7 +718,7 @@ UnitCell *cell_transform(UnitCell *cell, UnitCellTransformation *t) gsl_matrix_set(m, 2, 1, cy); gsl_matrix_set(m, 2, 2, cz); - gsl_blas_dgemm(CblasNoTrans, CblasNoTrans, 1.0, t->m, m, 1.0, a); + gsl_blas_dgemm(CblasNoTrans, CblasNoTrans, 1.0, t->m, m, 0.0, a); cell_set_cartesian(out, gsl_matrix_get(a, 0, 0), gsl_matrix_get(a, 0, 1), @@ -846,7 +846,7 @@ void tfn_combine(UnitCellTransformation *t, double *na, double *nb, double *nc) free(nb); free(nc); - gsl_blas_dgemm(CblasNoTrans, CblasNoTrans, 1.0, n, t->m, 1.0, a); + gsl_blas_dgemm(CblasNoTrans, CblasNoTrans, 1.0, n, t->m, 0.0, a); gsl_matrix_free(t->m); t->m = a; |