COSMOS v7.655  COSMOSv7655
(AirShowerMC)
Zelemagp.h
Go to the documentation of this file.
1 ! parameters for Elemag process.
2 ! (-> ----------------------------------------------
3 
4  real*8 RecoilKineMinE !2 Recoil Kinetic Min Energy above which the recoil (=knock-on process)
5  ! is treated. Below this energy, the effect is included as continuous
6  ! energy loss. Used only if KnockOnRatio $>$ 1.
7  ! If this is 0 or if KnockOnRatio =1, KEminObs(gamma)=KEminObs(elec) is used.
8  ! See also KnockOnRatio.
9  real*8 KnockOnRatio !2 KnockOnRatio* KEminoObs is used instead of RecoilKineMinE if KnockOnRatio $<$1.
10  real*8 X0 !2 Radiation length in kg/m$^2$ for air. Normally the user should not touch this.
11  real*8 Ecrit !2 Critical energy in GeV. \newline
12  ! Employed only when calculating air shower size in the hybrid
13  ! air shower generation. The value would be dependent on the
14  ! experimental purpose. The default value, 81 MeV, is bit too
15  ! small in many applications (The air shower size is overestimated).
16  ! Comparisons of sizes by the hybrid method and by the full Monte
17  ! Carlo tell that \newline
18  ! $N_e$ (full 3-D M.C) $ < N_e$ (hybrid AS with $E_c=81$ MeV ) $ < N_e$ (full 1-D M.C)
19  ! $ {\ \lower-1.2pt\vbox{\hbox{\rlap{$<$}\lower5pt\vbox{\hbox{$\sim$}}}}\ }
20  ! N_e$(hybrid AS with $E_c={76}$ MeV) at around shower maximum.
21  ! Hybrid AS is always essentially 1-D.
22 
23  logical Knockon !2 Obsolete. Don't use this. See RecoilKineMinE
24  ! and KnockonRatio.
25  real*8 AnihiE !2 If E(positron) $<$ AnihiE, annihilation is considered.
26  real*8 Es !2 Modified scattering constant. 19.3d-3 GeV
27  real*8 MaxComptonE !2 Above this energy, Compton scattering is neglected.
28  real*8 MaxPhotoE !2 Above this energy, photoelectric effect is neglected.
29  real*8 MinPhotoProdE !1 Below this energy, no photo-prod of hadron. See also PhotoProd.
30  logical PhotoProd !1 Switch. if .false., no photo prod. of hadron is considered at all.
31  ! See also MinPhotoProdE, HowPhotoP
32  real*8 Excom1 !2 (GeV). If photon energy is <= Excom1, use XCOM data for
33  ! compton/p.e/coherent scattering (must be < 100 GeV).
34  real*8 Excom2 !2 (GeV). If photon energy is <=Excom2, use XCOM data for
35  ! pair creation cross-section. (must be< 100 GeV).
36  integer Moliere !2 2$\rightarrow$ use Moliere scat.\newline
37  ! 0$\rightarrow$ use Gaussian scattrign. \newline
38  ! 1$\rightarrow$ use Moli\`ere scattering for non-electrons \newline
39  ! 2$\rightarrow$ use Moli\`ere scattering for all charged
40  ! particles. But treatment is not so rigorous as case of 3.
41  ! \newline
42  ! 3$\rightarrow$ use rigorus Moliere scattering. Diff. from 2 is verysmall. May be some effect in the
43  ! core region.
44  integer ALateCor !2 1$\rightarrow$ angular and lateral correlation is taken into account when Moliere=0 .\newline
45  ! t$\rightarrow$ Use angular-lateral correlation by Gaussian
46  ! approximation. No effect is seen if path length is short.
47 
48 ! <-) ----------------------------------------------
49 
50  common /Zelemagc/ RecoilKineMinE, KnockOnRatio,
51  * AnihiE, MaxComptonE,
52  * MaxPhotoE, MinPhotoProdE, Es, X0, Excom1, Excom2,
53  * Ecrit, Knockon,
54  * PhotoProd, Moliere, ALateCor
55 
56 
57 
real(8), parameter, public m
Definition: cpdgXs.f:13
! parameters for Elemag * Ecrit
Definition: Zelemagp.h:50
float real
Definition: Zdef.h:2
! This namelist data is frequently used ! Some of them should be given mandatory namelist Param KEminObs
Definition: Znamelist1.h:5
! parameters for Elemag process(-> ---------------------------------------------- real *8 RecoilKineMinE !2 Recoil Kinetic Min Energy above which the recoil(=knock-on process) ! is treated. Below this energy, the effect is included as continuous ! energy loss. Used only if KnockOnRatio $>$ 1. ! If this is 0 or if KnockOnRatio=1, KEminObs(gamma)=KEminObs(elec) is used. ! See also KnockOnRatio. real *8 KnockOnRatio !2 KnockOnRatio *KEminoObs is used instead of RecoilKineMinE if KnockOnRatio $< $1. real *8 X0 !2 Radiation length in kg/m$^2$ for air. Normally the user should not touch this. real *8 Ecrit !2 Critical energy in GeV. \newline ! Employed only when calculating air shower size in the hybrid ! air shower generation. The value would be dependent on the ! experimental purpose. The default value, 81 MeV, is bit too ! small in many applications(The air shower size is overestimated). ! Comparisons of sizes by the hybrid method and by the full Monte ! Carlo tell that \newline ! $N_e$(full 3-D M.C) $< N_e$(hybrid AS with $E_c=81$ MeV) $< N_e$(full 1-D M.C) ! $ {\ \lower-1.2pt\vbox{\hbox{\rlap{$<$}\lower5pt\vbox{\hbox{$\sim$}}}}\ } ! N_e$(hybrid AS with $E_c={76}$ MeV) at around shower maximum. ! Hybrid AS is always essentially 1-D. logical Knockon !2 Obsolete. Don 't use this. See RecoilKineMinE ! and KnockonRatio. real *8 AnihiE !2 If E(positron) $<$ AnihiE, annihilation is considered. real *8 Es !2 Modified scattering constant. 19.3d-3 GeV real *8 MaxComptonE !2 Above this energy, Compton scattering is neglected. real *8 MaxPhotoE !2 Above this energy, photoelectric effect is neglected. real *8 MinPhotoProdE !1 Below this energy, no photo-prod of hadron. See also PhotoProd. logical PhotoProd !1 Switch. if .false., no photo prod. of hadron is considered at all. ! See also MinPhotoProdE, HowPhotoP real *8 Excom1 !2(GeV). If photon energy is<=Excom1, use XCOM data for ! compton/p.e/coherent scattering(must be< 100 GeV). real *8 Excom2 !2(GeV). If photon energy is<=Excom2, use XCOM data for ! pair creation cross-section.(must be< 100 GeV). integer Moliere !2 2$\rightarrow$ use Moliere scat.\newline ! 0$\rightarrow$ use Gaussian scattrign. \newline ! 1$\rightarrow$ use Moli\`ere scattering for non-electrons \newline ! 2$\rightarrow$ use Moli\`ere scattering for all charged ! particles. But treatment is not so rigorous as case of 3. ! \newline ! 3$\rightarrow$ use rigorus Moliere scattering. Diff. from 2 is verysmall. May be some effect in the ! core region. integer ALateCor !2 1$\rightarrow$ angular and lateral correlation is taken into account when Moliere=0 .\newline ! t$\rightarrow$ Use angular-lateral correlation by Gaussian ! approximation. No effect is seen if path length is short. !<-) ---------------------------------------------- common/Zelemagc/RecoilKineMinE
! hadronic collision parameters(-> --------------------------------------------- character *64 IntModel !1 Interaction model description. Usage was changed from v6.0. ! One may list code name and upper energy bound for the code.\newline ! E.g. IntModel='"dpmjet3"' ;to specify the dpmjet3 in the entire energy region ! IntModel='"dpmjet3" 100 "qgsjet2" to specify dpmjet3 at $<$ 100 GeV and qgsjetII ! at E$> $100 GeV \newline ! IntModel='"nucrin" 5 "fritiof1.6" 500 "adhoc" to specify Nucrin, ! fritiof1.6, and ad-hoc model in the respective energy region. This ! corresponds to the old IntModel='int1'. \newline ! IntModel='"nucrin" 5 "fritiof1.6" 10 "fritiof7.02" and \newline ! IntModel='"dpmjet3"' \newline ! are most promissing models that fit the observed ! data(muons and gamma rays) for which the primary is well known by ! BESS and AMS observations($<$ 100 GeV). character *64 XsecModel !1 Xsection model description. Noarmally should not be given. ! Defaul is to use the hadronic xsection given by each active model ! fixed by IntModel. However, for some experimental purposes, ! one may employ x-section by other interaction model. ! e.g. ! IntModel='"phits" 2 "dpmjet" ' ! XsecModel='"Phits" 2 "dpmjet" 80 "qgsjet2"' ! is one example. Default is blank and is replaced by IntModel character *100 InclusiveFile !2 The path to the inclusive data file, xdist.d. Default is ! "../Contrib/Inclusive/xdist.d" real *8 SucPw !2 In the 2nd, 3rd,.. collision of a nucleon inside a nucleus, the collision is ! made to be more elastic than normal one. The leading particle spectrum is ! sampled from x **SucPw dx. SucPw should be in 1 to 2. real *8 Eta2Pi0 !2 eta/pi0 ratio. this is used to see the effect due to non-decay of pi0 ! at very high energies. Only source of h.e gamma can be eta and LPM may work ! for them. default is 0.2 integer MulLow !2 if 1, QCD predicted multiplicity law is used in the adhoc model else UA5 ! parametalization is used. Default is 1.(from v5), ! 0.6135exp(23/18sqrt(2log(roots/0.3))) is QCD jet prediction. ! 7.2roots **0.254 -7 is UA5 data. The branch point is set at roots=900 GeV. !(I have adjusted 0.6135 so that 900 GeV is the b.p) integer LundPara !2 To control Lund program. LundPara(1) is set to kfr(7);kfr(7)=1 is for Frititof ! hard scattering. 2 is for Pythia H.S. 2 gives higher multiplicity but shape is ! strange. Default is 1. LundPara(2) is set to kfr(12):1 by for OPAL hard scattering ! parameterization. 2 by DELPHI. Default is 2.(2 gives bit higher PT). LundPara(3) ! $>$ 0 $\Rightarrow$ Pythia message will appear. LundPara(4) $>$ 0 Fritiof ! message;both on ErrorOut. LundPara(5)=0 $\Rightarrow$ All kaons collisions ! are treated as pi- in Fritiof, else they are treated by adhoc model as they are. ! below:Obsolete integer TotXSopt !2 option for total x-section. 1. PDG 3. TOTEM(COMPETE fitting) ! 2. between 1 and 3.(1 is lowest 3 is highest X-sec.) ! Diff. becomes gradually seen at roots > few x 10^2 GeV ! This for p-p case. Default is 2. ! For other collision types, 1 is used. ! If the current interaction model supplies the inelastic ! cross-section, it is used without referring to this. ! However, see XsecModel. integer SxAbySxpOpt !2 For nucleus target with mass # A, cross section is converted ! from the one for proton target. This option fixes which ! SxA/sxp table is used. This is used when the current interaction ! model dose not supply the cross-section.(See XsecModel too). ! 1. use table derived from QGSJET-II-04(default) ! 2. use table derived from dpjmet3 ! 3. use table dervied from EPOS(but can be used for A<=64). !(as of 2013/Jun). ! However, for small cross-sections(such as gamma-A, nu-A, old ! cxp2xA routine is used). real *8 Cepic0 !2 Obsolete real *8 Cekaon !2 Obsolete integer SucInt !2 The number of successive interactions inside A is affected by this parameter.\newline ! If $0\rightarrow$ old formula(before uv3.500) is used, which give rather ! smaller number($< Nsuc >$ in Air=1.7 for 30 mb pp), \newline ! if $1\rightarrow$ new one $< Nsuc >=2.2$ for 30 mb pp). \newline ! Default is 0(from V5.00 again). real *8 Ceneuc !2 \verb|p -> n
! 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
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
logical, save user
Definition: cEfield0.f:32
int logical
Definition: Zdef.h:1
! parameters for Elemag X0
Definition: Zelemagp.h:50
! parameters for Elemag Knockon
Definition: Zelemagp.h:50
! 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 newline(note, actually upsilon is referred further). ! if generate
#define RecoilKineMinE
Definition: Zelemagp.h:62
block data cblkIncident data *Za1ry is
Definition: cblkIncident.h:5
! parameters for Elemag KnockOnRatio
Definition: Zelemagp.h:50