diff options
| -rw-r--r-- | INSTALL/dlamch.f | 4 | ||||
| -rw-r--r-- | SRC/cggev3.f | 2 |
2 files changed, 1 insertions, 5 deletions
diff --git a/INSTALL/dlamch.f b/INSTALL/dlamch.f index 25c2c8e6..eb307e5e 100644 --- a/INSTALL/dlamch.f +++ b/INSTALL/dlamch.f @@ -72,10 +72,6 @@ CHARACTER CMACH * .. * -* .. Scalar Arguments .. - DOUBLE PRECISION A, B -* .. -* * ===================================================================== * * .. Parameters .. diff --git a/SRC/cggev3.f b/SRC/cggev3.f index 5d8c7f8a..4a000fe1 100644 --- a/SRC/cggev3.f +++ b/SRC/cggev3.f @@ -246,7 +246,7 @@ CHARACTER CHTEMP INTEGER ICOLS, IERR, IHI, IJOBVL, IJOBVR, ILEFT, ILO, $ IN, IRIGHT, IROWS, IRWRK, ITAU, IWRK, JC, JR, - $ LWKMIN, LWKOPT + $ LWKOPT REAL ANRM, ANRMTO, BIGNUM, BNRM, BNRMTO, EPS, $ SMLNUM, TEMP COMPLEX X |