Return to ilaver.f CVS log

Up to [local] / rpl / lapack / lapack

Mise à jour de Lapack.

    1: *> \brief \b ILAVER returns the LAPACK version.
    2: **
    3: *  =========== DOCUMENTATION ===========
    4: *
    5: * Online html documentation available at
    6: *            http://www.netlib.org/lapack/explore-html/
    7: *
    8: *  Definition:
    9: *  ===========
   10: *
   11: *     SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
   12: *
   13: *     INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH
   14: *
   15: *
   16: *> \par Purpose:
   17: *  =============
   18: *>
   19: *> \verbatim
   20: *>
   21: *>  This subroutine returns the LAPACK version.
   22: *> \endverbatim
   23: *
   24: *  Arguments:
   25: *  ==========
   26: *
   27: *>  \param[out] VERS_MAJOR
   28: *>      VERS_MAJOR is INTEGER
   29: *>      return the lapack major version
   30: *>
   31: *>  \param[out] VERS_MINOR
   32: *>      VERS_MINOR is INTEGER
   33: *>      return the lapack minor version from the major version
   34: *>
   35: *>  \param[out] VERS_PATCH
   36: *>      VERS_PATCH is INTEGER
   37: *>      return the lapack patch version from the minor version
   38: *
   39: *  Authors:
   40: *  ========
   41: *
   42: *> \author Univ. of Tennessee
   43: *> \author Univ. of California Berkeley
   44: *> \author Univ. of Colorado Denver
   45: *> \author NAG Ltd.
   46: *
   47: *> \date November 2019
   48: *
   49: *> \ingroup auxOTHERauxiliary
   50: *
   51: *  =====================================================================
   52:       SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
   53: *
   54: *  -- LAPACK computational routine --
   55: *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
   56: *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
   57: *
   58: *  =====================================================================
   59: *
   60:       INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH
   61: *  =====================================================================
   62:       VERS_MAJOR = 3
   63:       VERS_MINOR = 9
   64:       VERS_PATCH = 0
   65: *  =====================================================================
   66: *
   67:       RETURN
   68:       END