      COMMON /PYINT1/ MINT(400),VINT(400)
      SAVE /PYINT1/
