C LUDAT1
      INTEGER MSTJ,MSTU
      REAL    PARJ,PARU
      COMMON /LUDAT1/ MSTU(200),PARU(200),MSTJ(200),PARJ(200)