13 //*=== stars ============================================================*
15 //*----------------------------------------------------------------------*
17 //* stars common for fluka: *
19 //* version for fluka90/99/... of the original one of fluka86 *
22 //* created on 15 may 1990 by alfredo ferrari & paola sala *
25 //* last change on 07-oct-99 by alfredo ferrari *
28 //* description of the common variable(s): *
30 //* ntstar = total number of stars generated (modulo 1000000000) *
31 //* neulow = total number of low energy neutron interactions *
32 //* (modulo 1000000000) *
33 //* numdec = total number of decays (modulo 1000000000) *
34 //* mtstar = total number of stars generated / 100000000 *
35 //* meulow = total number of low energy neutron interactions *
37 //* mumdec = total number of decays (modulo 1000000000) *
38 //* wstars = total weight of the stars generated *
39 //* wneulw = total weight of the low energy neutron interactions *
40 //* westar = weight of the stars generated by *
41 //* different particle types *
42 //* westop = total weight of the particles stopped *
43 //* wstop = weight of particles of different types stopped *
44 //* weisec = total weight of the secondaries created *
45 //* weifis = total weight of high energy fissions *
46 //* weipri = total weight of the primaries handled *
47 //* edi = deposited energy *
48 //* edi(1) = by ionisation *
49 //* edi(2) = by pi-zeros and/or em cascade *
50 //* edi(3) = by nuclear excitation (or nuclear recoil *
51 //* and heavies if the evaporation module is *
53 //* edi(4) = by stopped particles *
54 //* edi(5) = energy leaving the system *
55 //* edi(6) = energy carried by discarded particles *
56 //* edi(7) = by residual excitation energy (only if the *
57 //* evaporation module is activated) *
58 //* edi(8) = by low energy neutrons (kerma due to low *
59 //* energy neutrons transport is in effect) *
60 //* edi(9) = energy carried by time killed particles *
61 //* edi(10)= energy wasted for nuclear binding energy *
62 //* effects for e > 50 mev *
63 //* edi(11)= energy wasted for nuclear binding energy *
64 //* effects for low energy neutrons *
65 //* wdec = weight of the particles decayed *
66 //* wdau = weight of the decay-products *
67 //* wtkll = weight of the time-killed particles *
68 //* wtdec = total weight of the particles decayed *
69 //* wtdau = total weight of the decay products *
70 //* wttkll = total weight of the time killed particles *
71 //* wlwnsc = weight of the low energy neutrons interaction secon- *
73 //* wdecct = weight of the particles decayed for which a c tau *
75 //* deccts = decay c tau scoring *
76 //*----------------------------------------------------------------------*
80 Double_t westar[nallwp+7];
81 Double_t wstop[nallwp+7];
82 Double_t wdau[nallwp+7];
83 Double_t wtkll[nallwp+7];
84 Double_t wdec[nallwp+7];
85 Double_t weifis[nallwp+7];
86 Double_t deccts[nallwp+7];
87 Double_t wdecct[nallwp+7];
88 Double_t weisec[nallwp+19];
109 #define STARS COMMON_BLOCK(STARS,stars)
110 COMMON_BLOCK_DEF(starsCommon,STARS);