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

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

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

revision 1.3 by pam-fi, Fri Aug 17 14:36:06 2007 UTC revision 1.4 by pam-fi, Fri Aug 17 16:45:20 2007 UTC
# Line 303  c     return Line 303  c     return
303       $              //'*** Error reading file *** '       $              //'*** Error reading file *** '
304       $              ,c2f_path(1:c2f_pathlen)       $              ,c2f_path(1:c2f_pathlen)
305       $              //fname_param(1:LNBLNK(fname_param))       $              //fname_param(1:LNBLNK(fname_param))
306                 c2f_error = 1  c               c2f_error = 1 !lo commento solo per il momento
307                 goto 3000                         goto 3000        
308              endif              endif
309                    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

  ViewVC Help
Powered by ViewVC 1.1.23