/[PAMELA software]/DarthVader/TrackerLevel2/src/F77/analysisflight.f
ViewVC logotype

Diff of /DarthVader/TrackerLevel2/src/F77/analysisflight.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.21 by pamelats, Wed Dec 30 14:22:22 2009 UTC revision 1.23 by pam-ts, Wed Jun 4 07:57:04 2014 UTC
# Line 68  c      parameter (inf=1.e8)      !just a Line 68  c      parameter (inf=1.e8)      !just a
68        dedx_x_min = dedx_x_min_mip !mip search        dedx_x_min = dedx_x_min_mip !mip search
69        dedx_y_min = dedx_y_min_mip !        dedx_y_min = dedx_y_min_mip !
70    
71   887  continue  c 887  continue ! Emiliano, fix compilation warning (gcc 4.1), Label 887 defined but not used
72    
73  *------------------------------------------------------  *------------------------------------------------------
74        do i=1,nclstr1        do i=1,nclstr1
# Line 131  cc         if(.true.) Line 131  cc         if(.true.)
131        endif        endif
132    
133    
134    *     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
135    *
136    *     EV may 2014 ==> SKIP NUCLEI PATCH
137    *     (done differently...)
138    *
139    *     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
140          goto 7575
141    
142    
143  *     ////////////////////////////////////////////////  *     ////////////////////////////////////////////////
144  *     PATCH to recover nuclei  *     PATCH to recover nuclei
145  *     ////////////////////////////////////////////////  *     ////////////////////////////////////////////////
# Line 224  cc         if(.true.) Line 233  cc         if(.true.)
233           RECOVER_NUCLEI   = .false.               RECOVER_NUCLEI   = .false.    
234        endif        endif
235    
236    *     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
237     7575 continue
238    *     @~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@~@
239    
240        if(ntrk.eq.0)goto 880        if(ntrk.eq.0)goto 880
241    
242  *     /////////////////////////////////////////////////////  *     /////////////////////////////////////////////////////

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.23

  ViewVC Help
Powered by ViewVC 1.1.23