C...Internal variables.
      COMMON/PYINT1/MINT(400),VINT(400)
      integer MINT
      double precision VINT