inc/F77/common_c2f.f


c------------------------------------------------------------------------
c     common to pass some variable from C++ to FORTRAN routines
c------------------------------------------------------------------------

      
      character*256 c2f_path
      integer       c2f_pathlen
      integer       c2f_error
      common/path/c2f_path,c2f_pathlen,c2f_error

      character*256 b_path
      integer       b_pathlen
      integer       b_loaded
      integer       b_error
      common/bpath/b_path,b_pathlen,b_loaded,b_error
1	mocchiut	1.1
2			c------------------------------------------------------------------------
3			c common to pass some variable from C++ to FORTRAN routines
4			c------------------------------------------------------------------------
5
6
7	pam-fi	1.3	character*256 c2f_path
8			integer c2f_pathlen
9			integer c2f_error
10	pam-fi	1.2	common/path/c2f_path,c2f_pathlen,c2f_error
11	mocchiut	1.1
12	pam-fi	1.3	character*256 b_path
13			integer b_pathlen
14			integer b_loaded
15			integer b_error
16	pam-fi	1.2	common/bpath/b_path,b_pathlen,b_loaded,b_error