--- DarthVader/TrackerLevel2/inc/F77/commontracker.f 2006/05/19 13:15:53 1.1.1.1 +++ DarthVader/TrackerLevel2/inc/F77/commontracker.f 2007/02/16 14:56:01 1.5 @@ -22,39 +22,6 @@ * - !??? * ************************************************************************* - - -c------------------------------------------------------------------------ -c -c HBOOK initialization variable -c -c------------------------------------------------------------------------ - -c parameter (NWPAWC=6500000) -cele INTEGER HMEM -cele parameter (NWPAWC=8500000) -cele common/PAWC/HMEM(NWPAWC) - - -c------------------------------------------------------------------------ -c -c ntuples id numbers and parameters -c -c------------------------------------------------------------------------ -c$$$ -c$$$ parameter (ntp_level0=20) !LEVEL0 - parameter (ntp_level1=21) !LEVEL1 - parameter (ntp_level2=22) !LEVEL2 - - -c parameter (nclstrmax=1000) !maximum number of clusters per event - parameter (nclstrmax=500) - parameter (nclstrp=17) !maximum number of strips to be checked for - ! inclusion in the cluster - parameter (maxlength=nclstrmax*nclstrp) !maximum number of strip belonging - ! to clusters for the whole event - - c------------------------------------------------------------------------ c c spectrometer parameters @@ -78,6 +45,7 @@ parameter (SiDimX=53330.) !Si sensor dimensions in um parameter (SiDimY=70000.) + parameter (SiDimZ=300.) * edges of the sensitive areas, in X and Y parameter (edgeX_l=731.5) ! X side @@ -99,5 +67,19 @@ ! the other side parameter (glue=30.) !distance between the two sensors in a ladder in um + parameter (RESYAV=14.5e-4) + parameter (RESXAV=4.e-4) + parameter (pmuH_h=297.61) ! Hall mobility - holes - cm**2 V-1 s-1 + parameter (pmuH_e=1258.18) ! Hall mobility - electrons - cm**2 V-1 s-1 +c-------------------------------------------------------------------------- +c common to control messages on standard output +c-------------------------------------------------------------------------- +c INTEGER DBUG +c INTEGER VRBS + LOGICAL DEBUG + LOGICAL VERBOSE + LOGICAL WARNING + COMMON/DBG/DEBUG,VERBOSE,WARNING + SAVE/DBG/