Mercurial > mxe-octave

annotate src/lapack-test.f @ 2464:fc0830aafb54

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
package lapack: use $(TARGET)-ranlib and add test program
author Tony Theodore <tonyt@logyst.com>
date Wed, 02 May 2012 02:31:25 +1000
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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