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

◆ sisnan()

logical function sisnan ( real, intent(in)  sin)

SISNAN tests input for NaN.

Download SISNAN + dependencies [TGZ] [ZIP] [TXT]

Purpose:
 SISNAN returns .TRUE. if its argument is NaN, and .FALSE.
 otherwise.  To be replaced by the Fortran 2003 intrinsic in the
 future.
Parameters
[in]SIN
          SIN is REAL
          Input to test for NaN.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.

Definition at line 58 of file sisnan.f.

59*
60* -- LAPACK auxiliary routine --
61* -- LAPACK is a software package provided by Univ. of Tennessee, --
62* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
63*
64* .. Scalar Arguments ..
65 REAL, INTENT(IN) :: SIN
66* ..
67*
68* =====================================================================
69*
70* .. External Functions ..
71 LOGICAL SLAISNAN
72 EXTERNAL slaisnan
73* ..
74* .. Executable Statements ..
75 sisnan = slaisnan(sin,sin)
76 RETURN
logical function sisnan(sin)
SISNAN tests input for NaN.
Definition sisnan.f:59
logical function slaisnan(x, y)
Definition la_xisnan.F90:28
Here is the call graph for this function:
Here is the caller graph for this function: