*     -*-fortran-*-

      integer irep
      character*4 InRep
*
      common / iReplicaAPFEL / irep,InRep