[Scipy-svn] r2094 - trunk/Lib/optimize/cobyla

[scipy-svn at scipy.org]

Author: oliphant
Date: 2006-07-13 03:53:18 -0500 (Thu, 13 Jul 2006)
New Revision: 2094

Modified:
   trunk/Lib/optimize/cobyla/cobyla2.f
Log:
more printing

Modified: trunk/Lib/optimize/cobyla/cobyla2.f
===================================================================
--- trunk/Lib/optimize/cobyla/cobyla2.f	2006-07-13 08:50:51 UTC (rev 2093)
+++ trunk/Lib/optimize/cobyla/cobyla2.f	2006-07-13 08:53:18 UTC (rev 2094)
@@ -374,7 +374,6 @@
          PRINT *, 'M,N,RHO,IFULL =', M, N, RHO, IFULL
          PRINT *, '  **CON = ', (CON(I),I=1,M)
          PRINT *, '  **A = ', ((A(I,K),I=1,N),K=1,MP)
-         PRINT *, '  **W = ', (W(I),I=1,ITOTAL)
       END IF
       CALL TRSTLP (N,M,A,CON,RHO,DX,IFULL,IACT,W(IZ),W(IZDOTA),
      1  W(IVMC),W(ISDIRN),W(IDXNEW),W(IVMD))