--- DarthVader/TrackerLevel2/src/F77/mini.f	2008/12/23 11:28:36	1.24
+++ DarthVader/TrackerLevel2/src/F77/mini.f	2009/08/04 14:01:38	1.25
@@ -23,6 +23,7 @@
 c      common/dbg/DEBUG
 
       parameter (dinf=1.d15)      !just a huge number...
+      parameter (dinfneg=-dinf)   ! just a huge negative number...
 c------------------------------------------------------------------------
 c     variables used in the tracking procedure (mini and its subroutines)
 c
@@ -44,7 +45,7 @@
 c      DATA ALMAX/dinf,dinf,1.,dinf,dinf/ !limits on alpha vector components
 c      DATA ALMIN/-dinf,-dinf,-1.,-dinf,-dinf/ !"
       DATA ALMAX/dinf,dinf,1.,dinf,dinf/ !limits on alpha vector components
-      DATA ALMIN/-dinf,-dinf,-1.,-dinf,-dinf/ !"
+      DATA ALMIN/dinfneg,dinfneg,-1.,dinfneg,dinfneg/ !"
 
 c$$$      DIMENSION DAL(5)                    !increment of vector alfa
       DIMENSION CHI2DD_R(4,4),CHI2D_R(4) !hessiano e gradiente di chi2