view src/lapack-test.f @ 5515:d46a116f2c8d

* src/of-communications-1-catop.patch: New file.
author John W. Eaton <jwe@octave.org>
date Tue, 25 Aug 2020 15:05:59 -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