/[PAMELA software]/DarthVader/TrackerLevel2/src/F77/reductionflight.f
ViewVC logotype

Diff of /DarthVader/TrackerLevel2/src/F77/reductionflight.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.11 by pam-fi, Fri Oct 27 16:08:19 2006 UTC revision 1.12 by pam-fi, Wed Nov 8 10:12:01 2006 UTC
# Line 189  C--------------------------------------- Line 189  C---------------------------------------
189        do iv = 1,nviews        do iv = 1,nviews
190           ngood = ngood + good1(iv)           ngood = ngood + good1(iv)
191        enddo        enddo
192        if(ngood.ne.0)print*,'* WARNING * Event ',eventn(1)  c$$$      if(ngood.ne.0)print*,'* WARNING * Event ',eventn(1)
193       $     ,':LEVEL1 event status: '  c$$$     $     ,':LEVEL1 event status: '
194       $     ,(good1(i),i=1,nviews)  c$$$     $     ,(good1(i),i=1,nviews)
195  c------------------------------------------------------------------------  c------------------------------------------------------------------------
196  c  c
197  c     closes files and exits  c     closes files and exits
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.23