Parent Directory | Revision Log | Patch
revision 1.5 by pam-fi, Tue Nov 7 15:55:11 2006 UTC | revision 1.6 by pam-fi, Wed Nov 8 10:12:01 2006 UTC | |
---|---|---|
# | Line 104 c$$$ endif | Line 104 c$$$ endif |
104 | do iv = 1,nviews | do iv = 1,nviews |
105 | ngood = ngood + good1(iv) | ngood = ngood + good1(iv) |
106 | enddo | enddo |
107 | if(ngood.ne.0)print*,'* WARNING * Event ' | c$$$ if(ngood.ne.0)print*,'* WARNING * Event ' |
108 | $ ,':LEVEL2 event status: ' | c$$$ $ ,':LEVEL2 event status: ' |
109 | $ ,(good2(i),i=1,nviews) | c$$$ $ ,(good2(i),i=1,nviews) |
110 | ||
111 | 8800 continue | 8800 continue |
112 |
|
ViewVC Help | |
Powered by ViewVC 1.1.23 |