*     -*-fortran-*-

      character*12 ProjectileDIS
      character*4  InProjectileDIS
*
      common / ProjectileDISAPFEL / ProjectileDIS,InProjectileDIS