C Copyright(C) 1999-2020 National Technology & Engineering Solutions
C of Sandia, LLC (NTESS).  Under the terms of Contract DE-NA0003525 with
C NTESS, the U.S. Government retains certain rights in this software.
C
C See packages/seacas/LICENSE for details

C=======================================================================
      SUBROUTINE GSLIBV (STRING)
C=======================================================================

C***********************************************************************

C     *** GSLIBV *** Returns current version number of the suplib library
C                    Get SupLIB Version number
C     Parameters:
C     STRING - OUT - string containing version number of suplib

C     Version Number Format:
C           n1.n2.n3

C     where n1 is the major version number
C           n2 is the minor version or change capability number
C           n3 is the bug-fix number
C***********************************************************************

      CHARACTER*32 STRING

C     Version Format: 'major.minor.bug_fix'
      STRING = '1.2.0'

      RETURN
      END