--- DarthVader/TrackerLevel2/inc/F77/common_c2f.f 2006/05/30 16:30:37 1.2 +++ DarthVader/TrackerLevel2/inc/F77/common_c2f.f 2006/11/08 16:42:28 1.4 @@ -4,13 +4,14 @@ c------------------------------------------------------------------------ - character*80 c2f_path - integer c2f_pathlen - integer c2f_error - common/path/c2f_path,c2f_pathlen,c2f_error + character*256 c2f_path + integer c2f_pathlen + integer c2f_error +cc integer c2f_loaded + common/path/c2f_path,c2f_pathlen,c2f_error!,c2f_loaded - character*80 b_path - integer b_pathlen - integer b_loaded - integer b_error - common/bpath/b_path,b_pathlen,b_loaded,b_error +cc character*256 b_path +cc integer b_pathlen +cc integer b_loaded +cc integer b_error +cc common/bpath/b_path,b_pathlen,b_loaded,b_error