| 227 | } |
| 228 | |
| 229 | void |
| 230 | ztrsv(char uplo, char transa, char diag, int n, doublecomplex *a, int lda, doublecomplex *x, int incx) |
| 231 | { |
| 232 | ztrsv_( &uplo, &transa, &diag, &n, a, &lda, x, &incx); |
| 233 | } |
| 234 | |
| 235 | void |
| 236 | ssymm(char side, char uplo, int m, int n, float alpha, float *a, int lda, float *b, int ldb, float beta, float *c, int ldc) |