38 * mupa, mura, mupb, muqb, muAk, muAkm, muAkm2,
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc * MuBrTX
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuNTbl
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuBrdEdx0
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc muPrEmax1
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrUsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrUsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc Zeff3
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuNTX
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrdU
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real * muNLEmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrdE
! muon interaction related variables ! real Zeff3 ! Zeff **real * muPrEmax
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNdU
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real muShadow
! 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
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real * muPointLike
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuPrTX
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mupb
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrEsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNdETX
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuNdEdx0
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrdETX
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real * muNEmax
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdx0
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuBrdEdxt
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc muNpwdEdxt
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mura
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc muPrTXT
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real * muNpwtx
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNdE
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc muNEmax1
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real * muBrVmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrdETX
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real muAk
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc muBrEmax1
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrEsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuPrdEdxt
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNUsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real * muNVmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real * mupa
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real muAkm2
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuNdEdxt
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNEsize
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc muBrLEmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real muqb
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real * muBrdU
! muon interaction related variables ! real * Zeff
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc mulogf0
! muon interaction related variables ! real Zeff3 ! Zeff **real * muPrVmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real muAkm
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc * muBrTXT
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muPrLEmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax1 integer muBrTXT ! real muNEmax1 integer muNTXT ! real muNpwdEdxt real real mulogf0 real muBrLEmin common muintc MuPrdEdx0
after any interaction(except for continuous energy ! loss by dE/dx and deflection by B or scattering)
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmin
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrEmax1 integer muPrTXT ! real muBrEmax
! muon interaction related variables ! real Zeff3 ! Zeff **real muPrdE