*     -*-fortran-*-

      integer k,wnf,wnl,walpha,wbeta,wipt
*
      common / WrappingVariablesAPFEL / k,wnf,wnl,walpha,wbeta,wipt