index b1a22ef6c1d1abaf66eb5c74984a617c6cfec64c..cc0550e7ccdbe5143a3715cea4f39938197bfbd7 100644 (file)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
* THE POSSIBILITY OF SUCH DAMAGE.
*****************************************************************************/
+/******************************************************************************
+* FILE: dgemm_test.c
+* Purpose: to test BLAS function DGEMM.
+*
+* DGEMM performs one of the matrix-matrix operations
+*
+* C := alpha*op( A )*op( B ) + beta*C,
+*
+* where op( X ) is one of
+*
+* op( X ) = X or op( X ) = X**T,
+*
+* alpha and beta are scalars, and A, B and C are matrices, with op(A)
+* an m by k matrix, op(B) a k by n matrix and C an m by n matrix.
+******************************************************************************/
#include <stdlib.h>
#include <stdio.h>
#include <math.h>
#include <time.h>
+#include <CL/cl_ext.h>
#include "cblas.h"
#ifdef __cplusplus