Annotation of rpl/lapack/lapack/ilaver.f, revision 1.26
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.23 bertrand 47: *> \ingroup auxOTHERauxiliary
1.11 bertrand 48: *
49: * =====================================================================
1.1 bertrand 50: SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
51: *
1.25 bertrand 52: * -- LAPACK computational routine --
1.1 bertrand 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
1.26 ! bertrand 61: VERS_MINOR = 11
1.17 bertrand 62: VERS_PATCH = 0
1.1 bertrand 63: * =====================================================================
64: *
65: RETURN
66: END
CVSweb interface <joel.bertrand@systella.fr>