module inform
      implicit none
      integer maxask
      parameter (maxask=5)
      integer digits,jprint
      integer iwrite,isend
      logical silent,verbose
      logical debug,holdup
      logical abort
      save
      end