LAPACK 3.11.0
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches

◆ LAPACKE_slarfg()

lapack_int LAPACKE_slarfg ( lapack_int  n,
float *  alpha,
float *  x,
lapack_int  incx,
float *  tau 
)

Definition at line 35 of file lapacke_slarfg.c.

37{
38#ifndef LAPACK_DISABLE_NAN_CHECK
39 if( LAPACKE_get_nancheck() ) {
40 /* Optionally check input matrices for NaNs */
41 if( LAPACKE_s_nancheck( 1, alpha, 1 ) ) {
42 return -2;
43 }
44 if( LAPACKE_s_nancheck( n-1, x, incx ) ) {
45 return -3;
46 }
47 }
48#endif
49 return LAPACKE_slarfg_work( n, alpha, x, incx, tau );
50}
lapack_int LAPACKE_slarfg_work(lapack_int n, float *alpha, float *x, lapack_int incx, float *tau)
int LAPACKE_get_nancheck(void)
lapack_logical LAPACKE_s_nancheck(lapack_int n, const float *x, lapack_int incx)
Here is the call graph for this function: