#include "cblas.h"
#include "cblas_f77.h"
Go to the source code of this file.
◆ F77_DI
◆ F77_incX
◆ F77_N
◆ F77_TA
◆ F77_UL
◆ cblas_ctpsv()
Definition at line 10 of file cblas_ctpsv.c.
31 float *st=0, *x=(
float*)X;
43 cblas_xerbla(2,
"cblas_ctpsv",
"Illegal Uplo setting, %d\n", Uplo);
53 cblas_xerbla(3,
"cblas_ctpsv",
"Illegal TransA setting, %d\n", TransA);
62 cblas_xerbla(4,
"cblas_ctpsv",
"Illegal Diag setting, %d\n", Diag);
81 cblas_xerbla(2,
"cblas_ctpsv",
"Illegal Uplo setting, %d\n", Uplo);
117 cblas_xerbla(3,
"cblas_ctpsv",
"Illegal TransA setting, %d\n", TransA);
127 cblas_xerbla(4,
"cblas_ctpsv",
"Illegal Diag setting, %d\n", Diag);
void cblas_xerbla(int p, const char *rout, const char *form,...)
void F77_ctpsv(FCHAR, FCHAR, FCHAR, FINT, const void *, void *, FINT)
FTensor::Index< 'i', 3 > i