This commit is contained in:
Radovan Bast
2015-09-17 10:24:07 +02:00
parent 1fc6a7b355
commit 6017dbbfa6
6 changed files with 7 additions and 7 deletions

View File

@ -0,0 +1,36 @@
#include <stdio.h>
#include <stdlib.h>
#ifdef __APPLE__
#include "Accelerate/Accelerate.h"
#else
#include "cblas.h"
#endif
int main()
{
const int n = 10;
double a[n*n];
double b[n*n];
double c[n*n];
for (int i = 0; i < n*n; i++)
{
a[i] = 1.0;
b[i] = 2.0;
c[i] = 0.0;
}
cblas_dgemm(CblasColMajor, CblasNoTrans, CblasNoTrans, n, n, n, 1.0, a, n, b, n, 0.0, c, n);
bool passed = true;
for (int i = 0; i < n*n; i++)
{
if (abs(c[i]) - 20.00 > 0.0) passed = false;
}
if (passed) printf("PASSED");
return 0;
}