Parent Directory | Revision Log | Patch
revision 1.2 by pam-fi, Tue May 30 16:30:37 2006 UTC | revision 1.3 by mocchiut, Tue Jun 27 13:57:41 2006 UTC | |
---|---|---|
# | Line 37 c--------------------------------------- | Line 37 c--------------------------------------- |
37 | if(iflag.ne.0)then | if(iflag.ne.0)then |
38 | good1=0 | good1=0 |
39 | c if(DEBUG)print*,'event ',eventn(1),' >>>>> decode ERROR' | c if(DEBUG)print*,'event ',eventn(1),' >>>>> decode ERROR' |
40 | ierror = -220 | ierror = 220 |
41 | goto 200 | goto 200 |
42 | endif | endif |
43 |
|
ViewVC Help | |
Powered by ViewVC 1.1.23 |