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
CVSweb interface <joel.bertrand@systella.fr>