aboutsummaryrefslogtreecommitdiff
path: root/src/param.cpp
diff options
context:
space:
mode:
authorPjotr Prins2020-05-22 11:21:45 -0500
committerPjotr Prins2020-05-22 11:21:45 -0500
commitf1cd914e6f20c9a162e16d7283477c1b98d005d1 (patch)
tree0a23068f9b06525ded025450c209b3a1dcf94b38 /src/param.cpp
parent862ace03212ed17bdc1ab349bfab55543720a980 (diff)
parentb309569fe9497befa008ac2d2cbc04f2e861ce76 (diff)
downloadpangemma-f1cd914e6f20c9a162e16d7283477c1b98d005d1.tar.gz
Merge branch 'master' of github.com:genenetwork/GEMMA
Diffstat (limited to 'src/param.cpp')
-rw-r--r--src/param.cpp3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/param.cpp b/src/param.cpp
index de0c257..31b7382 100644
--- a/src/param.cpp
+++ b/src/param.cpp
@@ -39,6 +39,7 @@
#include "gemma_io.h"
#include "mathfunc.h"
#include "param.h"
+#include "fastblas.h"
using namespace std;
@@ -1412,7 +1413,7 @@ void compKtoV(const gsl_matrix *G, gsl_matrix *V) {
gsl_matrix_const_submatrix(G, 0, j * ni_test, ni_test, ni_test);
gsl_matrix_view KiKj_sub =
gsl_matrix_submatrix(KiKj, 0, t * ni_test, ni_test, ni_test);
- eigenlib_dgemm("N", "N", 1.0, &Ki.matrix, &Kj.matrix, 0.0,
+ fast_dgemm("N", "N", 1.0, &Ki.matrix, &Kj.matrix, 0.0,
&KiKj_sub.matrix);
t++;
}