20 lines
706 B
Plaintext
20 lines
706 B
Plaintext
--- TESTING/EIG/cchkee.f.orig Tue Jun 22 13:54:08 1999
|
|
+++ TESTING/EIG/cchkee.f Wed Oct 6 11:04:27 1999
|
|
@@ -1009,7 +1009,7 @@
|
|
$ CCKGLM, CCKGQR, CCKGSV, CCKLSE, CDRGES, CDRGEV,
|
|
$ CDRGSX, CDRGVX, CDRVBD, CDRVES, CDRVEV, CDRVGG,
|
|
$ CDRVSG, CDRVST, CDRVSX, CDRVVX, CERRBD, CERRED,
|
|
- $ CERRGG, CERRHS, CERRST, XLAENV
|
|
+ $ CERRGG, CERRHS, CERRST, XLAENV, FPMCLR
|
|
* ..
|
|
* .. Intrinsic Functions ..
|
|
INTRINSIC LEN, MIN
|
|
@@ -1038,6 +1038,7 @@
|
|
* ..
|
|
* .. Executable Statements ..
|
|
*
|
|
+ CALL FPMCLR( )
|
|
S1 = SECOND( )
|
|
FATAL = .FALSE.
|
|
NUNIT = NOUT
|