From c555ef8f8348620e259e07c0382e965f07ae45d8 Mon Sep 17 00:00:00 2001
From: julie <julielangou@users.noreply.github.com>
Date: Thu, 3 Mar 2011 21:02:22 +0000
Subject: Fix some workspace query problems found with the new interface

---
 SRC/zheevx.f | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'SRC/zheevx.f')

diff --git a/SRC/zheevx.f b/SRC/zheevx.f
index a200c31b..1b87c88d 100644
--- a/SRC/zheevx.f
+++ b/SRC/zheevx.f
@@ -6,6 +6,7 @@
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
 *     November 2006
+* @precisions normal z -> c
 *
 *     .. Scalar Arguments ..
       CHARACTER          JOBZ, RANGE, UPLO
@@ -236,7 +237,7 @@
             WORK( 1 ) = LWKOPT
          END IF
 *
-         IF( LWORK.LT.MAX( 1, 2*N ) .AND. .NOT.LQUERY )
+         IF( LWORK.LT.LWKMIN .AND. .NOT.LQUERY )
      $      INFO = -17
       END IF
 *
-- 
cgit v1.2.3