File:  [local] / rpl / lapack / lapack / ilaver.f
Revision 1.20: download - view: text, annotated - select for diffs - revision graph
Sat Aug 27 15:34:43 2016 UTC (7 years, 8 months ago) by bertrand
Branches: MAIN
CVS tags: rpl-4_1_25, HEAD
Cohérence 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: *>      return the lapack major version
   29: *>
   30: *>  \param[out] VERS_MINOR
   31: *>      return the lapack minor version from the major version
   32: *>
   33: *>  \param[out] VERS_PATCH
   34: *>      return the lapack patch version from the minor version
   35: *
   36: *  Authors:
   37: *  ========
   38: *
   39: *> \author Univ. of Tennessee 
   40: *> \author Univ. of California Berkeley 
   41: *> \author Univ. of Colorado Denver 
   42: *> \author NAG Ltd. 
   43: *
   44: *> \date November 2015
   45: *
   46: *> \ingroup auxOTHERauxiliary
   47: *
   48: *  =====================================================================
   49:       SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
   50: *
   51: *  -- LAPACK computational routine (version 3.6.0) --
   52: *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
   53: *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
   54: *     November 2015
   55: *
   56: *  =====================================================================
   57: *
   58:       INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH
   59: *  =====================================================================
   60:       VERS_MAJOR = 3
   61:       VERS_MINOR = 6
   62:       VERS_PATCH = 0
   63: *  =====================================================================
   64: *
   65:       RETURN
   66:       END

CVSweb interface <joel.bertrand@systella.fr>