Commit 349ecc87 authored by Valentin Reis's avatar Valentin Reis

icc -> gcc

parent b6ccaaea
CC = icc
CFLAGS =-O1 -Wall -qopenmp -mkl=parallel
LDFLAGS =-qopenmp -lzmq -mkl=parallel -lgsl -lnrm -lmpi
#CC = icc
#CFLAGS =-O1 -Wall -qopenmp -mkl=parallel
#LDFLAGS =-qopenmp -lzmq -mkl=parallel -lgsl -lnrm -lmpi
CC = gcc
CFLAGS =-O1 -Wall -qopenmp
LDFLAGS =-qopenmp -lzmq -lgsl -lnrm -lmpi
BINS = dgemm randomwalk
......
......@@ -2,7 +2,7 @@
#include <stdio.h>
#include <stdlib.h>
#include "mkl.h"
/*#include "mkl.h"*/
#include <nrm.h>
#define min(x,y) (((x) < (y)) ? (x) : (y))
......@@ -17,9 +17,12 @@ int main()
m = 5000, k = 200, n = 5000;
alpha = 1.0; beta = 0.0;
A = (double *)mkl_malloc( m*k*sizeof( double ), 64 );
B = (double *)mkl_malloc( k*n*sizeof( double ), 64 );
C = (double *)mkl_malloc( m*n*sizeof( double ), 64 );
A = (double *)malloc( m*k*sizeof( double ), 64 );
B = (double *)malloc( k*n*sizeof( double ), 64 );
C = (double *)malloc( m*n*sizeof( double ), 64 );
/*A = (double *)mkl_malloc( m*k*sizeof( double ), 64 );*/
/*B = (double *)mkl_malloc( k*n*sizeof( double ), 64 );*/
/*C = (double *)mkl_malloc( m*n*sizeof( double ), 64 );*/
for (i = 0; i < (m*k); i++) {
A[i] = (double)(i+1);
......@@ -40,8 +43,8 @@ int main()
nrm_send_progress(&ctxt, 1);
}
nrm_fini(&ctxt);
mkl_free(A);
mkl_free(B);
mkl_free(C);
free(A);
free(B);
free(C);
return 0;
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment