F77/common/common_c2f.f

C-----------------------------------------------------------------------
C     variables for file rz
C-----------------------------------------------------------------------
      
      REAL hmemor(9000000)
      integer Iquest(100)    
      COMMON /pawc/hmemor
      save /pawc/
      Common /QUEST/ Iquest
      save /quest/

C------------------------------------------------------------------------
    
c------------------------------------------------------------------------
c     common to pass some variable from C++ to FORTRAN routines
c------------------------------------------------------------------------
      character*80 path
      integer      pathlen
      integer      error
      common/path/path,pathlen,error
C------------------------------------------------------------------------
1	C-----------------------------------------------------------------------
2	C variables for file rz
3	C-----------------------------------------------------------------------
4
5	REAL hmemor(9000000)
6	integer Iquest(100)
7	COMMON /pawc/hmemor
8	save /pawc/
9	Common /QUEST/ Iquest
10	save /quest/
11
12	C------------------------------------------------------------------------
13
14	c------------------------------------------------------------------------
15	c common to pass some variable from C++ to FORTRAN routines
16	c------------------------------------------------------------------------
17	character*80 path
18	integer pathlen
19	integer error
20	common/path/path,pathlen,error
21	C------------------------------------------------------------------------