Displaying 1 result from an estimated 1 matches for "bm_vec".
Did you mean:
b_vec
2009 Jun 12
1
Can't get F77_CALL(dgemm) to work [SEC=UNCLASSIFIED]
...#include <stdio.h>
#include <R_ext/Lapack.h>
#include <R_ext/Applic.h>
#include "math.h"
#define BLAS_H
#include "MPQL.h"
#include <R_ext/PrtUtil.h>
void MPQL(int *iterations) {
double **Am;
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...