Displaying 1 result from an estimated 1 matches for "rows_c".
Did you mean:
rows_a
2009 Jun 12
1
Can't get F77_CALL(dgemm) to work [SEC=UNCLASSIFIED]
...double *Am_vec;
double **Bm;
double *Bm_vec;
double **Cm;
double *Cm_vec;
double one = 1.0;
double zero = 0.0;
int j, r, c;
int rows_A =5;
int cols_A =4;
int rows_B =4;
int cols_B =3;
int rows_C =5;
int cols_C =3;
Am = Calloc(rows_A,double *);
Am_vec = Calloc(rows_A*cols_A,double);
Bm = Calloc(rows_B,double *);
Bm_vec = Calloc(rows_B*cols_B,double);
Cm = Calloc(rows_C,double *);
Cm_vec = Calloc(rows_C*cols_C,double);
for (j...