--- rpl/lapack/lapack/dlaisnan.f 2010/12/21 13:53:29 1.8 +++ rpl/lapack/lapack/dlaisnan.f 2011/11/21 20:42:55 1.9 @@ -1,38 +1,87 @@ - LOGICAL FUNCTION DLAISNAN( DIN1, DIN2 ) +*> \brief \b DLAISNAN * -* -- LAPACK auxiliary routine (version 3.2.2) -- -* -- LAPACK is a software package provided by Univ. of Tennessee, -- -* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* June 2010 +* =========== DOCUMENTATION =========== * -* .. Scalar Arguments .. - DOUBLE PRECISION DIN1, DIN2 -* .. +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ * -* Purpose -* ======= +*> \htmlonly +*> Download DLAISNAN + dependencies +*> +*> [TGZ] +*> +*> [ZIP] +*> +*> [TXT] +*> \endhtmlonly +* +* Definition: +* =========== +* +* LOGICAL FUNCTION DLAISNAN( DIN1, DIN2 ) +* +* .. Scalar Arguments .. +* DOUBLE PRECISION DIN1, DIN2 +* .. +* +* +*> \par Purpose: +* ============= +*> +*> \verbatim +*> +*> This routine is not for general use. It exists solely to avoid +*> over-optimization in DISNAN. +*> +*> DLAISNAN 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 +*> arguments. +*> +*> 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. +*> \endverbatim +* +* Arguments: +* ========== +* +*> \param[in] DIN1 +*> \verbatim +*> DIN1 is DOUBLE PRECISION +*> \endverbatim +*> +*> \param[in] DIN2 +*> \verbatim +*> DIN2 is DOUBLE PRECISION +*> Two numbers to compare for inequality. +*> \endverbatim +* +* Authors: +* ======== +* +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. * -* This routine is not for general use. It exists solely to avoid -* over-optimization in DISNAN. +*> \date November 2011 * -* DLAISNAN 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 -* arguments. -* -* 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. +*> \ingroup auxOTHERauxiliary * -* Arguments -* ========= +* ===================================================================== + LOGICAL FUNCTION DLAISNAN( DIN1, DIN2 ) * -* DIN1 (input) DOUBLE PRECISION +* -- LAPACK auxiliary routine (version 3.4.0) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* November 2011 * -* DIN2 (input) DOUBLE PRECISION -* Two numbers to compare for inequality. +* .. Scalar Arguments .. + DOUBLE PRECISION DIN1, DIN2 +* .. * * ===================================================================== *