Return to ilaver.f CVS log

Up to [local] / rpl / lapack / lapack

Première mise à jour de lapack et blas.

    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: *> \ingroup auxOTHERauxiliary
   48: *
   49: *  =====================================================================
   50:       SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
   51: *
   52: *  -- LAPACK computational routine --
   53: *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
   54: *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
   55: *
   56: *  =====================================================================
   57: *
   58:       INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH
   59: *  =====================================================================
   60:       VERS_MAJOR = 3
   61:       VERS_MINOR = 11
   62:       VERS_PATCH = 0
   63: *  =====================================================================
   64: *
   65:       RETURN
   66:       END