--- rpl/lapack/lapack/ilaver.f 2010/08/07 13:22:29 1.6 +++ rpl/lapack/lapack/ilaver.f 2018/05/29 06:55:22 1.23 @@ -1,33 +1,65 @@ - SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH ) -* -* -- LAPACK routine (version 3.2.2) -- +*> \brief \b ILAVER returns the LAPACK version. +** +* =========== DOCUMENTATION =========== * -* -- June 2010 -- +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ * -* -- LAPACK is a software package provided by Univ. of Tennessee, -- -* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* .. +* Definition: +* =========== +* +* SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH ) +* +* INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH +* +* +*> \par Purpose: +* ============= +*> +*> \verbatim +*> +*> This subroutine returns the LAPACK version. +*> \endverbatim +* +* Arguments: +* ========== +* +*> \param[out] VERS_MAJOR +*> return the lapack major version +*> +*> \param[out] VERS_MINOR +*> return the lapack minor version from the major version +*> +*> \param[out] VERS_PATCH +*> return the lapack patch version from the minor version * -* Purpose -* ======= +* Authors: +* ======== * -* This subroutine return the Lapack version. +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. +* +*> \date June 2017 +* +*> \ingroup auxOTHERauxiliary +* +* ===================================================================== + SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH ) +* +* -- LAPACK computational routine (version 3.7.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* June 2017 * -* Arguments -* ========= -* VERS_MAJOR (output) INTEGER -* return the lapack major version -* VERS_MINOR (output) INTEGER -* return the lapack minor version from the major version -* VERS_PATCH (output) INTEGER -* return the lapack patch version from the minor version * ===================================================================== * INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH * ===================================================================== VERS_MAJOR = 3 - VERS_MINOR = 2 - VERS_PATCH = 2 + VERS_MINOR = 8 + VERS_PATCH = 0 * ===================================================================== * RETURN