From 882ff1a5d2a2e44ebbbdf1b88acfca03e01be368 Mon Sep 17 00:00:00 2001
From: "philippe.theveny"
 <philippe.theveny@8a072113-8704-0410-8d35-dd094bca7971>
Date: Tue, 11 Aug 2015 21:52:11 +0000
Subject: [PATCH] Removed declaration of unused variables.

---
 INSTALL/dlamch.f | 4 ----
 SRC/cggev3.f     | 2 +-
 2 files changed, 1 insertion(+), 5 deletions(-)

diff --git a/INSTALL/dlamch.f b/INSTALL/dlamch.f
index 25c2c8e6e..eb307e5e1 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 5d8c7f8ac..4a000fe10 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