From bcf08b95ab6daa7ac7bffe1449fa8a11cad2a02a Mon Sep 17 00:00:00 2001 From: cnlohr Date: Sat, 17 Mar 2018 02:28:11 -0400 Subject: Get closer to functional. --- redist/dclhelpers.h | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) (limited to 'redist/dclhelpers.h') 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 -- cgit v1.2.3