LAPACK  3.8.0
LAPACK: Linear Algebra PACKage
LAPACK_version.f
Go to the documentation of this file.
1 *> \brief \b 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 * PROGRAM LAPACK_VERSION
12 *
13 * Authors:
14 * ========
15 *
16 *> \author Univ. of Tennessee
17 *> \author Univ. of California Berkeley
18 *> \author Univ. of Colorado Denver
19 *> \author NAG Ltd.
20 *
21 *> \date November 2017
22 *
23 *> \ingroup auxOTHERauxiliary
24 *
25 * =====================================================================
27 *
28 * -- LAPACK auxiliary routine (version 3.8.0) --
29 * -- LAPACK is a software package provided by Univ. of Tennessee, --
30 * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
31 * November 2017
32 *
33  INTEGER MAJOR, MINOR, PATCH
34 * ..
35 * .. External Subroutines ..
36  EXTERNAL ilaver
37 *
38  CALL ilaver ( major, minor, patch )
39  WRITE(*,*) "LAPACK ",major,".",minor,".",patch
40 *
41  END
program lapack_version
LAPACK_VERSION
subroutine ilaver(VERS_MAJOR, VERS_MINOR, VERS_PATCH)
ILAVER returns the LAPACK version.
Definition: ilaver.f:50