LAPACK  3.6.1
LAPACK: Linear Algebra PACKage
ilaver.f
Go to the documentation of this file.
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 June 2016
51 *
52 *> \ingroup auxOTHERauxiliary
53 *
54 * =====================================================================
55  SUBROUTINE ilaver( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
56 *
57 * -- LAPACK computational routine (version 3.6.1) --
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 = 6
68  vers_patch = 1
69 * =====================================================================
70 *
71  RETURN
72  END
subroutine ilaver(VERS_MAJOR, VERS_MINOR, VERS_PATCH)
ILAVER returns the LAPACK version.
Definition: ilaver.f:50