LAPACK  3.5.0
LAPACK: Linear Algebra PACKage
 All Classes Files Functions Variables Typedefs Macros
lapacke_cgb_nancheck.c File Reference
#include "lapacke_utils.h"
Include dependency graph for lapacke_cgb_nancheck.c:

Go to the source code of this file.

Functions/Subroutines

lapack_logical LAPACKE_cgb_nancheck (int matrix_order, lapack_int m, lapack_int n, lapack_int kl, lapack_int ku, const lapack_complex_float *ab, lapack_int ldab)

Function/Subroutine Documentation

lapack_logical LAPACKE_cgb_nancheck ( int  matrix_order,
lapack_int  m,
lapack_int  n,
lapack_int  kl,
lapack_int  ku,
const lapack_complex_float ab,
lapack_int  ldab 
)

Definition at line 37 of file lapacke_cgb_nancheck.c.

{
if( ab == NULL ) return (lapack_logical) 0;
if( matrix_order == LAPACK_COL_MAJOR ) {
for( j = 0; j < n; j++ ) {
for( i = MAX( ku-j, 0 ); i < MIN3( ldab, m+ku-j, kl+ku+1 );
i++ ) {
if( LAPACK_CISNAN( ab[i+(size_t)j*ldab] ) )
return (lapack_logical) 1;
}
}
} else if ( matrix_order == LAPACK_ROW_MAJOR ) {
for( j = 0; j < MIN( n, ldab ); j++ ) {
for( i = MAX( ku-j, 0 ); i < MIN( m+ku-j, kl+ku+1 ); i++ ) {
if( LAPACK_CISNAN( ab[(size_t)i*ldab+j] ) )
return (lapack_logical) 1;
}
}
}
return (lapack_logical) 0;
}

Here is the caller graph for this function: