source: ZHANGProjects/ICOSIM/CPP/trunk/flukaIntegration/fluka/flukaio.inc @ 5

Last change on this file since 5 was 5, checked in by zhangj, 10 years ago

Initial import.
File size: 431 bytes
Line 
1**    FlukaIO
2*     Declaration of FlukaIO interfaces and constants
3*
4      INTEGER NTACCEPT, NTSTART, NTSENDP, NTSENDEOT
5      INTEGER NTSENDEOC, NTSHDWN, NTWAIT, NTEND
6      INTEGER N_PART, N_TURN, N_END
7      parameter (N_PART = 1)
8      parameter (N_TURN = 2)
9      parameter (N_END  = 3)
10
11      INTEGER IPORT
12      INTEGER ICID, IDP, ITURN, IDGEN
13      DOUBLE PRECISION T
14      COMMON /FLUKAIO/ IPORT, ICID, IDP, ITURN, IDGEN
Note: See TracBrowser for help on using the repository browser.