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 |
common/path/c2f_path,c2f_pathlen,c2f_error |
11 |
|
|
12 |
character*80 b_path |
character*256 b_path |
13 |
integer b_pathlen |
integer b_pathlen |
14 |
integer b_loaded |
integer b_loaded |
15 |
integer b_error |
integer b_error |
16 |
common/bpath/b_path,b_pathlen,b_loaded,b_error |
common/bpath/b_path,b_pathlen,b_loaded,b_error |