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

Go to the source code of this file.

Functions

double LAPACKE_dlapy3 (double x, double y, double z)

Function Documentation

◆ LAPACKE_dlapy3()

double LAPACKE_dlapy3 ( double x,
double y,
double z )

Definition at line 35 of file lapacke_dlapy3.c.

36{
37#ifndef LAPACK_DISABLE_NAN_CHECK
38 if( LAPACKE_get_nancheck() ) {
39 /* Optionally check input matrices for NaNs */
40 if( LAPACKE_d_nancheck( 1, &x, 1 ) ) {
41 return -1;
42 }
43 if( LAPACKE_d_nancheck( 1, &y, 1 ) ) {
44 return -2;
45 }
46 if( LAPACKE_d_nancheck( 1, &z, 1 ) ) {
47 return -3;
48 }
49 }
50#endif
51 return LAPACKE_dlapy3_work( x, y, z );
52}
int LAPACKE_get_nancheck(void)
double LAPACKE_dlapy3_work(double x, double y, double z)
lapack_logical LAPACKE_d_nancheck(lapack_int n, const double *x, lapack_int incx)