c
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
c
      subroutine gutrack
c
c     T. Prokscha,      15-Sep-2000,    PSI
c
c     Unix version, part of the geant_lemsr program
c
cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
c
      implicit none
c
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
c
c     type*,' routine GUTRACK'
      call gtrack
      return
      end
