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------------------------------------------------------------------------