/[PAMELA software]/yoda/techmodel/forroutines/tof/tofunpack.for
ViewVC logotype

Diff of /yoda/techmodel/forroutines/tof/tofunpack.for

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

revision 6.3 by mocchiut, Tue Sep 12 08:56:29 2006 UTC revision 6.4 by mocchiut, Fri Oct 20 11:07:42 2006 UTC
# Line 427  c Line 427  c
427  c      if (check.ne.vecta(ic)) then  c      if (check.ne.vecta(ic)) then
428        me = 0        me = 0
429        if (check.ne.ibuf) then        if (check.ne.ibuf) then
430           print *,'crc wrong ',ibuf, check  c         print *,'crc wrong ',ibuf, check
431           me = 1           me = 1
432        endif        endif
433    
Legend:
Removed from v.6.3  
changed lines
  Added in v.6.4
  ViewVC Help
Powered by ViewVC 1.1.23