Displaying 1 result from an estimated 1 matches for "am_vec".
Did you mean:
a_vec
2009 Jun 12
1
Can't get F77_CALL(dgemm) to work [SEC=UNCLASSIFIED]
...rs
Daniel
C Code
#include <R.h>
#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;...