Geant4_10
Main Page
Related Pages
Modules
Namespaces
Classes
Files
File List
File Members
source
examples
extended
electromagnetic
TestEm4
geant3
src
uglast.F
Go to the documentation of this file.
1
2
SUBROUTINE
uglast
3
*
4
* Termination routine to print histograms and statistics
5
*
6
#include "geant321/gcflag.inc"
7
*
8
*
9
CALL glast
10
*
11
* *** print selected histo
12
*
13
* *** close HIGZ
14
CALL hplend
15
*
16
* *** Save selected histograms
17
IF
(iswit(2).EQ.1)
THEN
18
CALL hrput(0,
'testem4.paw'
,
'N'
)
19
ENDIF
20
*
21
END
uglast
subroutine uglast
Definition:
uglast.F:2
Generated on Sat Dec 14 2013 14:33:08 for Geant4_10 by
1.8.5