Mercurial > mxe-octave
annotate src/lapack-test.f @ 7243:ae230ac322f7 default tip @
* src/sqlite.mk: update to v3460000
author | John Donoghue <john.donoghue@ieee.org> |
---|---|
date | Wed, 05 Jun 2024 10:26:58 -0400 |
parents | fc0830aafb54 |
children |
rev | line source |
---|---|
2464
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
1 * |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
2 * This file is part of MXE. |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
3 * See index.html for further information. |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
4 * |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
5 INTEGER MAJOR, MINOR, PATCH |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
6 * |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
7 CALL ILAVER ( MAJOR,MINOR, PATCH ) |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
8 WRITE(*,*) "LAPACK ",MAJOR,".",MINOR,".",PATCH |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
9 * |
fc0830aafb54
package lapack: use $(TARGET)-ranlib and add test program
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
10 END |