charm decays with photons in the final state and trigger counter ...

charma.uprm.edu

charm decays with photons in the final state and trigger counter ...

80if (period.ne.0)thenIF(RGRAN().LT.HEFF(NH,period)) HHOD(NH)=.TRUE.endifENDIFEND IF10 continuecc--now the vertical counterscNV=0IF(y.gt.vlower.and.y.lt.vupper) thenif (x.le.XVgapn.and.x.gt.(XVgapn-3*vw)) thenDO I=1,3X0=FLOAT(I-1)*Vw+XVgapn-3*vwIF(X.GE.X0.AND.X.LT.X0+Vw) NV=IEND DOelseif(x.gt.XVgapp.and.x.le.(XVgapp+3*vw)) thenendifDO I=7,9X0=FLOAT(I-7)*Vw+XVgappIF(X.GE.X0.AND.X.LT.X0+Vw) NV=IEND DOIF(NV.GT.0) THENIF(Y.GT.vyoff) NV=NV+3END IFIF(NV.LT.1.OR.NV.GT.12) RETURNif (period.ne.0)thenif(NV.ne.1.and.NV.ne.7)then ! most use parametersIF(RGRAN().LT.VEFF(NV,period)) VHOD(NV)=.TRUE.CCTwo V counters require a special simulation, a linear fitto the efficiency dataelse if(NV.eq.1)then !VNEWEFF = IRGRUN*(-.00004011)+(.825277)IF(RGRAN().LT.VNEWEFF) VHOD(NV)=.TRUE.else if(NV.eq.7)then !IF(IRGRUN.ge.5000.and.IRGRUN.le.8920)thenIF(RGRAN().LT.VEFF(NV,period)) VHOD(NV)=.TRUE.ELSEVNEWEFF = IRGRUN*(-.00002099)+(1.14700)IF(RGRAN().LT.VNEWEFF) VHOD(NV)=.TRUE.ENDIFendif !if(NV.ne.1.and.NV.ne.7)thenendif !if (period.ne.0)thenENDIFRETURNEND

More magazines by this user
Similar magazines