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

Go to the source code of this file.

Functions

float LAPACKE_slapy3 (float x, float y, float z)

Function Documentation

◆ LAPACKE_slapy3()

float LAPACKE_slapy3 ( float x,
float y,
float z )

Definition at line 35 of file lapacke_slapy3.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( 1, &x, 1 ) ) {
41 return -1;
42 }
43 if( LAPACKE_s_nancheck( 1, &y, 1 ) ) {
44 return -2;
45 }
46 if( LAPACKE_s_nancheck( 1, &z, 1 ) ) {
47 return -3;
48 }
49 }
50#endif
51 return LAPACKE_slapy3_work( x, y, z );
52}
float LAPACKE_slapy3_work(float x, float y, float z)
int LAPACKE_get_nancheck(void)
lapack_logical LAPACKE_s_nancheck(lapack_int n, const float *x, lapack_int incx)