Skip to content

Commit 62b1d4a

Browse files
committed
implicit none in TESTING/LIN
1 parent 971f199 commit 62b1d4a

File tree

678 files changed

+679
-0
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

678 files changed

+679
-0
lines changed

TESTING/LIN/aladhd.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -87,6 +87,7 @@
8787
*
8888
* =====================================================================
8989
SUBROUTINE ALADHD( IOUNIT, PATH )
90+
IMPLICIT NONE
9091
*
9192
* -- LAPACK test routine --
9293
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/alaerh.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -144,6 +144,7 @@
144144
* =====================================================================
145145
SUBROUTINE ALAERH( PATH, SUBNAM, INFO, INFOE, OPTS, M, N, KL, KU,
146146
$ N5, IMAT, NFAIL, NERRS, NOUT )
147+
IMPLICIT NONE
147148
*
148149
* -- LAPACK test routine --
149150
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/alaesm.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -60,6 +60,7 @@
6060
*
6161
* =====================================================================
6262
SUBROUTINE ALAESM( PATH, OK, NOUT )
63+
IMPLICIT NONE
6364
*
6465
* -- LAPACK test routine --
6566
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/alahd.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -104,6 +104,7 @@
104104
*
105105
* =====================================================================
106106
SUBROUTINE ALAHD( IOUNIT, PATH )
107+
IMPLICIT NONE
107108
*
108109
* -- LAPACK test routine --
109110
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/alareq.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -87,6 +87,7 @@
8787
*
8888
* =====================================================================
8989
SUBROUTINE ALAREQ( PATH, NMATS, DOTYPE, NTYPES, NIN, NOUT )
90+
IMPLICIT NONE
9091
*
9192
* -- LAPACK test routine --
9293
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/alasum.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -70,6 +70,7 @@
7070
*
7171
* =====================================================================
7272
SUBROUTINE ALASUM( TYPE, NOUT, NFAIL, NRUN, NERRS )
73+
IMPLICIT NONE
7374
*
7475
* -- LAPACK test routine --
7576
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/alasvm.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -70,6 +70,7 @@
7070
*
7171
* =====================================================================
7272
SUBROUTINE ALASVM( TYPE, NOUT, NFAIL, NRUN, NERRS )
73+
IMPLICIT NONE
7374
*
7475
* -- LAPACK test routine --
7576
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/cchkeq.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -51,6 +51,7 @@
5151
*
5252
* =====================================================================
5353
SUBROUTINE CCHKEQ( THRESH, NOUT )
54+
IMPLICIT NONE
5455
*
5556
* -- LAPACK test routine --
5657
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/cchkgb.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -188,6 +188,7 @@
188188
SUBROUTINE CCHKGB( DOTYPE, NM, MVAL, NN, NVAL, NNB, NBVAL, NNS,
189189
$ NSVAL, THRESH, TSTERR, A, LA, AFAC, LAFAC, B,
190190
$ X, XACT, WORK, RWORK, IWORK, NOUT )
191+
IMPLICIT NONE
191192
*
192193
* -- LAPACK test routine --
193194
* -- LAPACK is a software package provided by Univ. of Tennessee, --

TESTING/LIN/cchkge.f

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -183,6 +183,7 @@
183183
SUBROUTINE CCHKGE( DOTYPE, NM, MVAL, NN, NVAL, NNB, NBVAL, NNS,
184184
$ NSVAL, THRESH, TSTERR, NMAX, A, AFAC, AINV, B,
185185
$ X, XACT, WORK, RWORK, IWORK, NOUT )
186+
IMPLICIT NONE
186187
*
187188
* -- LAPACK test routine --
188189
* -- LAPACK is a software package provided by Univ. of Tennessee, --

0 commit comments

Comments
 (0)