CALL DGEMV

(TRANSA, M, N, DALPHA, DA, LDA, DX, INCX, DBETA, DY,
INCY)

CALL SGEMV

(TRANSA, M, N, SALPHA, SA, LDA, SX, INCX, SBETA, SY,
INCY)

CALL ZGEMV

(TRANSA, M, N, ZALPHA, ZA, LDA, ZX, INCX, ZBETA, ZY,
INCY)

CALL CGEMV

(TRANSA, M, N, CALPHA, CA, LDA, CX, INCX, CBETA, CY,
INCY)



void dgemv

(char trans, int m, int n, double dalpha, double *da,
int lda, double *dx, int incx, double dbeta, double
*dy, int incy)

void sgemv

(char trans, int m, int n, float salpha, float *sa, int
lda, float *sx, int incx, float sbeta, float *sy, int
incy)

void zgemv

(char trans, int m, int n, doublecomplex *zalpha,
doublecomplex *za, int lda, doublecomplex *zx, int
incx, doublecomplex *zbeta, doublecomplex *zy, int
incy)

void cgemv

(char trans, int m, int n, complex *calpha, complex
*ca, int lda, complex *cx, int incx, complex *cbeta,
complex *cy, int incy)
