OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
lapacke_cpttrf.c File Reference
#include "lapacke_utils.h"

Go to the source code of this file.

Functions

lapack_int LAPACKE_cpttrf (lapack_int n, float *d, lapack_complex_float *e)

Function Documentation

◆ LAPACKE_cpttrf()

lapack_int LAPACKE_cpttrf ( lapack_int n,
float * d,
lapack_complex_float * e )

Definition at line 35 of file lapacke_cpttrf.c.

36{
37#ifndef LAPACK_DISABLE_NAN_CHECK
38 if( LAPACKE_get_nancheck() ) {
39 /* Optionally check input matrices for NaNs */
40 if( LAPACKE_s_nancheck( n, d, 1 ) ) {
41 return -2;
42 }
43 if( LAPACKE_c_nancheck( n-1, e, 1 ) ) {
44 return -3;
45 }
46 }
47#endif
48 return LAPACKE_cpttrf_work( n, d, e );
49}
lapack_int LAPACKE_cpttrf_work(lapack_int n, float *d, lapack_complex_float *e)
int LAPACKE_get_nancheck(void)
lapack_logical LAPACKE_c_nancheck(lapack_int n, const lapack_complex_float *x, lapack_int incx)
lapack_logical LAPACKE_s_nancheck(lapack_int n, const float *x, lapack_int incx)
n