--- DarthVader/TrackerLevel2/inc/F77/common_momanhough.f 2007/04/27 10:39:57 1.9 +++ DarthVader/TrackerLevel2/inc/F77/common_momanhough.f 2008/12/04 14:33:48 1.12 @@ -82,8 +82,9 @@ * 0 = not used integer cl_used(nclstrmax_level2) integer ncl_view(nviews) !n.clusters per plane + real dedx_x_min,dedx_y_min * ----------------------------------------------------------- - common/clusters/cl_good,cl_used,ncl_view + common/clusters/cl_good,cl_used,ncl_view,dedx_x_min,dedx_y_min * ----------------------------------------------------------- * --- COUPLES ----------------------------------------------- @@ -136,6 +137,9 @@ common/singlets/ncls,cls,cl_single + logical RECOVER_SINGLETS,RECOVER_NUCLEI,SECOND_SEARCH + common/recover/RECOVER_SINGLETS,RECOVER_NUCLEI,SECOND_SEARCH + c+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + c + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + c------------------------------------------------------------------------ @@ -263,7 +267,8 @@ c------------------------------------------------------------------------ * track candidates - PARAMETER (NTRACKSMAX=ncloyz_max*ncloxz_max) +cc PARAMETER (NTRACKSMAX=ncloyz_max*ncloxz_max) + PARAMETER (NTRACKSMAX=10000) INTEGER NTRACKS !number of track candidates REAL AL_STORE(5,NTRACKSMAX) REAL XM_STORE(NPLANES,NTRACKSMAX) @@ -285,13 +290,14 @@ REAL BX_STORE(NPLANES,NTRACKSMAX) REAL BY_STORE(NPLANES,NTRACKSMAX) REAL RCHI2_STORE(NTRACKSMAX) - common/track_candidates/NTRACKS,AL_STORE + common/trackcandidates/NTRACKS,AL_STORE $ ,XV_STORE,YV_STORE,ZV_STORE $ ,XM_STORE,YM_STORE,ZM_STORE $ ,RESX_STORE,RESY_STORE $ ,AXV_STORE,AYV_STORE $ ,XGOOD_STORE,YGOOD_STORE - $ ,CP_STORE,CLS_STORE,SENSOR_STORE,LADDER_STORE + $ ,CP_STORE,CLS_STORE + $ ,SENSOR_STORE,LADDER_STORE $ ,BX_STORE,BY_STORE $ ,RCHI2_STORE @@ -306,10 +312,15 @@ c------------------------------------------------------------------------ PARAMETER (PIGR=3.14) !159265359)!(1) * ----------------------------------------------------- -* cuts on cluster signal +* cuts on cluster signal (MIP) * ----------------------------------------------------- - parameter (dedx_x_min=0.) - parameter (dedx_y_min=0.) + parameter (dedx_x_min_mip=0.) + parameter (dedx_y_min_mip=0.) + parameter (dedx_x_min_nuclei=5.) + parameter (dedx_y_min_nuclei=5.) + parameter (dedx_min_nuclei=9.1) !cut to apply nuclei recovery + parameter (ddedx_min_nuclei=0.35)!cut to identify bad tracked nuclei + * ----------------------------------------------------- * number of GOOD strips around MAXS * (NB this cut has been removed in track fitting but