diff options
author | cnlohr <lohr85@gmail.com> | 2018-03-17 02:28:11 -0400 |
---|---|---|
committer | cnlohr <lohr85@gmail.com> | 2018-03-17 02:28:11 -0400 |
commit | bcf08b95ab6daa7ac7bffe1449fa8a11cad2a02a (patch) | |
tree | 6c3055ff0a97763de32386bac2b3e88160252a52 /redist/dclhelpers.h | |
parent | 9bd8c4c5ed38d186c04ea318722ca54b2f9c8ea1 (diff) | |
download | libsurvive-bcf08b95ab6daa7ac7bffe1449fa8a11cad2a02a.tar.gz libsurvive-bcf08b95ab6daa7ac7bffe1449fa8a11cad2a02a.tar.bz2 |
Get closer to functional.
Diffstat (limited to 'redist/dclhelpers.h')
-rw-r--r-- | redist/dclhelpers.h | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/redist/dclhelpers.h b/redist/dclhelpers.h index fd86c78..fd4e02d 100644 --- a/redist/dclhelpers.h +++ b/redist/dclhelpers.h @@ -57,5 +57,29 @@ void dclMulAdd( DCL_FLOAT * R, const DCL_FLOAT * A, const DCL_FLOAT * B, const D R (n by p) */ void dclGMulAdd( DCL_FLOAT * R, const DCL_FLOAT * A, const DCL_FLOAT * B, const DCL_FLOAT * C, DCL_FLOAT alpha, DCL_FLOAT beta, int n, int m, int p ); + +/******************************** + * Auxiliary functionality in C * + ********************************/ + +//Matches dgemm from lapack. +void dcldgemm( + char transA, + char transB, + int m, + int n, + int k, + DCL_FLOAT alpha, + const DCL_FLOAT* A, + int lda, //must be n + const DCL_FLOAT* B, + int ldb, //must be m + DCL_FLOAT beta, + const DCL_FLOAT * C, + int ldc //must be n + ); + + + #endif |