--- DarthVader/TrackerLevel2/src/F77/cncomp.f 2007/08/20 16:07:16 1.8 +++ DarthVader/TrackerLevel2/src/F77/cncomp.f 2007/08/31 14:56:52 1.9 @@ -33,6 +33,23 @@ strange(i,j,k)=1 !initializes unusually high or low signal enddo ! affected strips flag +c------------------------------------------------------------------------ +c (september 2007) +c remove from CN computation the first and the last 3 channels of +c each X view, becouse they ar not connected to any strip +c------------------------------------------------------------------------ + if(mod(i,2).eq.0)then + if(j.eq.1)then + do k=1,3 + strange(i,j,k)=0 + enddo + elseif(j.eq.nva1_ladder)then + do k=nstrips_va1,nstrips_va1-2,-1 + strange(i,j,k)=0 + enddo + endif + endif + newclstr=1 !flag to warn about new found signal c ! affected strips c------------------------------------------------------------------------