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

c------------------------------------------------------------------------
c
c     variables passed from TRACKEREXE.cra
c
c------------------------------------------------------------------------
      
c$$$      integer trkpaw
c$$$      integer procerr
c$$$
c$$$      common/c2red/trkpaw,procerr

c     =============================
c$$$      character*80 pedsig_parampath
c$$$      character*80 charge_parampath
c$$$      character*80 mip_parampath
c$$$      character*80 eta_parampath
c$$$      character*80 B_parampath
c$$$      character*80 align_parampath
c$$$      character*80 mask_parampath
c$$$      integer pedsig_pathlen
c$$$      integer mip_pathlen
c$$$      integer charge_pathlen
c$$$      integer eta_pathlen
c$$$      integer B_pathlen
c$$$      integer align_pathlen
c$$$      common/parampath/
c$$$     $      pedsig_parampath
c$$$     $     ,mip_parampath
c$$$     $     ,charge_parampath
c$$$     $     ,eta_parampath
c$$$     $     ,B_parampath
c$$$     $     ,align_parampath
c$$$     $     ,mask_parampath
c$$$     $     ,pedsig_pathlen
c$$$     $     ,mip_pathlen
c$$$     $     ,charge_pathlen
c$$$     $     ,eta_pathlen
c$$$     $     ,B_pathlen
c$$$     $     ,align_pathlen
c$$$     $     ,mask_pathlen

      
      character*80 c2f_path
      integer      c2f_pathlen
      integer      c2f_error
      integer      c2f_debug
      common/path/c2f_path,c2f_pathlen,c2f_error,c2f_debug

      character*80 b_path
      integer      b_pathlen
      integer      b_loaded
      integer      b_error
      integer      b_debug
      common/bpath/b_path,b_pathlen,b_loaded,b_error,b_debug
