[Scipy-svn] r5193 - trunk/scipy/linalg

[scipy-svn at scipy.org]

Author: tzito
Date: 2008-11-25 11:21:38 -0600 (Tue, 25 Nov 2008)
New Revision: 5193

Modified:
   trunk/scipy/linalg/generic_flapack.pyf
Log:
Fix for ticket #593.


Modified: trunk/scipy/linalg/generic_flapack.pyf
===================================================================
--- trunk/scipy/linalg/generic_flapack.pyf	2008-11-25 13:40:11 UTC (rev 5192)
+++ trunk/scipy/linalg/generic_flapack.pyf	2008-11-25 17:21:38 UTC (rev 5193)
@@ -1015,8 +1015,8 @@
     <type_in>  depend(ldvr,n), dimension(ldvr,n),intent(out) :: vr
     integer intent(hide),depend(n,compute_vr) :: ldvr=(compute_vr?n:1)
     
-    integer optional,intent(in),depend(n,compute_vl,compute_vr) :: lwork=8*n
-    check((lwork==-1) || (lwork>=MAX(1,8*n))) :: lwork
+    integer optional,intent(in),depend(n,compute_vl,compute_vr) :: lwork=2*n
+    check((lwork==-1) || (lwork>=MAX(1,2*n))) :: lwork
     <type_in> intent(out), dimension(MAX(lwork,1)), depend(lwork) :: work
     <rtype_in> intent(hide), dimension(8*n), depend(n) :: rwork