Annotation of rpl/lapack/lapack/ilaver.f, revision 1.11
1.11 ! bertrand 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: *> return the lapack major version
! 29: *>
! 30: *> \param[out] VERS_MINOR
! 31: *> return the lapack minor version from the major version
! 32: *>
! 33: *> \param[out] VERS_PATCH
! 34: *> return the lapack patch version from the minor version
! 35: *
! 36: * Authors:
! 37: * ========
! 38: *
! 39: *> \author Univ. of Tennessee
! 40: *> \author Univ. of California Berkeley
! 41: *> \author Univ. of Colorado Denver
! 42: *> \author NAG Ltd.
! 43: *
! 44: *> \date November 2011
! 45: *
! 46: *> \ingroup auxOTHERauxiliary
! 47: *
! 48: * =====================================================================
1.1 bertrand 49: SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH )
50: *
1.11 ! bertrand 51: * -- LAPACK computational routine (version 3.4.0) --
1.1 bertrand 52: * -- LAPACK is a software package provided by Univ. of Tennessee, --
53: * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
1.11 ! bertrand 54: * November 2011
1.1 bertrand 55: *
56: * =====================================================================
57: *
58: INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH
59: * =====================================================================
60: VERS_MAJOR = 3
1.11 ! bertrand 61: VERS_MINOR = 4
! 62: VERS_PATCH = 0
1.1 bertrand 63: * =====================================================================
64: *
65: RETURN
66: END
CVSweb interface <joel.bertrand@systella.fr>