Annotation of rpl/lapack/lapack/ilaver.f, revision 1.25
1.11 bertrand 1: *> \brief \b ILAVER returns the LAPACK version.
2: **
3: * =========== DOCUMENTATION ===========
4: *
1.21 bertrand 5: * Online html documentation available at
6: * http://www.netlib.org/lapack/explore-html/
1.11 bertrand 7: *
8: * Definition:
9: * ===========
10: *
11: * SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
12: *
13: * INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH
1.21 bertrand 14: *
1.11 bertrand 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
1.25 ! bertrand 28: *> VERS_MAJOR is INTEGER
1.11 bertrand 29: *> return the lapack major version
30: *>
31: *> \param[out] VERS_MINOR
1.25 ! bertrand 32: *> VERS_MINOR is INTEGER
1.11 bertrand 33: *> return the lapack minor version from the major version
34: *>
35: *> \param[out] VERS_PATCH
1.25 ! bertrand 36: *> VERS_PATCH is INTEGER
1.11 bertrand 37: *> return the lapack patch version from the minor version
38: *
39: * Authors:
40: * ========
41: *
1.21 bertrand 42: *> \author Univ. of Tennessee
43: *> \author Univ. of California Berkeley
44: *> \author Univ. of Colorado Denver
45: *> \author NAG Ltd.
1.11 bertrand 46: *
1.25 ! bertrand 47: *> \date November 2019
1.11 bertrand 48: *
1.23 bertrand 49: *> \ingroup auxOTHERauxiliary
1.11 bertrand 50: *
51: * =====================================================================
1.1 bertrand 52: SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
53: *
1.25 ! bertrand 54: * -- LAPACK computational routine --
1.1 bertrand 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
1.25 ! bertrand 63: VERS_MINOR = 9
1.17 bertrand 64: VERS_PATCH = 0
1.1 bertrand 65: * =====================================================================
66: *
67: RETURN
68: END
CVSweb interface <joel.bertrand@systella.fr>