LAPACK  3.6.1
LAPACK: Linear Algebra PACKage
logical function disnan ( double precision  DIN)

DISNAN tests input for NaN.

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

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

Definition at line 61 of file disnan.f.

61 *
62 * -- LAPACK auxiliary routine (version 3.4.2) --
63 * -- LAPACK is a software package provided by Univ. of Tennessee, --
64 * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
65 * September 2012
66 *
67 * .. Scalar Arguments ..
68  DOUBLE PRECISION din
69 * ..
70 *
71 * =====================================================================
72 *
73 * .. External Functions ..
74  LOGICAL dlaisnan
75  EXTERNAL dlaisnan
76 * ..
77 * .. Executable Statements ..
78  disnan = dlaisnan(din,din)
79  RETURN
logical function disnan(DIN)
DISNAN tests input for NaN.
Definition: disnan.f:61
logical function dlaisnan(DIN1, DIN2)
DLAISNAN tests input for NaN by comparing two arguments for inequality.
Definition: dlaisnan.f:76