view src/lapack-test.f @ 6366:0b25b70852a0

* src/freetds.mk: update to v1.3.13
author John Donoghue <john.donoghue@ieee.org>
date Thu, 18 Aug 2022 20:44:21 -0400
parents fc0830aafb54
children
line wrap: on
line source

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