LAPACK
3.10.1
LAPACK: Linear Algebra PACKage
◆
cblas_isamax()
CBLAS_INDEX
cblas_isamax
(
const
CBLAS_INT
N
,
const float *
X
,
const
CBLAS_INT
incX
)
Definition at line
12
of file
cblas_isamax.c
.
13
{
14
#ifdef F77_INT
15
F77_INT
F77_N
=
N
,
F77_incX
=incX, F77_iamax;
16
#else
17
#define F77_N N
18
#define F77_incX incX
19
CBLAS_INT
F77_iamax;
20
#endif
21
F77_isamax_sub
( &
F77_N
, X, &
F77_incX
, &F77_iamax );
22
return
( F77_iamax > 0 )
23
? (
CBLAS_INDEX
)( F77_iamax-1 )
24
: (
CBLAS_INDEX
) 0;
25
}
CBLAS_INDEX
#define CBLAS_INDEX
Definition:
cblas.h:14
CBLAS_INT
#define CBLAS_INT
Definition:
cblas.h:23
F77_isamax_sub
#define F77_isamax_sub(...)
Definition:
cblas_f77.h:217
F77_INT
#define F77_INT
Definition:
cblas_f77.h:32
F77_incX
#define F77_incX
F77_N
#define F77_N
N
#define N
Definition:
example_user.c:10
Here is the caller graph for this function:
CBLAS
src
cblas_isamax.c
Generated on Tue Apr 12 2022 14:48:57 for LAPACK by
1.9.1