9 void rmmult(
double *rm,
double *a,
double *
b,
int n,
int m,
int l)
11 double z, *q0, *p, *q;
15 q0 = (
double *)calloc(m,
sizeof(
double));
16 for (i = 0; i <
l; ++i, ++rm) {
17 for (k = 0, p = b + i; k < m; p +=
l)
19 for (j = 0, p = a, q = rm; j < n; ++j, q +=
l) {
20 for (k = 0, z = 0.; k < m;)
void rmmult(double *rm, double *a, double *b, int n, int m, int l)