From 0d0b443c697874898ee9947afe634c1b89761dce Mon Sep 17 00:00:00 2001
From: julie <julielangou@users.noreply.github.com>
Date: Wed, 22 Jun 2011 09:45:40 +0000
Subject: Summer cleanup Cleanup some codes, like unused variables. Used -Walls
 to detect problems.

---
 BLAS/TESTING/dblat3.f | 1 -
 1 file changed, 1 deletion(-)

(limited to 'BLAS/TESTING/dblat3.f')

diff --git a/BLAS/TESTING/dblat3.f b/BLAS/TESTING/dblat3.f
index d21c39e9..dab3ce5e 100644
--- a/BLAS/TESTING/dblat3.f
+++ b/BLAS/TESTING/dblat3.f
@@ -2676,7 +2676,6 @@
    50    CONTINUE
       END IF
 *
-   60 CONTINUE
       LDERES = .TRUE.
       GO TO 80
    70 CONTINUE
-- 
cgit v1.2.3