diff options
Diffstat (limited to 'TESTING/LIN/cchkhe_aa.f')
| -rw-r--r-- | TESTING/LIN/cchkhe_aa.f | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/TESTING/LIN/cchkhe_aa.f b/TESTING/LIN/cchkhe_aa.f index cb1f07b6..8b6308c3 100644 --- a/TESTING/LIN/cchkhe_aa.f +++ b/TESTING/LIN/cchkhe_aa.f @@ -218,18 +218,13 @@ INTEGER ISEED( 4 ), ISEEDY( 4 ) REAL RESULT( NTESTS ) * .. -* .. External Functions .. - REAL DGET06, CLANHE - EXTERNAL DGET06, CLANHE -* .. * .. External Subroutines .. - EXTERNAL ALAERH, ALAHD, ALASUM, XLAENV, CERRHE, CGET04, - $ ZHECON, CHERFS, CHET01_AA, CHETRF_AA, ZHETRI2, - $ CHETRS_AA, CLACPY, CLAIPD, CLARHS, CLATB4, - $ CLATMS, CPOT02, ZPOT03, ZPOT05 + EXTERNAL ALAERH, ALAHD, ALASUM, XLAENV, CERRHE, CHET01_AA, + $ CHETRF_AA, CHETRS_AA, CLACPY, CLAIPD, CLARHS, + $ CLATB4, CLATMS, CPOT02 * .. * .. Intrinsic Functions .. - INTRINSIC REAL, IMAG, MAX, MIN + INTRINSIC MAX, MIN * .. * .. Scalars in Common .. LOGICAL LERR, OK |