version 1.10, 2020/05/21 21:46:03
|
version 1.11, 2023/08/07 08:39:14
|
Line 61
|
Line 61
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date December 2016 |
|
* |
|
*> \ingroup auxOTHERauxiliary |
*> \ingroup auxOTHERauxiliary |
* |
* |
* ===================================================================== |
* ===================================================================== |
REAL FUNCTION SLAMCH( CMACH ) |
REAL FUNCTION SLAMCH( CMACH ) |
* |
* |
* -- LAPACK auxiliary routine (version 3.7.0) -- |
* -- LAPACK auxiliary routine -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* December 2016 |
|
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
CHARACTER CMACH |
CHARACTER CMACH |
Line 156
|
Line 153
|
*> might hold one of these in a register. |
*> might hold one of these in a register. |
*> \endverbatim |
*> \endverbatim |
*> \author LAPACK is a software package provided by Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. |
*> \author LAPACK is a software package provided by Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. |
*> \date December 2016 |
|
*> \ingroup auxOTHERauxiliary |
*> \ingroup auxOTHERauxiliary |
*> |
*> |
*> \param[in] A |
*> \param[in] A |
Line 171
|
Line 167
|
* |
* |
REAL FUNCTION SLAMC3( A, B ) |
REAL FUNCTION SLAMC3( A, B ) |
* |
* |
* -- LAPACK auxiliary routine (version 3.7.0) -- |
* -- LAPACK auxiliary routine -- |
* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. |
* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. |
* November 2010 |
|
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
REAL A, B |
REAL A, B |