JHUGen MELA
v2.4.1
Matrix element calculations as used in JHUGen. MELA is an important tool that was used for the Higgs boson discovery and for precise measurements of its structure and interactions. Please see the website https://spin.pha.jhu.edu/ and papers cited there for more details, and kindly cite those papers when using this code.
|
|
subroutine, public | setewparameters (inMZ, inMW, inGf, inalpha_QED, inxw) |
|
subroutine, public | sethiggsmasswidth (mass, width) |
|
subroutine, public | setdecaymodes (idfirst, idsecond) |
|
subroutine, public | settopdecays (flag) |
|
subroutine, public | sethdk (flag) |
|
subroutine, public | setmurenfac (muren, mufac) |
|
subroutine, public | resetmubarhgabarh () |
|
subroutine, public | resetamplitudeincludes () |
|
subroutine, public | setspinzerovvcouplings (vvcoupl, vvpcoupl, vpvpcoupl, cqsq, Lambda_qsq, useWWcoupl) |
|
subroutine, public | setvprimecontactcouplings (Zpffcoupl, Wpffcoupl) |
|
subroutine, public | setdistinguishwwcouplingsflag (doAllow) |
|
subroutine, public | setspinzeroggcouplings (ggcoupl) |
|
subroutine, public | setspinzeroqqcouplings (qqcoupl) |
|
subroutine, public | setspinonecouplings (qqcoupl, vvcoupl) |
|
subroutine, public | setspintwocouplings (acoupl, vvcoupl, vvpcoupl, vpvpcoupl, qLR) |
|
subroutine, public | setazffcouplings (azffcoupl) |
|
subroutine | setmvgv () |
|
subroutine | setmvgvfromvertex (idV) |
|
subroutine, public | getmvgv (mv, gv) |
|
subroutine, public | getmvprimegvprime (mv, gv) |
|
subroutine, public | getalphasalphasmz (val_as, val_asmz) |
|
subroutine, public | getpdfconstants (pdfzmass, pdfnloops, pdfnf) |
|
subroutine, public | getdecaycouplings (VVMode, idordered, aL1, aR1, aL2, aR2) |
|
◆ getalphasalphasmz()
subroutine, public modjhugenmela::getalphasalphasmz |
( |
real(8), intent(out) |
val_as, |
|
|
real(8), intent(out) |
val_asmz |
|
) |
| |
◆ getdecaycouplings()
subroutine, public modjhugenmela::getdecaycouplings |
( |
integer, intent(in) |
VVMode, |
|
|
integer, dimension(6:9), intent(in) |
idordered, |
|
|
real(dp), intent(out) |
aL1, |
|
|
real(dp), intent(out) |
aR1, |
|
|
real(dp), intent(out) |
aL2, |
|
|
real(dp), intent(out) |
aR2 |
|
) |
| |
Definition at line 676 of file mod_JHUGenMELA.F90.
677 integer,
intent(in) :: VVMode,idordered(6:9)
678 real(dp),
intent(out) :: aL1,aR1,aL2,aR2
681 if( vvmode.eq.
zzmode )
then
683 if( abs(idordered(6)).eq.abs(
elm_) .or. abs(idordered(6)).eq.abs(
mum_) )
then
686 elseif( abs(idordered(6)).eq.abs(
tam_) )
then
689 elseif( abs(idordered(6)).eq.abs(
nue_) .or. abs(idordered(6)).eq.abs(
num_) .or. abs(idordered(6)).eq.abs(
nut_) )
then
692 elseif( abs(idordered(6)).eq.abs(
up_) .or. abs(idordered(6)).eq.abs(
chm_) )
then
695 elseif( abs(idordered(6)).eq.abs(
dn_) .or. abs(idordered(6)).eq.abs(
str_) .or. abs(idordered(6)).eq.abs(
bot_) )
then
702 if( abs(idordered(8)).eq.abs(
elm_) .or. abs(idordered(8)).eq.abs(
mum_) )
then
705 elseif( abs(idordered(8)).eq.abs(
tam_) )
then
708 elseif( abs(idordered(8)).eq.abs(
nue_) .or. abs(idordered(8)).eq.abs(
num_) .or. abs(idordered(8)).eq.abs(
nut_) )
then
711 elseif( abs(idordered(8)).eq.abs(
up_) .or. abs(idordered(8)).eq.abs(
chm_) )
then
714 elseif( abs(idordered(8)).eq.abs(
dn_) .or. abs(idordered(8)).eq.abs(
str_) .or. abs(idordered(8)).eq.abs(
bot_) )
then
722 elseif( vvmode.eq.
wwmode )
then
728 (abs(idordered(6)).eq.abs(
elp_) .and. abs(idordered(7)).eq.abs(
nue_)) .or. (abs(idordered(7)).eq.abs(
elp_) .and. abs(idordered(6)).eq.abs(
nue_)) .or. &
729 (abs(idordered(6)).eq.abs(
mup_) .and. abs(idordered(7)).eq.abs(
num_)) .or. (abs(idordered(7)).eq.abs(
mup_) .and. abs(idordered(6)).eq.abs(
num_)) &
734 (abs(idordered(6)).eq.abs(
tap_) .and. abs(idordered(7)).eq.abs(
nut_)) .or. (abs(idordered(7)).eq.abs(
tap_) .and. abs(idordered(6)).eq.abs(
nut_)) &
746 (abs(idordered(8)).eq.abs(
elm_) .and. abs(idordered(9)).eq.abs(
anue_)) .or. (abs(idordered(9)).eq.abs(
elm_) .and. abs(idordered(8)).eq.abs(
anue_)) .or. &
747 (abs(idordered(8)).eq.abs(
mum_) .and. abs(idordered(9)).eq.abs(
anum_)) .or. (abs(idordered(9)).eq.abs(
mum_) .and. abs(idordered(8)).eq.abs(
anum_)) &
752 (abs(idordered(8)).eq.abs(
tam_) .and. abs(idordered(9)).eq.abs(
anut_)) .or. (abs(idordered(9)).eq.abs(
tam_) .and. abs(idordered(8)).eq.abs(
anut_)) &
761 elseif( vvmode.eq.
zgmode )
then
763 if( abs(idordered(6)).eq.abs(
elm_) .or. abs(idordered(6)).eq.abs(
mum_) )
then
766 elseif( abs(idordered(6)).eq.abs(
tam_) )
then
769 elseif( abs(idordered(6)).eq.abs(
nue_) .or. abs(idordered(6)).eq.abs(
num_) .or. abs(idordered(6)).eq.abs(
nut_) )
then
772 elseif( abs(idordered(6)).eq.abs(
up_) .or. abs(idordered(6)).eq.abs(
chm_) )
then
775 elseif( abs(idordered(6)).eq.abs(
dn_) .or. abs(idordered(6)).eq.abs(
str_) .or. abs(idordered(6)).eq.abs(
bot_) )
then
785 elseif( vvmode.eq.
ggmode )
then
792 elseif( vvmode.eq.
gsgmode )
then
794 if( abs(idordered(6)).eq.abs(
elm_) .or. abs(idordered(6)).eq.abs(
mum_) )
then
797 elseif( abs(idordered(6)).eq.abs(
tam_) )
then
800 elseif( abs(idordered(6)).eq.abs(
nue_) .or. abs(idordered(6)).eq.abs(
num_) .or. abs(idordered(6)).eq.abs(
nut_) )
then
803 elseif( abs(idordered(6)).eq.abs(
up_) .or. abs(idordered(6)).eq.abs(
chm_) )
then
806 elseif( abs(idordered(6)).eq.abs(
dn_) .or. abs(idordered(6)).eq.abs(
str_) .or. abs(idordered(6)).eq.abs(
bot_) )
then
816 elseif( vvmode.eq.
gszmode )
then
818 if( abs(idordered(6)).eq.abs(
elm_) .or. abs(idordered(6)).eq.abs(
mum_) )
then
821 elseif( abs(idordered(6)).eq.abs(
tam_) )
then
824 elseif( abs(idordered(6)).eq.abs(
nue_) .or. abs(idordered(6)).eq.abs(
num_) .or. abs(idordered(6)).eq.abs(
nut_) )
then
827 elseif( abs(idordered(6)).eq.abs(
up_) .or. abs(idordered(6)).eq.abs(
chm_) )
then
830 elseif( abs(idordered(6)).eq.abs(
dn_) .or. abs(idordered(6)).eq.abs(
str_) .or. abs(idordered(6)).eq.abs(
bot_) )
then
837 if( abs(idordered(8)).eq.abs(
elm_) .or. abs(idordered(8)).eq.abs(
mum_) )
then
840 elseif( abs(idordered(8)).eq.abs(
tam_) )
then
843 elseif( abs(idordered(8)).eq.abs(
nue_) .or. abs(idordered(8)).eq.abs(
num_) .or. abs(idordered(8)).eq.abs(
nut_) )
then
846 elseif( abs(idordered(8)).eq.abs(
up_) .or. abs(idordered(8)).eq.abs(
chm_) )
then
849 elseif( abs(idordered(8)).eq.abs(
dn_) .or. abs(idordered(8)).eq.abs(
str_) .or. abs(idordered(8)).eq.abs(
bot_) )
then
857 elseif( vvmode.eq.
zgsmode )
then
859 if( abs(idordered(6)).eq.abs(
elm_) .or. abs(idordered(6)).eq.abs(
mum_) )
then
862 elseif( abs(idordered(6)).eq.abs(
tam_) )
then
865 elseif( abs(idordered(6)).eq.abs(
nue_) .or. abs(idordered(6)).eq.abs(
num_) .or. abs(idordered(6)).eq.abs(
nut_) )
then
868 elseif( abs(idordered(6)).eq.abs(
up_) .or. abs(idordered(6)).eq.abs(
chm_) )
then
871 elseif( abs(idordered(6)).eq.abs(
dn_) .or. abs(idordered(6)).eq.abs(
str_) .or. abs(idordered(6)).eq.abs(
bot_) )
then
878 if( abs(idordered(8)).eq.abs(
elm_) .or. abs(idordered(8)).eq.abs(
mum_) )
then
881 elseif( abs(idordered(8)).eq.abs(
tam_) )
then
884 elseif( abs(idordered(8)).eq.abs(
nue_) .or. abs(idordered(8)).eq.abs(
num_) .or. abs(idordered(8)).eq.abs(
nut_) )
then
887 elseif( abs(idordered(8)).eq.abs(
up_) .or. abs(idordered(8)).eq.abs(
chm_) )
then
890 elseif( abs(idordered(8)).eq.abs(
dn_) .or. abs(idordered(8)).eq.abs(
str_) .or. abs(idordered(8)).eq.abs(
bot_) )
then
900 if( abs(idordered(6)).eq.abs(
elm_) .or. abs(idordered(6)).eq.abs(
mum_) )
then
903 elseif( abs(idordered(6)).eq.abs(
tam_) )
then
906 elseif( abs(idordered(6)).eq.abs(
nue_) .or. abs(idordered(6)).eq.abs(
num_) .or. abs(idordered(6)).eq.abs(
nut_) )
then
909 elseif( abs(idordered(6)).eq.abs(
up_) .or. abs(idordered(6)).eq.abs(
chm_) )
then
912 elseif( abs(idordered(6)).eq.abs(
dn_) .or. abs(idordered(6)).eq.abs(
str_) .or. abs(idordered(6)).eq.abs(
bot_) )
then
919 if( abs(idordered(8)).eq.abs(
elm_) .or. abs(idordered(8)).eq.abs(
mum_) )
then
922 elseif( abs(idordered(8)).eq.abs(
tam_) )
then
925 elseif( abs(idordered(8)).eq.abs(
nue_) .or. abs(idordered(8)).eq.abs(
num_) .or. abs(idordered(8)).eq.abs(
nut_) )
then
928 elseif( abs(idordered(8)).eq.abs(
up_) .or. abs(idordered(8)).eq.abs(
chm_) )
then
931 elseif( abs(idordered(8)).eq.abs(
dn_) .or. abs(idordered(8)).eq.abs(
str_) .or. abs(idordered(8)).eq.abs(
bot_) )
then
◆ getmvgv()
subroutine, public modjhugenmela::getmvgv |
( |
real(8), intent(out) |
mv, |
|
|
real(8), intent(out) |
gv |
|
) |
| |
◆ getmvprimegvprime()
subroutine, public modjhugenmela::getmvprimegvprime |
( |
real(8), intent(out) |
mv, |
|
|
real(8), intent(out) |
gv |
|
) |
| |
◆ getpdfconstants()
subroutine, public modjhugenmela::getpdfconstants |
( |
real(8), intent(out) |
pdfzmass, |
|
|
integer, intent(out) |
pdfnloops, |
|
|
integer, intent(out) |
pdfnf |
|
) |
| |
Definition at line 665 of file mod_JHUGenMELA.F90.
666 real(8),
intent(out) :: pdfzmass
667 integer,
intent(out) :: pdfnloops, pdfnf
◆ resetamplitudeincludes()
subroutine, public modjhugenmela::resetamplitudeincludes |
◆ resetmubarhgabarh()
subroutine, public modjhugenmela::resetmubarhgabarh |
◆ setazffcouplings()
subroutine, public modjhugenmela::setazffcouplings |
( |
complex(8), dimension(1:12), intent(in) |
azffcoupl | ) |
|
◆ setdecaymodes()
subroutine, public modjhugenmela::setdecaymodes |
( |
integer, dimension(1:2), intent(in) |
idfirst, |
|
|
integer, dimension(1:2), intent(in) |
idsecond |
|
) |
| |
Definition at line 61 of file mod_JHUGenMELA.F90.
62 integer,
intent(in) :: idfirst(1:2)
63 integer,
intent(in) :: idsecond(1:2)
66 if( idfirst(1).eq.
pho_ .or. idfirst(2).eq.
pho_ )
then
71 if( idv(1).eq.
wp_ .or. idv(1).eq.
wm_ )
then
73 elseif( idv(1).eq.
z0_ )
then
77 if( idsecond(1).eq.
pho_ .or. idsecond(2).eq.
pho_ )
then
82 if( idv(2).eq.
wp_ .or. idv(2).eq.
wm_ )
then
84 elseif( idv(2).eq.
z0_ )
then
◆ setdistinguishwwcouplingsflag()
subroutine, public modjhugenmela::setdistinguishwwcouplingsflag |
( |
logical, intent(in) |
doAllow | ) |
|
◆ setewparameters()
subroutine, public modjhugenmela::setewparameters |
( |
real(8), intent(in) |
inMZ, |
|
|
real(8), intent(in) |
inMW, |
|
|
real(8), intent(in) |
inGf, |
|
|
real(8), intent(in) |
inalpha_QED, |
|
|
real(8), intent(in) |
inxw |
|
) |
| |
Definition at line 41 of file mod_JHUGenMELA.F90.
42 real(8),
intent(in) :: inMZ, inMW, inGf, inalpha_QED, inxw
◆ sethdk()
subroutine, public modjhugenmela::sethdk |
( |
logical, intent(in) |
flag | ) |
|
◆ sethiggsmasswidth()
subroutine, public modjhugenmela::sethiggsmasswidth |
( |
real(8), intent(in) |
mass, |
|
|
real(8), intent(in) |
width |
|
) |
| |
◆ setmurenfac()
subroutine, public modjhugenmela::setmurenfac |
( |
real(8), intent(in) |
muren, |
|
|
real(8), intent(in) |
mufac |
|
) |
| |
◆ setmvgv()
subroutine modjhugenmela::setmvgv |
◆ setmvgvfromvertex()
subroutine modjhugenmela::setmvgvfromvertex |
( |
integer |
idV | ) |
|
◆ setspinonecouplings()
subroutine, public modjhugenmela::setspinonecouplings |
( |
complex(8), dimension(1:2), intent(in) |
qqcoupl, |
|
|
complex(8), dimension(1:2), intent(in) |
vvcoupl |
|
) |
| |
Definition at line 498 of file mod_JHUGenMELA.F90.
499 complex(8),
intent(in) :: qqcoupl(1:2)
500 complex(8),
intent(in) :: vvcoupl(1:2)
◆ setspintwocouplings()
subroutine, public modjhugenmela::setspintwocouplings |
( |
complex(8), dimension(1:5), intent(in) |
acoupl, |
|
|
complex(8), dimension(1:indexvvsize), intent(in) |
vvcoupl, |
|
|
complex(8), dimension(1:indexvvsize), intent(in) |
vvpcoupl, |
|
|
complex(8), dimension(1:indexvvsize), intent(in) |
vpvpcoupl, |
|
|
complex(8), dimension(1:2), intent(in) |
qLR |
|
) |
| |
Definition at line 510 of file mod_JHUGenMELA.F90.
511 integer,
parameter :: indexGammaBegin=11
512 integer,
parameter :: indexVVSize=20
513 complex(8),
intent(in) :: acoupl(1:5)
514 complex(8),
intent(in) :: vvcoupl(1:indexVVSize),vvpcoupl(1:indexVVSize),vpvpcoupl(1:indexVVSize)
515 complex(8),
intent(in) :: qLR(1:2)
519 any(vvcoupl(indexgammabegin:indexvvsize).ne.
czero) .or. &
520 any(vvpcoupl(indexgammabegin:indexvvsize).ne.
czero) &
◆ setspinzeroggcouplings()
subroutine, public modjhugenmela::setspinzeroggcouplings |
( |
complex(8), dimension(1:3), intent(in) |
ggcoupl | ) |
|
◆ setspinzeroqqcouplings()
subroutine, public modjhugenmela::setspinzeroqqcouplings |
( |
complex(8), dimension(1:2), intent(in) |
qqcoupl | ) |
|
◆ setspinzerovvcouplings()
subroutine, public modjhugenmela::setspinzerovvcouplings |
( |
complex(8), dimension(39), intent(in) |
vvcoupl, |
|
|
complex(8), dimension(39), intent(in) |
vvpcoupl, |
|
|
complex(8), dimension(39), intent(in) |
vpvpcoupl, |
|
|
integer, dimension(3), intent(in) |
cqsq, |
|
|
real(8), dimension(1:3,1:4), intent(in) |
Lambda_qsq, |
|
|
logical, intent(in) |
useWWcoupl |
|
) |
| |
Definition at line 124 of file mod_JHUGenMELA.F90.
125 complex(8),
intent(in) :: vvcoupl(39)
126 complex(8),
intent(in) :: vvpcoupl(39)
127 complex(8),
intent(in) :: vpvpcoupl(39)
128 integer,
intent(in) :: cqsq(3)
129 real(8),
intent(in) :: Lambda_qsq(1:3,1:4)
130 logical,
intent(in) :: useWWcoupl
133 (any(vvpcoupl.ne.
czero) .or. any(vpvpcoupl.ne.
czero)) &
136 if(.not.usewwcoupl)
then
◆ settopdecays()
subroutine, public modjhugenmela::settopdecays |
( |
integer, intent(in) |
flag | ) |
|
◆ setvprimecontactcouplings()
subroutine, public modjhugenmela::setvprimecontactcouplings |
( |
complex(8), dimension(20), intent(in) |
Zpffcoupl, |
|
|
complex(8), dimension(20), intent(in) |
Wpffcoupl |
|
) |
| |
Definition at line 434 of file mod_JHUGenMELA.F90.
435 complex(8),
intent(in) :: Zpffcoupl(20)
436 complex(8),
intent(in) :: Wpffcoupl(20)
complex(8), public ghzpzp1_prime7
complex(8), public ezp_top_right
real(dp), public alphas_mz
real(8), public lambda_w31
complex(8), public bzpgs8
complex(8), public ghzpzp4_prime4
complex(8), public ghwwp4_prime5
logical, public includegammastar
complex(8), public ghz4_prime6
complex(8), public ghzzp1_prime
integer, parameter, public nloops_pdf
complex(8), public bzpgs3
complex(8), public ezp_top_left
integer, target, public elm_
complex(8), public ghzpzp2_prime7
complex(8), public ghz2_prime
complex(8), public ghzzp1_prime7
complex(8), public ewp_chm_right
complex(8), public ghz4_prime4
complex(8), public ghwpwp3
complex(8), public ghzpzp1
complex(8), public ghz3_prime5
complex(8), public ghwwp4_prime3
logical, public distinguish_hwwcouplings
real(8), public lambda_z10
complex(8), public bzpzp1
complex(8), public ghzzp3_prime
complex(8), public ghw2_prime6
integer function coupledvertex(id, hel, useAHcoupl)
complex(8), public bzpzp6
complex(8), public ghzzp4_prime2
integer, parameter, public zgmode
complex(8), public ghwwp2_prime7
complex(8), public ghwwp4_prime4
real(8), public lambda_z41
complex(8), public ghwpwp1
complex(8), public ezp_up_left
complex(8), public ghzgs4
complex(8), public zprime_zz_1
real(8), public lambda_z12
complex(8), public bzpgs2
complex(8), public ghzpzp2_prime6
complex(8), public ghz3_prime2
complex(8), public ghw2_prime7
complex(8), public ghzzp2_prime5
real(8), public ga_wprime
complex(8), public ghwwp4_prime7
real(8), public lambda_z21
complex(8), public ghzpzp2
complex(8), public ghzzp4_prime3
complex(8), public ghwpwp3_prime6
complex(8), public bzpzp8
integer, target, public dn_
complex(8), public ghw2_prime3
complex(8), public ghzzp4_prime4
complex(8), public ghzpzp3_prime5
real(8), public lambda_z31
complex(8), public ghzpzp3_prime2
complex(8), public ghz3_prime6
complex(8), public ghwpwp2_prime2
complex(8), public ghzgs2
real(8), public scale_alpha_w_tn
integer, public topdecays
complex(8), public ghwpwp3_prime
complex(8), public ezp_el_left
complex(8), public ghwwp2_prime5
complex(8), public ghzpzp1_prime5
complex(8), public ghz1_prime
complex(8), public ghwwp2
integer, parameter, public zgsmode
complex(8), public ghzpzp3_prime
complex(8), public ezp_bot_right
real(8), public scale_alpha_w_ln
complex(8), public ewp_top_right
complex(8), public bzpzp3
complex(8), public ghz1_prime7
complex(8), public ghwpwp2_prime3
logical, public includevprime
complex(8), public ghwpwp3_prime7
complex(8), public bgsgs1
complex(8), public bgsgs8
complex(8), public ghwpwp1_prime
complex(8), public graviton_qq_left
complex(8), public ghzzp3_prime3
complex(8), public ghzpzp1_prime4
complex(8), public ghzzp1_prime3
complex(8), public ghzpzp1_prime6
complex(8), public bzzp10
complex(8), public bgsgs4
complex(8), public ghz2_prime5
complex(8), public ghgsgs4
complex(8), public ghw3_prime5
complex(8), public ghw4_prime4
integer, target, public wm_
complex(8), public ghzpzp4_prime
complex(8), public ghzpzp4_prime5
integer, target, public chm_
integer, target, public up_
integer, target, public bot_
complex(8), public ghzzp1
complex(8), public ghwwp4_prime2
complex(8), public ghzzp1_prime6
complex(8), public ghzzp4
real(8), public lambda_w30
complex(8), public ghz3_prime3
real(8), public lambda_w22
complex(8), public ghwwp1_prime5
complex(8), public ghw3_prime6
complex(8), public ezp_chm_right
complex(8), public ghwwp1_prime
real(8), public lambda_z11
complex(8), public zprime_qq_right
integer, parameter, public zzmode
complex(8), public ghzpgs3
complex(8), public ghz3_prime4
complex(8), public bzpzp9
complex(8), public ghw3_prime4
complex(8), public ghwwp3_prime
complex(8), public ghwpwp2
complex(8), public ghwpwp3_prime3
complex(8), public ghzzp2_prime6
subroutine computeewvariables()
complex(8), public ghwpwp1_prime5
complex(8), public ghz1_prime4
integer, parameter, public gsgmode
complex(8), public ghwwp3_prime5
real(8), public scale_alpha_z_ll
complex(8), public ghz1_prime2
complex(8), public ghzzp4_prime5
complex(8), public bzpzp5
complex(8), public ewp_mu_left
complex(8), public ghz4_prime5
complex(8), public ghw4_prime3
complex(8), public ezp_mu_right
complex(8), public ghzzp2_prime
complex(8), public ezp_chm_left
complex(8), public ghwwp3_prime2
complex(8), public ewp_ta_left
complex(8), public ghw1_prime6
complex(8), public ghzzp2
complex(8), public ghwpwp2_prime
complex(8), public ghzzp3_prime7
complex(8), public ghwwp1
complex(8), public ghzzp1_prime4
real(8), public lambda_z32
complex(8), public ghw2_prime5
real(8), public lambda_w10
complex(8), public ghw2_prime4
complex(8), public ghzpgs4
integer, target, public tam_
complex(8), public ghzpzp2_prime3
real(8), public scale_alpha_w_ud
complex(8), public zprime_qq_left
complex(8), public bzpgs4
complex(8), public ghwpwp2_prime7
complex(8), public ghw1_prime3
complex(8), public ghwpwp4_prime2
complex(8), public ghwwp2_prime2
real(8), public lambda_w11
complex(8), public ghzpzp3
complex(8), public ghzpzp4_prime3
real(8), public ga_zprime
logical function isawdecay(DKMode)
complex(8), public ghwpwp3_prime2
integer, target, public nue_
complex(8), public ghw1_prime4
complex(8), public ghzpzp4_prime6
real(8), public lambda_z42
complex(8), public ewp_up_right
subroutine setmass(mass, ipart)
complex(8), public ezp_str_right
complex(8), parameter, public czero
complex(8), public ghzzp2_prime3
integer, parameter, public gszmode
complex(8), public ghzpzp2_prime2
complex(8), public ghzpzp1_prime
complex(8), public ezp_up_right
complex(8), public ghzzp3
real(8), public lambda_z30
complex(8), public bzpzp4
complex(8), public ghzgs1_prime2
complex(8), public ghwpwp2_prime4
integer, target, public elp_
complex(8), public ghzpzp4_prime2
complex(8), public kappa_tilde
complex(8), public ghwwp1_prime3
complex(8), public ghzzp3_prime5
complex(8), public ghw2_prime2
complex(8), public ghzpgs2
complex(8), public ghz4_prime7
complex(8), public ghwpwp4_prime5
real(8), public lambda_w20
complex(8), public ghz3_prime7
complex(8), public bzpzp7
real(8), public scale_alpha_z_tt
real(8), public zmass_pdf
complex(8), public ghw4_prime6
complex(8), public ghwpwp2_prime6
complex(8), public ghzzp2_prime7
integer, target, public anum_
complex(8), public ewp_chm_left
complex(8), public ghwpwp4_prime7
complex(8), public ghzpzp3_prime7
real(8), public alpha_qed
real(8), public lambda_w41
complex(8), public ewp_el_right
complex(8), public ghzpzp2_prime5
real(8), public lambda_w40
complex(8), public ghz1_prime3
complex(8), public ghwwp3
complex(8), public ghzzp4_prime7
complex(8), public ewp_up_left
integer, target, public anut_
integer, target, public anue_
complex(8), public ezp_dn_left
complex(8), public ghz2_prime6
complex(8), public ghz4_prime
real(8), public lambda_z40
complex(8), public ghwwp2_prime3
complex(8), public ezp_nue_right
complex(8), public ghz3_prime
complex(8), public ghwwp3_prime3
real(8), public scale_alpha_z_nn
complex(8), public ghwpwp4
complex(8), public ghwpwp4_prime3
complex(8), public ghwpwp4_prime6
complex(8), public ghz2_prime4
complex(8), public ezp_ta_left
complex(8), public ghzpzp4_prime7
complex(8), public ghw2_prime
complex(8), public ghw1_prime7
complex(8), public ghzzp1_prime2
complex(8), public ghw4_prime
complex(8), public bzpzp10
complex(8), public ezp_mu_left
complex(8), public ghwwp3_prime4
complex(8), public ghzgs3
complex(8), public ghwwp4
real(8), public lambda_z22
complex(8), public ghwwp2_prime
complex(8), public ezp_dn_right
complex(8), public graviton_qq_right
integer, parameter, public nqflavors_pdf
complex(8), public bzpzp2
complex(8), public ghwpwp2_prime5
real(8), public scale_alpha_z_dd
complex(8), public ghzpzp1_prime2
complex(8), public ezp_nue_left
real(8), public lambda_w42
complex(8), public ghzzp3_prime2
complex(8), public ghwpwp1_prime6
real(8), public lambda_z20
integer, target, public nut_
integer, parameter, public wwmode
complex(8), public ghz2_prime7
complex(8), public ghzpzp2_prime4
complex(8), public ghw4_prime5
complex(8), public ghzpzp1_prime3
complex(8), public ghwwp4_prime6
complex(8), public ghgsgs2
integer, target, public mum_
complex(8), public ghzpgs1_prime2
complex(8), public ghzpzp3_prime4
complex(8), public ghw3_prime2
integer, target, public wp_
complex(8), public ghzzp2_prime4
complex(8), public ghzzp3_prime6
complex(8), public ghw3_prime3
integer, target, public str_
complex(8), public ghzpzp2_prime
logical function isaquark(PartType)
complex(8), public ghwwp1_prime6
complex(8), public ewp_top_left
complex(8), public ghwwp1_prime2
complex(8), public bzpgs1
complex(8), public ghwwp2_prime6
real(8), public scale_alpha_z_uu
complex(8), public ewp_mu_right
complex(8), public ghwpwp3_prime4
complex(8), public ghwwp3_prime7
complex(8), public ghw1_prime
complex(8), public ghz1_prime6
real(8), public lambda_w12
complex(8), public bgsgs2
integer, parameter, public ggmode
complex(8), public ghzpzp3_prime6
real(8), public lambda_w32
logical function isazdecay(DKMode)
integer, public decaymode1
complex(8), public ghwwp4_prime
complex(8), public ezp_str_left
complex(8), public ghwwp1_prime4
complex(8), public ghw1_prime5
integer, target, public num_
complex(8), public ewp_ta_right
complex(8), public ezp_el_right
complex(8), public ghwpwp1_prime2
complex(8), public ghz4_prime2
complex(8), public zprime_zz_2
complex(8), public ghzzp1_prime5
integer, target, public hig_
integer, target, public tap_
complex(8), public ghwpwp4_prime
complex(8), public ghzpzp3_prime3
complex(8), public ghzpzp4
complex(8), public ghwpwp4_prime4
complex(8), public ghwpwp1_prime3
integer, public decaymode2
complex(8), public ghzzp2_prime2
integer, parameter, public gsgsmode
complex(8), public ghwwp2_prime4
subroutine setdecaywidth(width, ipart)
complex(8), public ghz2_prime2
real(8), public ga_vprime
complex(8), public ghw1_prime2
complex(8), public ghz1_prime5
complex(8), public ghz2_prime3
complex(8), public ghzzp3_prime4
integer, target, public pho_
complex(8), public ghgsgs3
real(8), public lambda_w21
complex(8), public ghw3_prime
integer, target, public z0_
complex(8), public ghzzp4_prime6
complex(8), public ewp_el_left
complex(8), public ghwpwp1_prime4
complex(8), public ghwwp3_prime6
complex(8), public ghwpwp3_prime5
complex(8), public ghw3_prime7
complex(8), public ghw4_prime2
complex(8), public bgsgs3
complex(8), public ghz4_prime3
complex(8), public ghwpwp1_prime7
complex(8), public ghwwp1_prime7
complex(8), public ezp_ta_right
complex(8), public ghw4_prime7
complex(8), public ezp_bot_left
complex(8), public ghzzp4_prime
integer, target, public mup_