LAPACK  3.5.0
LAPACK: Linear Algebra PACKage
sisnan.f File Reference

Go to the source code of this file.

Functions/Subroutines

logical function sisnan (SIN)
 SISNAN tests input for NaN. More...
 

Function/Subroutine Documentation

logical function sisnan ( real  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.
Date
September 2012

Definition at line 61 of file sisnan.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  REAL sin
69 * ..
70 *
71 * =====================================================================
72 *
73 * .. External Functions ..
74  LOGICAL slaisnan
75  EXTERNAL slaisnan
76 * ..
77 * .. Executable Statements ..
78  sisnan = slaisnan(sin,sin)
79  RETURN
logical function slaisnan(SIN1, SIN2)
SLAISNAN tests input for NaN by comparing two arguments for inequality.
Definition: slaisnan.f:76
logical function sisnan(SIN)
SISNAN tests input for NaN.
Definition: sisnan.f:61