sane_geant_mc/SRC/gutrev.f - view

Return to gutrev.f CVS log

Up to [HallC] / sane_geant_mc / SRC

File: [HallC] / sane_geant_mc / SRC / gutrev.f (download)
Revision: 1.1, Thu Apr 22 13:13:58 2010 UTC (14 years, 5 months ago) by jones
Branch: MAIN
CVS Tags: HEAD

in new subdirectory

*CMZ :          29/03/94  15.41.35  by  S.Giani
*-- Author :
      SUBROUTINE GUTREV
      include 'beta_geom.inc'
      include 'geant.inc'
      include 'sane.inc'
      include 'sane_misc.inc'
      include 'materials.inc'
      include 'sane_cwn.inc' 
C.
C.    *
C.    *       User routine to control tracking of one event
C.    *
C.    *       Called by GRUN
C.    *
C.
c      write(*,*)'Start GUTREV',ee
      CALL GTREVE
c      write(*,*)'Stop GUTREV'
C
      END

Analyzer/Replay: Mark Jones, Documents: Stephen Wood