Return to ilaver.f CVS log

Up to [local] / rpl / lapack / lapack

Cohérence.

    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: *>  \verbatim
   29: *>      return the lapack major version
   30: *>  \endverbatim
   31: *>
   32: *>  \param[out] VERS_MINOR
   33: *>  \verbatim
   34: *>      return the lapack minor version from the major version
   35: *>  \endverbatim
   36: *>
   37: *>  \param[out] VERS_PATCH
   38: *>  \verbatim
   39: *>      return the lapack patch version from the minor version
   40: *>  \endverbatim
   41: *
   42: *  Authors:
   43: *  ========
   44: *
   45: *> \author Univ. of Tennessee
   46: *> \author Univ. of California Berkeley
   47: *> \author Univ. of Colorado Denver
   48: *> \author NAG Ltd.
   49: *
   50: *> \date December 2016
   51: *
   52: *> \ingroup OTHERauxiliary
   53: *
   54: *  =====================================================================
   55:       SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
   56: *
   57: *  -- LAPACK computational routine (version 3.7.0) --
   58: *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
   59: *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
   60: *     June 2016
   61: *
   62: *  =====================================================================
   63: *
   64:       INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH
   65: *  =====================================================================
   66:       VERS_MAJOR = 3
   67:       VERS_MINOR = 7
   68:       VERS_PATCH = 0
   69: *  =====================================================================
   70: *
   71:       RETURN
   72:       END