*
* $Id: gcjloc.inc,v 1.1.1.1 2007/01/22 17:32:34 phseaj Exp $
*
* $Log: gcjloc.inc,v $
* Revision 1.1.1.1  2007/01/22 17:32:34  phseaj
* sholder-g77
*
* Revision 1.1.1.1  2006/11/14 09:23:35  phseaj
* Sourceholder
*
* Revision 1.1  2004/07/12 04:56:27  dcasper
* Add common blocks needed for GEANE
*
* Revision 1.1.1.1  1995/10/24 10:20:31  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_GCJLOC_INC
#define CERNLIB_GEANT321_GCJLOC_INC
*
*
* gcjloc.inc
*
#if !defined(CERNLIB_INCLUDE)
      COMMON/GCJLOC/NJLOC(2),JTM,JMA,JLOSS,JPROB,JMIXT,JPHOT,JANNI
     +                  ,JCOMP,JBREM,JPAIR,JDRAY,JPFIS,JMUNU,JRAYL
     +                  ,JMULOF,JCOEF,JRANG
C
      INTEGER       NJLOC   ,JTM,JMA,JLOSS,JPROB,JMIXT,JPHOT,JANNI
     +                  ,JCOMP,JBREM,JPAIR,JDRAY,JPFIS,JMUNU,JRAYL
     +                  ,JMULOF,JCOEF,JRANG
C
      COMMON/GCJLCK/NJLCK(2),JTCKOV,JABSCO,JEFFIC,JINDEX,JCURIN
     +                      ,JPOLAR,JTSTRA,JTSTCO,JTSTEN,JTASHO
C
      EQUIVALENCE (JLASTV,JTSTEN)
C
      INTEGER       NJLCK,JTCKOV,JABSCO,JEFFIC,JINDEX,JCURIN
     +                   ,JPOLAR,JLASTV,JTSTRA,JTSTCO,JTSTEN
     +                   ,JTASHO
C
#endif
*
* gcjloc.inc
*
#if defined(CERNLIB_INCLUDE)
*
#include "geant321/incbeg.inc"
     +   gcjloc
#include "geant321/incend.inc"
#endif

#endif
