Merge pull request #3314 from martin-frbg/lapack597
Fix LAPACK testsuite compatibility with libomp (Reference-LAPACK PR 597)
This commit is contained in:
commit
342d3e8b5c
|
@ -1075,7 +1075,8 @@
|
||||||
CHARACTER*80 LINE
|
CHARACTER*80 LINE
|
||||||
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
||||||
$ NK, NN, NPARMS, NRHS, NTYPES,
|
$ NK, NN, NPARMS, NRHS, NTYPES,
|
||||||
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH, N_THREADS
|
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH
|
||||||
|
INTEGER*4 N_THREADS
|
||||||
REAL EPS, S1, S2, THRESH, THRSHN
|
REAL EPS, S1, S2, THRESH, THRSHN
|
||||||
* ..
|
* ..
|
||||||
* .. Local Arrays ..
|
* .. Local Arrays ..
|
||||||
|
|
|
@ -1081,7 +1081,8 @@
|
||||||
CHARACTER*80 LINE
|
CHARACTER*80 LINE
|
||||||
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
||||||
$ NK, NN, NPARMS, NRHS, NTYPES,
|
$ NK, NN, NPARMS, NRHS, NTYPES,
|
||||||
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH, N_THREADS
|
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH
|
||||||
|
INTEGER*4 N_THREADS
|
||||||
DOUBLE PRECISION EPS, S1, S2, THRESH, THRSHN
|
DOUBLE PRECISION EPS, S1, S2, THRESH, THRSHN
|
||||||
* ..
|
* ..
|
||||||
* .. Local Arrays ..
|
* .. Local Arrays ..
|
||||||
|
|
|
@ -1081,7 +1081,8 @@
|
||||||
CHARACTER*80 LINE
|
CHARACTER*80 LINE
|
||||||
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
||||||
$ NK, NN, NPARMS, NRHS, NTYPES,
|
$ NK, NN, NPARMS, NRHS, NTYPES,
|
||||||
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH, N_THREADS
|
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH
|
||||||
|
INTEGER*4 N_THREADS
|
||||||
REAL EPS, S1, S2, THRESH, THRSHN
|
REAL EPS, S1, S2, THRESH, THRSHN
|
||||||
* ..
|
* ..
|
||||||
* .. Local Arrays ..
|
* .. Local Arrays ..
|
||||||
|
|
|
@ -1075,7 +1075,8 @@
|
||||||
CHARACTER*80 LINE
|
CHARACTER*80 LINE
|
||||||
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
INTEGER I, I1, IC, INFO, ITMP, K, LENP, MAXTYP, NEWSD,
|
||||||
$ NK, NN, NPARMS, NRHS, NTYPES,
|
$ NK, NN, NPARMS, NRHS, NTYPES,
|
||||||
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH, N_THREADS
|
$ VERS_MAJOR, VERS_MINOR, VERS_PATCH
|
||||||
|
INTEGER*4 N_THREADS
|
||||||
DOUBLE PRECISION EPS, S1, S2, THRESH, THRSHN
|
DOUBLE PRECISION EPS, S1, S2, THRESH, THRSHN
|
||||||
* ..
|
* ..
|
||||||
* .. Local Arrays ..
|
* .. Local Arrays ..
|
||||||
|
|
Loading…
Reference in New Issue