From 198dd8994cfa67040a4e8250b537eb5dc78d2115 Mon Sep 17 00:00:00 2001
From: langou <langou@users.noreply.github.com>
Date: Tue, 5 Jan 2016 02:25:35 +0000
Subject: ( remove unused COMPLEX*16 variable T ) ( see email from Berend
 Hasselman on 01/04/2016 )

---
 SRC/cggsvp3.f | 1 -
 1 file changed, 1 deletion(-)

(limited to 'SRC/cggsvp3.f')

diff --git a/SRC/cggsvp3.f b/SRC/cggsvp3.f
index 36fe9913..1aefd64c 100644
--- a/SRC/cggsvp3.f
+++ b/SRC/cggsvp3.f
@@ -308,7 +308,6 @@
 *     .. Local Scalars ..
       LOGICAL            FORWRD, WANTQ, WANTU, WANTV, LQUERY
       INTEGER            I, J, LWKOPT
-      COMPLEX            T
 *     ..
 *     .. External Functions ..
       LOGICAL            LSAME
-- 
cgit v1.2.3