source:
trunk/examples/extended/electromagnetic/TestEm4/geant3/src/uhinit.F@
1036
| Last change on this file since 1036 was 807, checked in by , 17 years ago | |
|---|---|
| File size: 774 bytes | |
| Line | |
|---|---|
| 1 | |
| 2 | SUBROUTINE UHINIT |
| 3 | * |
| 4 | * To book the user's histograms |
| 5 | * |
| 6 | CALL HBOOK1(1,'total energy deposit in C6F6 (MeV)' |
| 7 | *,100, 0., 10., 0.) |
| 8 | |
| 9 | CALL HIDOPT(0,'STAT') |
| 10 | * |
| 11 | END |
Note:
See TracBrowser
for help on using the repository browser.
