      subroutine user_evt2
c
c user pass 2 event routine
c
      implicit none
c
c user code
c
      end

