src/lapack-test.f


1
2
3
4
5
6
7
8
9

*
* This file is part of MXE. See LICENSE.md for licensing information.
*
      INTEGER MAJOR, MINOR, PATCH
*
      CALL ILAVER ( MAJOR,MINOR, PATCH )
      WRITE(*,*) "LAPACK ",MAJOR,".",MINOR,".",PATCH
*
      END