EPOS/epos167/eposu.f

   1       subroutine urqmd
   2       include 'epos.inc'
   3
   4 ccc      if(iurqmd.eq.1)stop'uncomment urqmd calls in eposu.f     '
   5
   6 c      call urqmdinit
   7 c      call urqmdepos
   8 c      call urqmdexit
   9
  10       end