--- DarthVader/TrackerLevel2/src/F77/reductionflight.f 2007/08/20 16:07:16 1.22 +++ DarthVader/TrackerLevel2/src/F77/reductionflight.f 2007/08/31 14:56:52 1.23 @@ -547,9 +547,15 @@ ladder_view(nclstr_view) = nld(iseed,iv) maxs_view(nclstr_view) = iseed - mult_view(nclstr_view) = rmax-lmax+1 rmax_view(nclstr_view) = rmax lmax_view(nclstr_view) = lmax +c mult_view(nclstr_view) = rmax-lmax+1 + mult_view(nclstr_view) = 0 + do ii=lmax,rmax + if(value(ii).gt.clinclcut(ii)) + $ mult_view(nclstr_view) = mult_view(nclstr_view)+1 + enddo + c$$$ if(rmax-lmax+1.gt.25) c$$$ $ print*,'view ',iv