LAPACK  3.6.1
LAPACK: Linear Algebra PACKage
logical function slaisnan ( real  SIN1,
real  SIN2 

SLAISNAN tests input for NaN by comparing two arguments for inequality.

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

 This routine is not for general use.  It exists solely to avoid
 over-optimization in SISNAN.

 SLAISNAN checks for NaNs by comparing its two arguments for
 inequality.  NaN is the only floating-point value where NaN != NaN
 returns .TRUE.  To check for NaNs, pass the same variable as both

 A compiler must assume that the two arguments are
 not the same variable, and the test will not be optimized away.
 Interprocedural or whole-program optimization may delete this
 test.  The ISNAN functions will be replaced by the correct
 Fortran 03 intrinsic once the intrinsic is widely available.
          SIN1 is REAL
          SIN2 is REAL
          Two numbers to compare for inequality.
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
September 2012

Definition at line 76 of file slaisnan.f.

76 *
77 * -- LAPACK auxiliary routine (version 3.4.2) --
78 * -- LAPACK is a software package provided by Univ. of Tennessee, --
79 * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
80 * September 2012
81 *
82 * .. Scalar Arguments ..
83  REAL sin1, sin2
84 * ..
85 *
86 * =====================================================================
87 *
88 * .. Executable Statements ..
89  slaisnan = (sin1.NE.sin2)
logical function slaisnan(SIN1, SIN2)
SLAISNAN tests input for NaN by comparing two arguments for inequality.
Definition: slaisnan.f:76