1 SUBROUTINE PILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH ) 2C 3C -- ScaLAPACK computational routine (version 2.0.1 ) -- 4C -- ScaLAPACK is a software package provided by Univ. of Tennessee, -- 5C -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- 6C January 2012 7C 8C Purpose 9C ======= 10C 11C This subroutine return the ScaLAPACK version. 12C 13C Arguments 14C ========= 15C VERS_MAJOR (output) INTEGER 16C return the scalapack major version 17C VERS_MINOR (output) INTEGER 18C return the scalapack minor version from the major version 19C VERS_PATCH (output) INTEGER 20C return the scalapack patch version from the minor version 21C ===================================================================== 22C 23 INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH 24C ===================================================================== 25 VERS_MAJOR = 2 26 VERS_MINOR = 0 27 VERS_PATCH = 2 28C ===================================================================== 29C 30 RETURN 31 END 32 33