gpamela/gcdes/gcphys.inc

*
* $Id$
*
* $Log$
*
*
* gcphys.inc
*
      COMMON/GCPHYS/IPAIR,SPAIR,SLPAIR,ZINTPA,STEPPA
     +             ,ICOMP,SCOMP,SLCOMP,ZINTCO,STEPCO
     +             ,IPHOT,SPHOT,SLPHOT,ZINTPH,STEPPH
     +             ,IPFIS,SPFIS,SLPFIS,ZINTPF,STEPPF
     +             ,IDRAY,SDRAY,SLDRAY,ZINTDR,STEPDR
     +             ,IANNI,SANNI,SLANNI,ZINTAN,STEPAN
     +             ,IBREM,SBREM,SLBREM,ZINTBR,STEPBR
     +             ,IHADR,SHADR,SLHADR,ZINTHA,STEPHA
     +             ,IMUNU,SMUNU,SLMUNU,ZINTMU,STEPMU
     +             ,IDCAY,SDCAY,SLIFE ,SUMLIF,DPHYS1
     +             ,ILOSS,SLOSS,SOLOSS,STLOSS,DPHYS2
     +             ,IMULS,SMULS,SOMULS,STMULS,DPHYS3
     +             ,IRAYL,SRAYL,SLRAYL,ZINTRA,STEPRA
      COMMON/GCPHLT/ILABS,SLABS,SLLABS,ZINTLA,STEPLA
     +             ,ISYNC
     +             ,ISTRA
*
#if defined(GPAMELA_TYPE)
#include "gtphys.inc"
#endif
*
* gcphys.inc
*
#if defined(GPAMELA_INCLUDE)
*
#include "incbeg.inc"
     +   gcphys
#include "incend.inc"
#endif
1	*
2	* $Id$
3	*
4	* $Log$
5	*
6	*
7	* gcphys.inc
8	*
9	COMMON/GCPHYS/IPAIR,SPAIR,SLPAIR,ZINTPA,STEPPA
10	+ ,ICOMP,SCOMP,SLCOMP,ZINTCO,STEPCO
11	+ ,IPHOT,SPHOT,SLPHOT,ZINTPH,STEPPH
12	+ ,IPFIS,SPFIS,SLPFIS,ZINTPF,STEPPF
13	+ ,IDRAY,SDRAY,SLDRAY,ZINTDR,STEPDR
14	+ ,IANNI,SANNI,SLANNI,ZINTAN,STEPAN
15	+ ,IBREM,SBREM,SLBREM,ZINTBR,STEPBR
16	+ ,IHADR,SHADR,SLHADR,ZINTHA,STEPHA
17	+ ,IMUNU,SMUNU,SLMUNU,ZINTMU,STEPMU
18	+ ,IDCAY,SDCAY,SLIFE ,SUMLIF,DPHYS1
19	+ ,ILOSS,SLOSS,SOLOSS,STLOSS,DPHYS2
20	+ ,IMULS,SMULS,SOMULS,STMULS,DPHYS3
21	+ ,IRAYL,SRAYL,SLRAYL,ZINTRA,STEPRA
22	COMMON/GCPHLT/ILABS,SLABS,SLLABS,ZINTLA,STEPLA
23	+ ,ISYNC
24	+ ,ISTRA
25	*
26	#if defined(GPAMELA_TYPE)
27	#include "gtphys.inc"
28	#endif
29	*
30	* gcphys.inc
31	*
32	#if defined(GPAMELA_INCLUDE)
33	*
34	#include "incbeg.inc"
35	+ gcphys
36	#include "incend.inc"
37	#endif