COSMOS v7.655  COSMOSv7655
(AirShowerMC)
ZbpCnst.h
Go to the documentation of this file.
1 ! constants used for pair/brem in Air
2 
3  real*8 mbtoPX0 ! mbtoPgrm x X0g. If multiplied to sigma in mb,
4  ! we obtain probability /radation length.
5 
6  real*8 X0g ! radiation length. in g/cm^2
7 
8  real*8 cScrC1 ! const which appears in the complete screening
9  ! crossection
10  real*8 cScrC2 ! the other such one
11  real*8 cScrMain ! (4/3C1 + C2)
12 
13 
14  real*8 CompScrE ! Energy above which we can use complete screening
15  ! cross-sections. evaluate at Eg/Ee=x= 0.99.
16  ! 10 is marging.
17  ! This can be applied to pair creation, too.
18  ! 10.0*( 0.05*0.99/0.01/media.Zeff**0.333)
19  ! ~ 50GeV/Z**0.33
20  real*8 BrScrE ! below this, screened cross-section is used.
21  real*8 BremEgmin ! Brems gamma min. energy in Gev (100 keV)
22 
23  real*8 BremEemin ! Brems by e+/e- is considered at E > BremEemin
24  ! (Ek ~ 300 keV )
25  real*8 BremLEemin ! log10 of BremEemin
26  real*8 BremEemaxL ! Energy of e+/e- below which LPM is negelected
27  ! for brems. 5*rho_Pb/rho GeV.
28  integer BremTXTL ! Size of the Brems total x-section table.
29  ! in the energy region BremEemin ~ BremEemaxL:
30  ! log10(BremEemaxL/BremEemin)*10
31  integer BremEsize ! Size of log10 energy for 2D table for
32  ! brems in the region A. BremTXTL/2
33  real*8 BremUminLA ! min of uniform random number in the region A
34  ! at energies BremEemin ~ BremEemaxL: 0.05
35  real*8 BremUmaxLA ! max of uniform random number in the region A
36  ! at energies BremEemin ~ BremEemaxL: 1.0
37  integer BremUszLA ! Size of uniform random nubmbers for 2D table
38  ! for brems in the region A.: 20
39  real*8 BremdULA ! step of u in region A at Low energies
40  real*8 BremdETXL ! log10E step for brem total cross secton
41  ! log10(BremEemaxL/BremEemin)/(BremTXTL-1)
42  real*8 BremdEL ! log10 step for 2D brem table at low energies
43  real*8 BremUminLB ! min of uniform random number in the region B
44  ! 0. sqrt(u)
45  real*8 BremUmaxLB ! max. sqrt(BremUminLA)
46  integer BremUszLB ! u talbe size in region B. 20
47  real*8 BremdULB ! step of u in B
48 ! ---------------------------------------------
49 
50  real*8 PairEgmin ! min. Eg above which pair cross section is
51  ! computed 1.1 MeV. However,
52  ! at energies from PairEgmin to PairNonSc,
53  ! B.H original xsection is used as xsec=
54  ! Norm * B.H where
55  ! Norm * B.H(10MeV) = Pair(10MeV)
56  real*8 PairNonSc ! see above.
57  real*8 PairLEgmin ! log10 of PairEgmin
58  real*8 PairEgmaxL ! Eg where LPM effect starts to appear
59  real*8 PrScrE ! below this, screened cross-section is used.
60  integer PairTXTL ! Size of the Pair total x-section table.
61  ! in the energy region PairEgmin ~ PairEgmaxL;
62  ! log10(PairEgmaxL/PairEgemin)*10
63  integer PairEsize ! Size of log10 energy for 2D table for
64  ! pair in the region A,B. PairTXTL/2
65  real*8 PairUminLA !min of uniform random number in the region A
66  ! at energies PairEgmin ~ PairEgmaxL: 0.05
67  real*8 PairUmaxLA ! max of uniform random number in the region A
68  ! at energies PairEgmin ~ PairEgmaxL: 1.0
69  integer PairUszLA ! Size of uniform random nubmbers for 2D table
70  ! for pair in the region A.: 20
71 
72  real*8 PairdULA ! step of u in region A at Low energies
73  real*8 PairdETXL ! log10 step of total pair cross-sec at low E
74  real*8 PairUminLB ! min of uniform random number in the region B
75  ! 0. sqrt(u)
76  real*8 PairUmaxLB ! max. sqrt(PairUminLA)
77  integer PairUszLB ! u talbe size in region B. 20
78  real*8 PairdULB ! PairdULB=(PairUmaxLB-PairUminLB)/(PairUszLB-1))
79  real*8 PairdELA ! log10(PairEgmaxL/ PairEgmin) /( PairEsize-1)
80  real*8 PairdELB ! sqrt( log10(PairEgmaxL/ PairEgmin) )
81  ! /( PairEsize-1)
82 !
83 ! for Seltzer cross-section
84  real*8 BrEeminS
85  real*8 BrEgminS ! Eg min for Seltzer Brems.
86  real*8 BrLEeminS
87  real*8 BrEemaxS
88  integer BrTXTS
89  integer BrES
90  real*8 BrUminSA
91  real*8 BrUmaxSA
92  integer BrUszSA
93  real*8 BrdUSA
94  real*8 BrdETXS
95  real*8 BrdES
96  integer BrUszSB
97  real*8 BrUminSB
98  real*8 BrUmaxSB
99  real*8 BrdUSB
100 
101 
102 
103  common /Zrcnst/
104  *CompScrE, BrScrE, BremEgmin, BremEemin, BremLEemin, BremEemaxL,
105  *BremUminLA, BremUmaxLA, BremdULA, BremdETXL, BremdEL, BremUminLB,
106  *BremUmaxLB, BremdULB, PairEgmin, PairNonSc, PairLEgmin,
107  *PairEgmaxL, PrScrE, PairUminLA, PairUmaxLA, PairdULA, PairdETXL,
108  *PairUminLB, PairUmaxLB, PairdULB, PairdELA, PairdELB, BrEeminS,
109  *BrEgminS, BrLEeminS, BrEemaxS, BrUminSA, BrUmaxSA, BrdUSA,
110  *BrdETXS, BrdES, BrUminSB, BrUmaxSB, BrdUSB,
111  *cScrC1, cScrC2, cScrMain, mbtoPX0, X0g
112 ! * , muNVmin, muNdU, muNEmin, muNLEmin, muNEmax,
113 ! *muNEmax1, muNdETX, muNdE, muNpwtx, muNpwdEdx0, muNpwdEdxt,
114 ! *muBrVmin, muBrdU, muBrEmin, muBrLEmin, muBrEmax, muBrEmax1,
115 ! *muBrdETX, muBrdE, muPrVmin, muPrdU, muPrEmin, muPrLEmin,
116 ! *muPrEmax, muPrEmax1, muPrdETX, muPrdE
117 
118  common /Zicnst/
119  *BremTXTL, BremEsize, BremUszLA, BremUszLB, PairTXTL, PairEsize,
120  *PairUszLA, PairUszLB, BrTXTS, BrES, BrUszSA, BrUszSB
121 ! * , muNTXT, muNUsize
122 ! *, muNEsize, muBrTXT, muBrUsize, muBrEsize, muPrTXT, muPrUsize,
123 ! *muPrEsize
124 
BremUmaxLB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin * BremUmaxLB
Definition: ZbpCnst.h:104
BrdES
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrdES
Definition: ZbpCnst.h:104
BrEeminS
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrEeminS
Definition: ZbpCnst.h:104
BrUszSA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSA
Definition: ZbpCnst.h:104
muNEmax
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNEmax
Definition: ZbpCnst.h:104
real
float real
Definition: Zdef.h:2
muNpwdEdxt
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNpwdEdxt
Definition: ZbpCnst.h:104
muBrdE
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muBrdE
Definition: ZbpCnst.h:104
BremdEL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremdEL
Definition: ZbpCnst.h:104
PairEsize
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst PairEsize
Definition: ZbpCnst.h:104
PairUszLB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst PairUszLB
Definition: ZbpCnst.h:104
integer
int integer
Definition: Zdef.h:3
PairNonSc
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairNonSc
Definition: ZbpCnst.h:104
muBrEmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muBrEmin
Definition: ZbpCnst.h:104
BrUminSB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrUminSB
Definition: ZbpCnst.h:104
BremdULA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremdULA
Definition: ZbpCnst.h:104
e
dE dx *! Nuc Int sampling table e
Definition: cblkMuInt.h:130
PairEgmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairEgmin
Definition: ZbpCnst.h:104
BremUminLA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin * BremUminLA
Definition: ZbpCnst.h:104
muNVmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNVmin
Definition: ZbpCnst.h:104
muBrLEmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muBrLEmin
Definition: ZbpCnst.h:104
~ PairEgmaxL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin ~ PairEgmaxL
Definition: ZbpCnst.h:104
PairUminLB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin * PairUminLB
Definition: ZbpCnst.h:104
BrEemaxS
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrEemaxS
Definition: ZbpCnst.h:104
muBrVmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g * muBrVmin
Definition: ZbpCnst.h:104
cScrC1
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin * cScrC1
Definition: ZbpCnst.h:104
muBrEmax1
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muBrEmax1
Definition: ZbpCnst.h:104
muPrEmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrEmin
Definition: ZbpCnst.h:104
BrLEeminS
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrLEeminS
Definition: ZbpCnst.h:104
BremEsize
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BremEsize
Definition: ZbpCnst.h:104
PairdELA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairdELA
Definition: ZbpCnst.h:104
BremEemaxL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremEemaxL
Definition: ZbpCnst.h:104
PairTXTL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst PairTXTL
Definition: ZbpCnst.h:104
muBrTXT
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSB muNUsize muBrTXT
Definition: ZbpCnst.h:104
muBrEmax
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muBrEmax
Definition: ZbpCnst.h:104
muNTXT
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSB muNTXT
Definition: ZbpCnst.h:104
BrEgminS
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin * BrEgminS
Definition: ZbpCnst.h:104
PairEgmaxL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin * PairEgmaxL
Definition: ZbpCnst.h:104
mb
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in mb
Definition: ZbpCnst.h:3
PairdELB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairdELB
Definition: ZbpCnst.h:104
BremUszLA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BremUszLA
Definition: ZbpCnst.h:104
BrUmaxSB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrUmaxSB
Definition: ZbpCnst.h:104
muNpwdEdx0
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNpwdEdx0
Definition: ZbpCnst.h:104
PrScrE
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PrScrE
Definition: ZbpCnst.h:104
as
! Parameters used for hadronic cascade shower is generated newline ! For you may give as as or em as(order/case/separator insensitive) is to generate EM-cascade and AS. \newline ! Generate
PairdULA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairdULA
Definition: ZbpCnst.h:104
muPrEmax
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g * muPrEmax
Definition: ZbpCnst.h:104
muNEmax1
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g * muNEmax1
Definition: ZbpCnst.h:104
PairdULB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairdULB
Definition: ZbpCnst.h:104
BrUmaxSA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrUmaxSA
Definition: ZbpCnst.h:104
BremUszLB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BremUszLB
Definition: ZbpCnst.h:104
If
integer Charge2heavyG charge of heavy rightarrow heavy group index conversion array integer HeavyG2massN heavy group index rightarrow mass number conversion array integer HeavyG2charge heavy group index rightarrow charge of heavy conversion array integer HeavyG2code heavy group index rightarrow particle code conversion array integer Code2massN particle code rightarrow mass number conversion array integer Code2heavyG particle code rightarrow heavy group index conversion array real *FragmentTbl the number of interacting nucleons among a projectile heavy nucleus is ! determined as the number of first collision of each interacting nucleon inside ! the nucleus If
Definition: Zheavyp.h:17
muNEmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNEmin
Definition: ZbpCnst.h:104
to
integer maxbin nregion c minsave drx2 ! drawing region real maxdep integer maxpos integer to
Definition: Zfit.h:15
low
block data include Zlatfit h c fitting region data data data data data d0 data data d0 data data h g *is for param c g data low(1, 1)/1.d-5/
muPrTXT
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSB muNUsize muPrTXT
Definition: ZbpCnst.h:104
BrScrE
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrScrE
Definition: ZbpCnst.h:104
muNdE
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNdE
Definition: ZbpCnst.h:104
muNdETX
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNdETX
Definition: ZbpCnst.h:104
BrdETXS
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin * BrdETXS
Definition: ZbpCnst.h:104
However
! Parameters used for hadronic cascade shower is generated newline ! For you may give as as or em quick generation of AS for heavy primaries is tried See chookASbyH f character *Generate2 don t touch this for skeleton flesh use integer MagBrem no magnetic bremsstrahlung is considered newline ! if and Ee energy loss due to magnetic brems is considered newline ! if and Ee real sampling of gamma is performed WaitRatio ! must be made small so that WaitRatio *E0 sim MagBremEmin integer MagPair no magnetic pair creation is considered newline ! if and Eg real sampling is the LPM effect is considered when Ee LpmBremEmin for electrons and ! Eg LpmPairEmin for gamma rays real *MagBremEmin E magnetic bremsstrahlung by electrons may be considered However
Definition: Ztrackp.h:169
mbtoPX0
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin mbtoPX0
Definition: ZbpCnst.h:104
muPrEmax1
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrEmax1
Definition: ZbpCnst.h:104
muNpwtx
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNpwtx
Definition: ZbpCnst.h:104
PairUmaxLA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairUmaxLA
Definition: ZbpCnst.h:104
muPrEsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrEsize
Definition: Zcmuint.h:5
BrUminSA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrUminSA
Definition: ZbpCnst.h:104
PairUminLA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairUminLA
Definition: ZbpCnst.h:104
muNUsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNUsize
Definition: Zcmuint.h:5
PairUmaxLB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairUmaxLB
Definition: ZbpCnst.h:104
muBrEsize
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSB muNUsize muBrEsize
Definition: ZbpCnst.h:104
muNEsize
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSB muNUsize muNEsize
Definition: ZbpCnst.h:104
muNdU
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNdU
Definition: ZbpCnst.h:104
PairLEgmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairLEgmin
Definition: ZbpCnst.h:104
BrdUSA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrdUSA
Definition: ZbpCnst.h:104
BrdUSB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BrdUSB
Definition: ZbpCnst.h:104
muPrLEmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrLEmin
Definition: ZbpCnst.h:104
muPrdU
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdU
Definition: ZbpCnst.h:104
cScrMain
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin cScrMain
Definition: ZbpCnst.h:104
BremLEemin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremLEemin
Definition: ZbpCnst.h:104
BremEemin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremEemin
Definition: ZbpCnst.h:104
muPrUsize
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSB muNUsize muPrUsize
Definition: ZbpCnst.h:104
muPrVmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrVmin
Definition: ZbpCnst.h:104
E
real E
Definition: Zflux.h:1
BremUmaxLA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremUmaxLA
Definition: ZbpCnst.h:104
PairUszLA
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst * PairUszLA
Definition: ZbpCnst.h:104
muNLEmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muNLEmin
Definition: ZbpCnst.h:104
g
dE dx *! Nuc Int sampling table g
Definition: cblkMuInt.h:130
PairdETXL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin PairdETXL
Definition: ZbpCnst.h:104
BremEgmin
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremEgmin
Definition: ZbpCnst.h:104
BremUminLB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremUminLB
Definition: ZbpCnst.h:104
muBrdU
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muBrdU
Definition: ZbpCnst.h:104
where
*Zfirst p fm *Zfirst p Zfirst p Zfirst p *Zfirst p *Zfirst pos xyz Zfirst pos xyz *Zfirst pos *Zfirst pos Zfirst pos *Zfirst pos *Zfirst Zfirst vec w *Zfirst vec w Zfirst vec *Zfirst Zfirst where
Definition: ZavoidUnionMap.h:1
cScrC2
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin cScrC2
Definition: ZbpCnst.h:104
BremdULB
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremdULB
Definition: ZbpCnst.h:104
BremdETXL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin BremdETXL
Definition: ZbpCnst.h:104
from
integer maxbin nregion c minsave drx2 ! drawing region real maxdep integer maxpos integer from
Definition: Zfit.h:15
muPrdETX
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdETX
Definition: ZbpCnst.h:104
muPrdE
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrdE
Definition: Zcmuint.h:5
is
block data cblkIncident data *Za1ry is
Definition: cblkIncident.h:5
BrTXTS
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrTXTS
Definition: ZbpCnst.h:104
muBrUsize
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrUszSB muNUsize muBrUsize
Definition: ZbpCnst.h:104
x
! structure defining a particle at production ! Basic idea of what is to be contained in ! the particle structue is that dynamical ones should be included those derivable from the particle code ! is not included ******************************************************type fmom momentum sequence union map real e endmap map real * x
Definition: Zptcl.h:21
BremTXTL
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst * BremTXTL
Definition: ZbpCnst.h:104
BrES
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g muPrdE common Zicnst BrES
Definition: ZbpCnst.h:104
muBrdETX
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below screened cross section is used real *BremEgmin ! Brems gamma min energy in Gev(100 keV) real *8 BremEemin ! Brems by e+/e- is considered at E > BremEemin !(Ek ~ 300 keV) real *8 BremLEemin ! log10 of BremEemin real *8 BremEemaxL ! Energy of e+/e- below which LPM is negelected ! for brems. 5 *rho_Pb/rho GeV. integer BremTXTL ! Size of the Brems total x-section table. ! in the energy region BremEemin ~ BremEemaxL B PairTXTL real *PairUminLA !min of uniform random number in the region A ! at energies PairEgmin X0g * muBrdETX
Definition: ZbpCnst.h:104