--- DarthVader/TrackerLevel2/src/F77/analysisflight.f	2008/12/05 08:26:47	1.17
+++ DarthVader/TrackerLevel2/src/F77/analysisflight.f	2014/06/04 07:57:04	1.23
@@ -65,12 +65,16 @@
       
       ntrk_old = 0
 
+      dedx_x_min = dedx_x_min_mip !mip search
+      dedx_y_min = dedx_y_min_mip !
+
+c 887  continue ! Emiliano, fix compilation warning (gcc 4.1), Label 887 defined but not used
+
+*------------------------------------------------------
       do i=1,nclstr1
          cl_used(i)=0           !init mask of clusters associated to a track
       enddo
-      dedx_x_min = dedx_x_min_mip
-      dedx_y_min = dedx_y_min_mip
-*------------------------------------------------------
+
       call init_level2
       call init_hough      
 *------------------------------------------------------
@@ -87,9 +91,9 @@
          goto 880               !fill ntp and go to next event     
       endif 
 
-*     -------------------------------------
+*     ----------------------------------------------------
 *     fill hough output variables only for the first searc
-*     -------------------------------------
+*     ----------------------------------------------------
       if(.not.SECOND_SEARCH)call fill_hough
 
       iflag=0
@@ -127,6 +131,15 @@
       endif
 
 
+*     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
+*
+*     EV may 2014 ==> SKIP NUCLEI PATCH
+*     (done differently...)
+*
+*     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
+      goto 7575
+
+
 *     ////////////////////////////////////////////////
 *     PATCH to recover nuclei
 *     ////////////////////////////////////////////////
@@ -220,6 +233,10 @@
          RECOVER_NUCLEI   = .false.     
       endif
 
+*     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
+ 7575 continue
+*     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
+
       if(ntrk.eq.0)goto 880
 
 *     /////////////////////////////////////////////////////
@@ -285,7 +302,7 @@
      $     .true.)then
 
          SECOND_SEARCH=.true.
-         RECOVER_SINGLETS=.true.
+c         RECOVER_SINGLETS=.true.      !OPTIMIZATION  
          ntrk_old=ntrk
 
          if(DEBUG.EQ.1)
@@ -319,13 +336,15 @@
          ngood = ngood + good1(iv)
       enddo
       
- 8800 continue
+c 8800 continue
+      continue
       
       
 *     ///////////////////////////////////////////////
 *     \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
 
- 100  continue
+c 100  continue
+      continue
       
       return
       end