/[PAMELA software]/DarthVader/TrackerLevel2/inc/F77/common_c2f.f
ViewVC logotype

Diff of /DarthVader/TrackerLevel2/inc/F77/common_c2f.f

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

revision 1.2 by pam-fi, Tue May 30 16:30:37 2006 UTC revision 1.4 by pam-fi, Wed Nov 8 16:42:28 2006 UTC
# Line 4  c     common to pass some variable from Line 4  c     common to pass some variable from
4  c------------------------------------------------------------------------  c------------------------------------------------------------------------
5    
6                
7        character*80 c2f_path        character*256 c2f_path
8        integer      c2f_pathlen        integer       c2f_pathlen
9        integer      c2f_error        integer       c2f_error
10        common/path/c2f_path,c2f_pathlen,c2f_error  cc      integer       c2f_loaded
11          common/path/c2f_path,c2f_pathlen,c2f_error!,c2f_loaded
12    
13        character*80 b_path  cc      character*256 b_path
14        integer      b_pathlen  cc      integer       b_pathlen
15        integer      b_loaded  cc      integer       b_loaded
16        integer      b_error  cc      integer       b_error
17        common/bpath/b_path,b_pathlen,b_loaded,b_error  cc      common/bpath/b_path,b_pathlen,b_loaded,b_error
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.23