TestEm3/geant3/src/gutrev.F File Reference

#include "calor.inc"
#include "celoss.inc"

Include dependency graph for TestEm3/geant3/src/gutrev.F:

Go to the source code of this file.

Functions/Subroutines
subroutine	gutrev

Function/Subroutine Documentation

gutrev()

subroutine gutrev

(

)

Definition at line 3 of file TestEm3/geant3/src/gutrev.F.

*
*     User routine to control tracking of one event
*     Called by GRUN
*
#include "calor.inc"
#include "celoss.inc"
*
      do k=1,nbabsor
        edepabs(k) = 0.
        trckabs(k) = 0.
      enddo                                                               
*
      CALL gtreve                                                               
*