| 485 | cgbmv_( &trans, &m, &n, &kl, &ku, alpha, a, &inca, x, &incx, beta, y, &incy ); |
| 486 | } |
| 487 | void |
| 488 | zgbmv(char trans, int m, int n, int kl, int ku, doublecomplex *alpha, doublecomplex *a, int inca, doublecomplex *x, int incx, doublecomplex *beta, doublecomplex *y, int incy ) |
| 489 | { |
| 490 | zgbmv_( &trans, &m, &n, &kl, &ku, alpha, a, &inca, x, &incx, beta, y, &incy ); |
| 491 | } |
| 492 | |
| 493 | void |
| 494 | stbmv(char uplo, char trans, char diag, int n, int k, float *a, int lda, float *x, int incx ) |