JHUGen MELA  JHUGen v7.5.6, MELA v2.4.2
Matrix element calculations as used in JHUGen.
mod_Parameters.F90 File Reference

Go to the source code of this file.

Modules

module  modparameters
 

Functions/Subroutines

complex(8) function modparameters::hvvspinzerodynamiccoupling (index, sWplus, sWminus, sWW, tryWWcoupl)
 
complex(8) function modparameters::vpffcoupling (jhuid, hel, useWp)
 
complex(8) function modparameters::vpffcoupling_pdg (pdgid, hel, useWp)
 
real(8) function modparameters::scalefactor (id1in, id2in)
 
real(8) function modparameters::ckmbare (id1in, id2in)
 
real(8) function modparameters::ckm (id1in, id2in)
 
real(8) function modparameters::zffbare (id1in, id2in, h1, h2)
 
real(8) function modparameters::zff (id1in, id2in, h1, h2)
 
real(8) function modparameters::aff (id1in, id2in, h1, h2)
 
integer function modparameters::convertlhereverse (Part)
 
integer function modparameters::convertlhe (Part)
 
integer function modparameters::converttopartindex (Part)
 
integer function modparameters::convertfrompartindex (Part)
 
subroutine modparameters::setmass (mass, ipart)
 
subroutine modparameters::setdecaywidth (width, ipart)
 
real(8) function modparameters::getmass (Part)
 
real(8) function modparameters::getdecaywidth (Part)
 
subroutine modparameters::sethiggsmass (jH, mass)
 
subroutine modparameters::sethiggsdecaywidth (jH, width)
 
real(8) function modparameters::gethiggsmass (jH)
 
real(8) function modparameters::gethiggsdecaywidth (jH)
 
character(len=3) function modparameters::getparticle (Part)
 
character(len=3) function modparameters::getlheparticle (PartLHE)
 
logical function modparameters::isazdecay (DKMode)
 
logical function modparameters::isawdecay (DKMode)
 
logical function modparameters::isaphoton (DKMode)
 
logical function modparameters::isdowntypequark (PartType)
 
logical function modparameters::islhedowntypequark (PartType)
 
logical function modparameters::isuptypequark (PartType)
 
logical function modparameters::islheuptypequark (PartType)
 
logical function modparameters::isuptypelightquark (PartType)
 
logical function modparameters::islheuptypelightquark (PartType)
 
logical function modparameters::isaquark (PartType)
 
logical function modparameters::isalhequark (PartType)
 
logical function modparameters::isalightquark (PartType)
 
logical function modparameters::isalhelightquark (PartType)
 
logical function modparameters::isaneutrino (PartType)
 
logical function modparameters::isalheneutrino (PartType)
 
logical function modparameters::isalepton (PartType)
 
logical function modparameters::isalhelepton (PartType)
 
logical function modparameters::isagluon (PartType)
 
logical function modparameters::isalhegluon (PartType)
 
logical function modparameters::isajet (PartType)
 
logical function modparameters::isalhejet (PartType)
 
logical function modparameters::isaboson (PartType)
 
logical function modparameters::isalheboson (PartType)
 
integer function modparameters::coupledvertex (id, hel, useAHcoupl)
 
logical function modparameters::coupledvertexisdiagonal (id, hel)
 
integer function modparameters::countleptons (MY_IDUP)
 
integer function modparameters::countjets (MY_IDUP)
 
integer function modparameters::su2flip (Part)
 
logical function modparameters::coupltolhewp (Part)
 
logical function modparameters::coupltolhewm (Part)
 
integer function modparameters::chargeflip (Part)
 
subroutine modparameters::computeckmelements (inVCKM_ud, inVCKM_us, inVCKM_cd, inVCKM_cs, inVCKM_ts, inVCKM_tb, inVCKM_ub, inVCKM_cb, inVCKM_td)
 
subroutine modparameters::setdefaultckm ()
 
subroutine modparameters::computeewvariables ()
 
subroutine modparameters::computeqcdvariables ()
 
subroutine modparameters::evalalphas ()
 
real(8) function modparameters::massfrun (mf, scale)
 
complex(dp) function, dimension(4) modparameters::pol_mless (p, i, outgoing)
 
complex(dp) function, dimension(4) modparameters::pol_mless2 (p, i, out)
 
complex(dp) function, dimension(4) modparameters::pol_dk2mom (plepton, antilepton, i, outgoing)
 
complex(8) function, dimension(4) modparameters::pol_mass (p, i, outgoing)
 
complex(dp) function, dimension(4) modparameters::pol_mass2 (p, i, out)
 
complex(dp) function, dimension(4) modparameters::ubar0 (p, i)
 
complex(dp) function, dimension(4) modparameters::v0 (p, i)
 
subroutine modparameters::spinoru (p, za, zb, s)
 
subroutine modparameters::initcollier (Nmax, Rmax)
 

Variables

character(len= *), parameter modparameters::jhugen_version ="v7.5.6"
 
integer, parameter, public modparameters::dp = selected_real_kind(15)
 
real(8), parameter, public modparameters::tol = 0.0000001d0
 
integer, parameter, public modparameters::invalidmode =-1
 
integer, parameter, public modparameters::wwmode =00
 
integer, parameter, public modparameters::zzmode =01
 
integer, parameter, public modparameters::zgsmode =02
 
integer, parameter, public modparameters::gszmode =03
 
integer, parameter, public modparameters::gsgsmode =04
 
integer, parameter, public modparameters::zgmode =05
 
integer, parameter, public modparameters::gsgmode =06
 
integer, parameter, public modparameters::ggmode =07
 
integer, parameter, public modparameters::wwpmode =10
 
integer, parameter, public modparameters::wpwmode =11
 
integer, parameter, public modparameters::wpwpmode =12
 
integer, parameter, public modparameters::zzpmode =20
 
integer, parameter, public modparameters::zpzmode =21
 
integer, parameter, public modparameters::zpzpmode =22
 
integer, parameter, public modparameters::gszpmode =30
 
integer, parameter, public modparameters::zpgsmode =31
 
integer, parameter, public modparameters::zpgmode =32
 
integer, public modparameters::collider
 
integer, public modparameters::pchannel
 
integer, public modparameters::process
 
integer, public modparameters::decaymode1
 
integer, public modparameters::decaymode2
 
integer, public modparameters::topdecays
 
integer, public modparameters::taudecays
 
integer, public modparameters::vegasit1
 
integer, public modparameters::vegasnc0
 
integer, public modparameters::vegasnc1
 
integer, public modparameters::vegasnc2
 
integer, public modparameters::pmzzevals
 
real(8), public modparameters::collider_energy
 
integer, public modparameters::facscheme
 
integer, public modparameters::renscheme
 
real(8), public modparameters::mufacmultiplier
 
real(8), public modparameters::murenmultiplier
 
real(8), public modparameters::customupperscalebound
 
real(8), public modparameters::customlowerscalebound
 
integer, public modparameters::vegasit1_default
 
integer, public modparameters::vegasnc0_default
 
integer, public modparameters::vegasnc1_default
 
integer, public modparameters::vegasnc2_default
 
integer, public modparameters::numhistograms
 
integer, dimension(1:2), public modparameters::requestnleptons = -1
 
integer, dimension(1:2), public modparameters::requestnjets = -1
 
integer, dimension(1:2), public modparameters::requestos = -1
 
integer, dimension(1:2), public modparameters::requestossf = -1
 
logical, public modparameters::unweighted
 
logical, public modparameters::offshellreson
 
logical, public modparameters::offshellv1
 
logical, public modparameters::offshellv2
 
logical, public modparameters::readlhefile
 
logical, public modparameters::convertlhefile
 
logical, public modparameters::doprintpmzz
 
logical, public modparameters::readcsmax
 
logical, public modparameters::generateevents
 
logical, public modparameters::counttauasany
 
logical, public modparameters::hasleptonfilter
 
logical, public modparameters::foundhiggsmass
 
logical, public modparameters::foundhiggswidth
 
integer, public modparameters::writefailedevents
 
logical, public modparameters::filesopened = .false.
 
integer, parameter, public modparameters::krenfacscheme_default =0
 
integer, parameter, public modparameters::krenfacscheme_mhstar =1
 
integer, parameter, public modparameters::krenfacscheme_mjjhstar =2
 
integer, parameter, public modparameters::krenfacscheme_mjj_mhstar =3
 
integer, parameter, public modparameters::krenfacscheme_mj_mj_mhstar =4
 
integer, parameter, public modparameters::krenfacscheme_mjj =5
 
integer, parameter, public modparameters::krenfacscheme_mj_mj =6
 
integer, parameter, public modparameters::krenfacscheme_mjhstar =7
 
integer, parameter, public modparameters::krenfacscheme_mj_mhstar =8
 
integer, parameter, public modparameters::krenfacscheme_mj =9
 
integer, parameter, public modparameters::krenfacscheme_maxptj =10
 
integer, parameter, public modparameters::krenfacscheme_minptj =11
 
integer, parameter, public modparameters::krenfacscheme_custom_scale =12
 
integer, parameter, public modparameters::nrenfacschemes =13
 
integer, parameter, public modparameters::maxpart = 30
 
integer, parameter, public modparameters::nmaxchannels =200
 
integer(8), public modparameters::evalcounter =0
 
integer(8), public modparameters::rejecounter =0
 
integer(8), public modparameters::accepcounter =0
 
integer(8), public modparameters::alertcounter =0
 
integer(8), dimension(-6:6,-6:6), public modparameters::accepcounter_part =0
 
integer(8), dimension(-6:6,-6:6), public modparameters::rejecounter_part =0
 
integer(8), dimension(-6:+6,-6:+6), public modparameters::requevents =0
 
real(8), dimension(-6:+6,-6:+6), public modparameters::crosssecmax =0
 
real(8), dimension(-6:+6,-6:+6), public modparameters::crosssec =0
 
integer(8), dimension(1:nmaxchannels), public modparameters::requevents2 =0
 
integer(8), dimension(1:nmaxchannels), public modparameters::accepcounter_part2 =0
 
real(8), dimension(1:nmaxchannels), public modparameters::crosssec2 =0
 
real(8), dimension(1:nmaxchannels), public modparameters::crosssecmax2 =0
 
integer, public modparameters::ipart_sel
 
integer, public modparameters::jpart_sel
 
integer, public modparameters::ichann_sel
 
real(8) modparameters::time_start
 
real(8) modparameters::time_end
 
real(8) modparameters::time_int
 
logical, public modparameters::warmup
 
character(len=500) modparameters::datafile
 
character(len=500) modparameters::csmaxfile
 
character(len=500) modparameters::logfile
 
character(len=500) modparameters::lheprodfile
 
character(len=100) modparameters::lhapdfstring
 
character(len=500) modparameters::lhapdf_data_path
 
integer, public modparameters::lhapdfmember
 
integer, public modparameters::lenlhapdfstring
 
integer, public modparameters::pdfset
 
logical, public modparameters::includeinterference
 
logical, public modparameters::reweightinterference
 
logical, public modparameters::writegit
 
real(8), public modparameters::m_v
 
real(8), public modparameters::ga_v
 
real(8), public modparameters::m_vprime
 
real(8), public modparameters::ga_vprime
 
real(8), public modparameters::m_v_ps
 
real(8), public modparameters::ga_v_ps
 
real(8), public modparameters::m_z_ps
 
real(8), public modparameters::ga_z_ps
 
real(8), public modparameters::m_w_ps
 
real(8), public modparameters::ga_w_ps
 
real(dp), parameter, public modparameters::pi =3.141592653589793238462643383279502884197_dp
 
real(dp), parameter, public modparameters::sqrt2 = 1.4142135623730950488016887242096980786_dp
 
real(dp), parameter, public modparameters::gamma_0 = 0.5772156649015328606065120900824024310421_dp
 
real(dp), parameter, public modparameters::pisq = pi**2
 
real(8), parameter, public modparameters::one = 1.0d0
 
real(8), parameter, public modparameters::mone = -1.0d0
 
real(8), parameter, public modparameters::half = 0.5d0
 
real(8), parameter, public modparameters::two = 2.0d0
 
real(8), parameter, public modparameters::zero = 0d0
 
complex(8), parameter, public modparameters::czero = (0d0, 0d0)
 
complex(8), parameter, public modparameters::cone = 1.0d0
 
complex(8), parameter, public modparameters::ci =(0d0, 1.0d0)
 
complex(8), parameter, public modparameters::ne =(0d0, 1.0d0)
 
real(8), parameter, public modparameters::percent =1d0/100d0
 
real(8), parameter, public modparameters::symmfac =1d0/2d0
 
real(8), parameter, public modparameters::spinavg =1d0/4d0
 
real(8), parameter, public modparameters::quarkcolavg =1d0/3d0
 
real(8), parameter, public modparameters::gluoncolavg =1d0/8d0
 
real(8), parameter, public modparameters::gev =1d0/100d0
 
real(8), parameter, public modparameters::tev =1d+3*GeV
 
real(8), parameter, public modparameters::mev =1d-3*GeV
 
real(8), parameter, public modparameters::kev =1d-6*GeV
 
real(8), parameter, public modparameters::ev =1d-9*GeV
 
real(8), parameter, public modparameters::meter =1d6
 
real(8), parameter, public modparameters::milimeter =1d-3*meter
 
real(8), parameter, public modparameters::ctauunit =milimeter
 
real(8), parameter, public modparameters::barn =1d-28*(meter**2)
 
real(8), parameter, public modparameters::picobarn =1e-12*barn
 
real(8), parameter, public modparameters::femtobarn =1e-15*barn
 
real(8), parameter, public modparameters::attobarn =1e-18*barn
 
real(8), parameter, public modparameters::second =1d15
 
real(8), parameter, public modparameters::milisecond =1d-3*second
 
real(8), parameter, public modparameters::speedoflight =299792458*meter/second
 
real(8), parameter, public modparameters::planckconstant =4.13567d-15*eV*second
 
real(8), parameter, public modparameters::hbar =PlanckConstant/(2d0*pi)
 
real(8), parameter, public modparameters::hbarc =hbar*SpeedOfLight
 
real(8), parameter, public modparameters::hbarc2 =hbarc**2
 
real(8), parameter, public modparameters::hbarc2_fbgev2 = hbarc2/(femtobarn*(GeV**2))
 
real(8), parameter, public modparameters::hbarc2_pbgev2 = hbarc2/(picobarn*(GeV**2))
 
real(8), parameter, public modparameters::hbarc2xsecunit = hbarc2_fbGeV2*(GeV**2)
 
real(8), public modparameters::mincs =1d10
 
real(8), public modparameters::maxcs =0d0
 
real(8), public modparameters::avgcs =0d0
 
integer, public modparameters::br_z_ll_counter =0
 
integer, public modparameters::br_z_inv_counter =0
 
integer, public modparameters::br_z_uu_counter =0
 
integer, public modparameters::br_z_dd_counter =0
 
integer, public modparameters::br_w_ll_counter =0
 
integer, public modparameters::br_w_ud_counter =0
 
integer, dimension(1:5, 1:5), public modparameters::br_counter =0
 
integer, dimension(0:8), public modparameters::leptinevent = 0
 
integer, dimension(0:8), public modparameters::jetsinevent = 0
 
logical, public modparameters::reweightdecay = .false.
 
integer, public modparameters::userseed = 0
 
integer, public modparameters::widthscheme = 0
 
integer, public modparameters::widthschemein = 0
 
real(8), public modparameters::mubarh = -999d0
 
real(8), public modparameters::gabarh = -999d0
 
real(8), public modparameters::maxinputmhstar = -999d0
 
real(8), public modparameters::mininputmhstar = 1d15
 
real(8), public modparameters::mhstarforphasespace
 
logical, public modparameters::readpmzz
 
character(len=500), public modparameters::pmzzfile = "PMZZdistribution.out"
 
real(8), public modparameters::pmzz_mreso = -1d0
 
integer, parameter, public modparameters::pmzzsize = 10000
 
real(8), dimension(1:pmzzsize, 1:2), public modparameters::pmzzdistribution
 
integer, public modparameters::pmzzminindex =-1
 
integer, public modparameters::pmzzmaxindex =-1
 
complex(8), public modparameters::printpmzz
 
integer, public modparameters::printpmzzintervals
 
integer, public modparameters::vbfoffsh_run =-1
 
logical, public modparameters::findcrosssectionwithweights = .false.
 
real(8), public modparameters::vprimedecaylengthmasscutofffactor = -1d0
 
real(8), public modparameters::crosssectionwithweights = 0d0
 
real(8), public modparameters::crosssectionwithweightserrorsquared = 0d0
 
integer, parameter, public modparameters::nmaxseeds = 33
 
integer, dimension(1:nmaxseeds), parameter, public modparameters::defaultseeds = (/847362834,470115596,392845769,191039475,372910496,192049687,695820194,218930493,902943834,471748302,123958674,390534012,938576849,386472918,938576483,891928354,593857698,938576432,948576849,192847564 ,218940493,902943854,471748304,123958670,390534013,938576846,386472917,938576484,891928359,593857698,938576434,948576848,192847565/)
 
integer, dimension(1:nmaxseeds), public modparameters::theseeds = DefaultSeeds
 
logical, public modparameters::fix_channels_ratio = .false.
 
real(8), public modparameters::channels_ratio_fix = 0.25d0
 
logical, public modparameters::writeweightedlhe = .false.
 
logical, public modparameters::randomizevvdecays = .true.
 
logical, public modparameters::useunformattedread = .false.
 
logical, public modparameters::hbbdecays =.false.
 
logical, public modparameters::h_dk =.false.
 
character(len=2), public modparameters::vh_pc = "lo"
 
real(8), public modparameters::alpha_dip = 1d0
 
real(8), public modparameters::ptjetcut = -1d0*GeV
 
real(8), public modparameters::etajetcut = -1d0
 
real(8), public modparameters::detajetcut = -1d0
 
real(8), public modparameters::rjet = -1d0
 
real(8), public modparameters::mjjcut = 0d0*GeV
 
real(8), dimension(1:2), public modparameters::m4l_minmax = (/ -1d0,-1d0 /)*GeV
 
real(8), dimension(1:2), public modparameters::m2l_minmax = (/ 0d0,14000d0 /)*GeV
 
real(8), dimension(1:2), public modparameters::mvh_minmax = (/ 0d0,14000d0 /)*GeV
 
logical, public modparameters::includegammastar = .false.
 
logical, public modparameters::includevprime = .false.
 
real(8), public modparameters::mphotoncutoff = -1d0*GeV
 
real(8), public modparameters::ptlepcut = -1d0*GeV
 
real(8), public modparameters::etalepcut = 999d0
 
real(8), public modparameters::pthcut = 0d0*GeV
 
logical, public modparameters::jetsoppositeeta = .false.
 
real(8), public modparameters::m_top = 173.2d0 *GeV
 
real(8), public modparameters::ga_top = 2.0d0 *GeV
 
real(8), public modparameters::m_z = 91.1876d0 *GeV
 
real(8), public modparameters::ga_z = 2.4952d0 *GeV
 
real(8), public modparameters::m_w = 80.399d0 *GeV
 
real(8), public modparameters::ga_w = 2.085d0 *GeV
 
real(8), public modparameters::m_reso = 125.0d0 *GeV
 
real(8), public modparameters::ga_reso = 0.00407d0 *GeV
 
real(8), public modparameters::m_reso2 = -1d0 *GeV
 
real(8), public modparameters::ga_reso2 = 0d0 *GeV
 
real(8), public modparameters::higgsdecaylengthmm = 0d0
 
real(8), public modparameters::vprimedecaylengthmm = 0d0
 
real(8), public modparameters::m_bot = 4.75d0 *GeV
 
real(8), public modparameters::m_charm = 1.275d0 *GeV
 
real(8), public modparameters::m_el = 0.00051100d0 *GeV
 
real(8), public modparameters::m_mu = 0.10566d0 *GeV
 
real(8), public modparameters::m_tau = 1.7768d0 *GeV
 
real(8), public modparameters::ga_tau = 2.267d-12 *GeV
 
real(8), public modparameters::m_bot_4gen = 100000d0*GeV
 
real(8), public modparameters::m_top_4gen = 100000d0*GeV
 
real(8), public modparameters::gf = 1.16639d-5/GeV**2
 
real(8), public modparameters::alpha_qed = 1d0/128d0
 
real(8), public modparameters::vev
 
real(8), public modparameters::gwsq
 
real(dp), public modparameters::esq
 
real(8), public modparameters::xw = 0.23119d0
 
real(8), public modparameters::sitw
 
real(8), public modparameters::twosc
 
real(8), parameter, public modparameters::lhc_energy =13d0 *TeV
 
real(8), parameter, public modparameters::tev_energy =1.96d0 *TeV
 
real(8), parameter, public modparameters::ilc_energy =250d0 *GeV
 
real(8), public modparameters::pol_a = 0d0
 
real(8), public modparameters::pol_b = 0d0
 
integer, parameter, public modparameters::nqflavors_pdf = 5
 
integer, parameter, public modparameters::nloops_pdf = 1
 
real(8), public modparameters::zmass_pdf
 
real(8), public modparameters::mu_fact
 
real(8), public modparameters::mu_ren
 
real(dp), public modparameters::alphas
 
real(dp), public modparameters::alphas_mz
 
real(dp), public modparameters::gs
 
real(8), public modparameters::breitwignercutoff = 20d0
 
real(8), public modparameters::vckm_ud
 
real(8), public modparameters::vckm_us
 
real(8), public modparameters::vckm_cs
 
real(8), public modparameters::vckm_cd
 
real(8), public modparameters::vckm_tb
 
real(8), public modparameters::vckm_ts
 
real(8), public modparameters::vckm_cb
 
real(8), public modparameters::vckm_ub
 
real(8), public modparameters::vckm_td
 
real(8), parameter, public modparameters::br_z_ll = 10.10d0*percent
 
real(8), parameter, public modparameters::br_z_hadr = 69.91d0*percent
 
real(8), parameter, public modparameters::br_z_inv = 100d0*percent - Br_Z_ll - Br_Z_hadr
 
real(8), parameter, public modparameters::br_z_uu = 11.6d0*percent
 
real(8), parameter, public modparameters::br_z_cc = 11.6d0*percent
 
real(8), parameter, public modparameters::br_z_dd = 15.6d0*percent
 
real(8), parameter, public modparameters::br_z_ss = 15.6d0*percent
 
real(8), parameter, public modparameters::br_z_bb = Br_Z_hadr - Br_Z_uu - Br_Z_dd - Br_Z_cc - Br_Z_ss
 
real(8), parameter, public modparameters::br_w_ll = 32.72d0*percent
 
real(8), parameter, public modparameters::br_w_hadr = 100d0*percent - Br_W_ll
 
real(8), parameter, public modparameters::br_z_ee = 1d0/3d0*Br_Z_ll
 
real(8), parameter, public modparameters::br_z_mm = 1d0/3d0*Br_Z_ll
 
real(8), parameter, public modparameters::br_z_tt = 1d0/3d0*Br_Z_ll
 
real(8), parameter, public modparameters::br_z_nn = 1d0/3d0*Br_Z_inv
 
real(8), parameter, public modparameters::br_w_en = 1d0/3d0*Br_W_ll
 
real(8), parameter, public modparameters::br_w_mn = 1d0/3d0*Br_W_ll
 
real(8), parameter, public modparameters::br_w_tn = 1d0/3d0*Br_W_ll
 
real(8), parameter, public modparameters::br_w_ud = 1d0/2d0*Br_W_hadr
 
real(8), parameter, public modparameters::br_w_cs = 1d0/2d0*Br_W_hadr
 
real(8), parameter, public modparameters::brlept_z_ee = Br_Z_ee/Br_Z_ll
 
real(8), parameter, public modparameters::brlept_z_mm = Br_Z_mm/Br_Z_ll
 
real(8), parameter, public modparameters::brlept_z_tt = Br_Z_tt/Br_Z_ll
 
real(8), parameter, public modparameters::brlept_z_nn = Br_Z_nn/Br_Z_inv
 
real(8), parameter, public modparameters::brlept_w_en = Br_W_en/Br_W_ll
 
real(8), parameter, public modparameters::brlept_w_mn = Br_W_mn/Br_W_ll
 
real(8), parameter, public modparameters::brlept_w_tn = Br_W_tn/Br_W_ll
 
real(8), parameter, public modparameters::brhadr_z_uu = Br_Z_uu/Br_Z_hadr
 
real(8), parameter, public modparameters::brhadr_z_cc = Br_Z_cc/Br_Z_hadr
 
real(8), parameter, public modparameters::brhadr_z_dd = Br_Z_dd/Br_Z_hadr
 
real(8), parameter, public modparameters::brhadr_z_ss = Br_Z_ss/Br_Z_hadr
 
real(8), parameter, public modparameters::brhadr_z_bb = Br_Z_bb/Br_Z_hadr
 
real(8), parameter, public modparameters::brhadr_w_ud = Br_W_ud/Br_W_hadr
 
real(8), parameter, public modparameters::brhadr_w_cs = Br_W_cs/Br_W_hadr
 
real(8), public modparameters::scale_alpha_z_uu = 1.037560d0
 
real(8), public modparameters::scale_alpha_z_dd = 1.037560d0
 
real(8), public modparameters::scale_alpha_z_ll = 1d0
 
real(8), public modparameters::scale_alpha_z_tt = 1d0
 
real(8), public modparameters::scale_alpha_z_nn = 1d0
 
real(8), public modparameters::scale_alpha_w_ud = 1.038200d0
 
real(8), public modparameters::scale_alpha_w_cs = 1.038200d0
 
real(8), public modparameters::scale_alpha_w_ln = 1d0
 
real(8), public modparameters::scale_alpha_w_tn = 1d0
 
real(8), parameter, public modparameters::lambda = 1000d0 *GeV
 
real(8), parameter, public modparameters::lambda2 = 1000d0 *GeV
 
logical, parameter, public modparameters::generate_as = .false.
 
complex(8), parameter, public modparameters::ahg1 = (1.0d0, 0d0)
 
complex(8), parameter, public modparameters::ahg2 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::ahg3 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::ahz1 = (1.0d0, 0d0)
 
complex(8), parameter, public modparameters::ahz2 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::ahz3 = (0d0, 0d0)
 
complex(8), public modparameters::ghg2 = (1.0d0, 0d0)
 
complex(8), public modparameters::ghg3 = (0d0, 0d0)
 
complex(8), public modparameters::ghg4 = (0d0, 0d0)
 
complex(8), public modparameters::ghg2_4gen = (0d0, 0d0)
 
complex(8), public modparameters::ghg3_4gen = (0d0, 0d0)
 
complex(8), public modparameters::ghg4_4gen = (0d0, 0d0)
 
complex(8), public modparameters::ghz1 = (2.0d0, 0d0)
 
complex(8), public modparameters::ghz2 = (0d0, 0d0)
 
complex(8), public modparameters::ghz3 = (0d0, 0d0)
 
complex(8), public modparameters::ghz4 = (0d0, 0d0)
 
complex(8), public modparameters::ghz1_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghz1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghz1_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghz1_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghz1_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghz1_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghz1_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghz2_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghz2_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghz2_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghz2_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghz2_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghz2_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghz2_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghz3_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghz3_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghz3_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghz3_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghz3_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghz3_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghz3_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghz4_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghz4_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghz4_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghz4_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghz4_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghz4_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghz4_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzgs1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzgs2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzgs3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzgs4 = (0d0, 0d0)
 
complex(8), public modparameters::ghgsgs2 = (0d0, 0d0)
 
complex(8), public modparameters::ghgsgs3 = (0d0, 0d0)
 
complex(8), public modparameters::ghgsgs4 = (0d0, 0d0)
 
real(8), parameter, public modparameters::lambda_z1 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_z2 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_z3 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_z4 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_zgs1 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_q = 10000d0*GeV
 
integer, public modparameters::cz_q1sq = 0
 
integer, public modparameters::cz_q2sq = 0
 
integer, public modparameters::cz_q12sq = 0
 
real(8), public modparameters::lambda_z11 = 100d0*GeV
 
real(8), public modparameters::lambda_z21 = 100d0*GeV
 
real(8), public modparameters::lambda_z31 = 100d0*GeV
 
real(8), public modparameters::lambda_z41 = 100d0*GeV
 
real(8), public modparameters::lambda_z12 = 100d0*GeV
 
real(8), public modparameters::lambda_z22 = 100d0*GeV
 
real(8), public modparameters::lambda_z32 = 100d0*GeV
 
real(8), public modparameters::lambda_z42 = 100d0*GeV
 
real(8), public modparameters::lambda_z10 = 100d0*GeV
 
real(8), public modparameters::lambda_z20 = 100d0*GeV
 
real(8), public modparameters::lambda_z30 = 100d0*GeV
 
real(8), public modparameters::lambda_z40 = 100d0*GeV
 
logical, public modparameters::distinguish_hwwcouplings =.false.
 
complex(8), public modparameters::ghw1 = (0d0, 0d0)
 
complex(8), public modparameters::ghw2 = (0d0, 0d0)
 
complex(8), public modparameters::ghw3 = (0d0, 0d0)
 
complex(8), public modparameters::ghw4 = (0d0, 0d0)
 
complex(8), public modparameters::ghw1_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghw1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghw1_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghw1_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghw1_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghw1_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghw1_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghw2_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghw2_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghw2_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghw2_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghw2_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghw2_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghw2_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghw3_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghw3_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghw3_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghw3_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghw3_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghw3_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghw3_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghw4_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghw4_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghw4_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghw4_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghw4_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghw4_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghw4_prime7 = (0d0, 0d0)
 
real(8), parameter, public modparameters::lambda_w1 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_w2 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_w3 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda_w4 = 10000d0*GeV
 
integer, public modparameters::cw_q1sq = 0
 
integer, public modparameters::cw_q2sq = 0
 
integer, public modparameters::cw_q12sq = 0
 
real(8), public modparameters::lambda_w11 = 100d0*GeV
 
real(8), public modparameters::lambda_w21 = 100d0*GeV
 
real(8), public modparameters::lambda_w31 = 100d0*GeV
 
real(8), public modparameters::lambda_w41 = 100d0*GeV
 
real(8), public modparameters::lambda_w12 = 100d0*GeV
 
real(8), public modparameters::lambda_w22 = 100d0*GeV
 
real(8), public modparameters::lambda_w32 = 100d0*GeV
 
real(8), public modparameters::lambda_w42 = 100d0*GeV
 
real(8), public modparameters::lambda_w10 = 100d0*GeV
 
real(8), public modparameters::lambda_w20 = 100d0*GeV
 
real(8), public modparameters::lambda_w30 = 100d0*GeV
 
real(8), public modparameters::lambda_w40 = 100d0*GeV
 
complex(8), public modparameters::ghzzp1 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp1_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp1_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp1_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp1_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp1_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp1_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp2_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp3_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzzp4_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpgs1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpgs2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpgs3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpgs4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp1_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp2_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp3_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghzpzp4_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ezp_el_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_el_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_mu_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_mu_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_ta_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_ta_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_nue_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_nue_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_up_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_up_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_chm_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_chm_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_dn_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_dn_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_str_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_str_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_bot_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_bot_right = (0d0, 0d0)
 
complex(8), public modparameters::ezp_top_left = (0d0, 0d0)
 
complex(8), public modparameters::ezp_top_right = (0d0, 0d0)
 
real(8), public modparameters::m_zprime = -1d0
 
real(8), public modparameters::ga_zprime = 0d0
 
complex(8), public modparameters::ghwwp1 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp1_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp1_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp1_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp1_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp1_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp1_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp2_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp3_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwwp4_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp1_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp2_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp3_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4_prime = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4_prime2 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4_prime3 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4_prime4 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4_prime5 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4_prime6 = (0d0, 0d0)
 
complex(8), public modparameters::ghwpwp4_prime7 = (0d0, 0d0)
 
complex(8), public modparameters::ewp_el_left = (0d0, 0d0)
 
complex(8), public modparameters::ewp_el_right = (0d0, 0d0)
 
complex(8), public modparameters::ewp_mu_left = (0d0, 0d0)
 
complex(8), public modparameters::ewp_mu_right = (0d0, 0d0)
 
complex(8), public modparameters::ewp_ta_left = (0d0, 0d0)
 
complex(8), public modparameters::ewp_ta_right = (0d0, 0d0)
 
complex(8), public modparameters::ewp_up_left = (0d0, 0d0)
 
complex(8), public modparameters::ewp_up_right = (0d0, 0d0)
 
complex(8), public modparameters::ewp_chm_left = (0d0, 0d0)
 
complex(8), public modparameters::ewp_chm_right = (0d0, 0d0)
 
complex(8), public modparameters::ewp_top_left = (0d0, 0d0)
 
complex(8), public modparameters::ewp_top_right = (0d0, 0d0)
 
real(8), public modparameters::m_wprime = -1d0
 
real(8), public modparameters::ga_wprime = 0d0
 
complex(8), public modparameters::gh2g2 = (0d0, 0d0)
 
complex(8), public modparameters::gh2g3 = (0d0, 0d0)
 
complex(8), public modparameters::gh2g4 = (0d0, 0d0)
 
complex(8), public modparameters::gh2g2_4gen = (0d0, 0d0)
 
complex(8), public modparameters::gh2g3_4gen = (0d0, 0d0)
 
complex(8), public modparameters::gh2g4_4gen = (0d0, 0d0)
 
complex(8), public modparameters::gh2z1 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2zgs2 = (0.00d0, 0d0)
 
complex(8), public modparameters::gh2zgs3 = (0.00d0, 0d0)
 
complex(8), public modparameters::gh2zgs4 = (0.00d0, 0d0)
 
complex(8), public modparameters::gh2gsgs2 = (0.00d0, 0d0)
 
complex(8), public modparameters::gh2gsgs3 = (0.00d0, 0d0)
 
complex(8), public modparameters::gh2gsgs4 = (0.00d0, 0d0)
 
complex(8), public modparameters::gh2z1_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z1_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z1_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z1_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z1_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z1_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z1_prime7 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z2_prime7 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z3_prime7 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2z4_prime7 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2zgs1_prime2 = (0.0d0, 0d0)
 
real(8), parameter, public modparameters::lambda2_z1 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_z2 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_z3 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_z4 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_zgs1 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_q = 10000d0*GeV
 
integer, public modparameters::c2z_q1sq = 0
 
integer, public modparameters::c2z_q2sq = 0
 
integer, public modparameters::c2z_q12sq = 0
 
real(8), public modparameters::lambda2_z11 = 100d0*GeV
 
real(8), public modparameters::lambda2_z21 = 100d0*GeV
 
real(8), public modparameters::lambda2_z31 = 100d0*GeV
 
real(8), public modparameters::lambda2_z41 = 100d0*GeV
 
real(8), public modparameters::lambda2_z12 = 100d0*GeV
 
real(8), public modparameters::lambda2_z22 = 100d0*GeV
 
real(8), public modparameters::lambda2_z32 = 100d0*GeV
 
real(8), public modparameters::lambda2_z42 = 100d0*GeV
 
real(8), public modparameters::lambda2_z10 = 100d0*GeV
 
real(8), public modparameters::lambda2_z20 = 100d0*GeV
 
real(8), public modparameters::lambda2_z30 = 100d0*GeV
 
real(8), public modparameters::lambda2_z40 = 100d0*GeV
 
complex(8), public modparameters::gh2w1 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w1_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w1_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w1_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w1_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w1_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w1_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w1_prime7 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w2_prime7 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w3_prime7 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4_prime = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4_prime2 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4_prime3 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4_prime4 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4_prime5 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4_prime6 = (0.0d0, 0d0)
 
complex(8), public modparameters::gh2w4_prime7 = (0.0d0, 0d0)
 
real(8), parameter, public modparameters::lambda2_w1 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_w2 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_w3 = 10000d0*GeV
 
real(8), parameter, public modparameters::lambda2_w4 = 10000d0*GeV
 
integer, public modparameters::c2w_q1sq = 0
 
integer, public modparameters::c2w_q2sq = 0
 
integer, public modparameters::c2w_q12sq = 0
 
real(8), public modparameters::lambda2_w11 = 100d0*GeV
 
real(8), public modparameters::lambda2_w21 = 100d0*GeV
 
real(8), public modparameters::lambda2_w31 = 100d0*GeV
 
real(8), public modparameters::lambda2_w41 = 100d0*GeV
 
real(8), public modparameters::lambda2_w12 = 100d0*GeV
 
real(8), public modparameters::lambda2_w22 = 100d0*GeV
 
real(8), public modparameters::lambda2_w32 = 100d0*GeV
 
real(8), public modparameters::lambda2_w42 = 100d0*GeV
 
real(8), public modparameters::lambda2_w10 = 100d0*GeV
 
real(8), public modparameters::lambda2_w20 = 100d0*GeV
 
real(8), public modparameters::lambda2_w30 = 100d0*GeV
 
real(8), public modparameters::lambda2_w40 = 100d0*GeV
 
complex(8), public modparameters::dv_a = (1.0d0, 0d0)
 
complex(8), public modparameters::dp_a = (1.0d0, 0d0)
 
complex(8), public modparameters::dm_a = (1.0d0, 0d0)
 
complex(8), public modparameters::dv_z = (1.0d0, 0d0)
 
complex(8), public modparameters::dp_z = (1.0d0, 0d0)
 
complex(8), public modparameters::dm_z = (1.0d0, 0d0)
 
complex(8), public modparameters::daawpwm = (1.0d0, 0d0)
 
complex(8), public modparameters::dzawpwm = (1.0d0, 0d0)
 
complex(8), public modparameters::dzzwpwm = (1.0d0, 0d0)
 
complex(8), public modparameters::dfour_a = (0.0d0, 0d0)
 
complex(8), public modparameters::dfour_z = (0.0d0, 0d0)
 
complex(8), public modparameters::kappa = (1d0, 0d0)
 
complex(8), public modparameters::kappa_tilde = (0d0, 0d0)
 
complex(8), public modparameters::kappa_top = (1d0, 0d0)
 
complex(8), public modparameters::kappa_tilde_top = (0d0, 0d0)
 
complex(8), public modparameters::kappa_bot = (1d0, 0d0)
 
complex(8), public modparameters::kappa_tilde_bot = (0d0, 0d0)
 
complex(8), public modparameters::kappa_4gen_top = (0d0, 0d0)
 
complex(8), public modparameters::kappa_tilde_4gen_top = (0d0, 0d0)
 
complex(8), public modparameters::kappa_4gen_bot = (0d0, 0d0)
 
complex(8), public modparameters::kappa_tilde_4gen_bot = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_top = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_tilde_top = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_bot = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_tilde_bot = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_4gen_top = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_tilde_4gen_top = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_4gen_bot = (0d0, 0d0)
 
complex(8), public modparameters::kappa2_tilde_4gen_bot = (0d0, 0d0)
 
complex(8), public modparameters::zprime_qq_left = (1.0d0, 0d0)
 
complex(8), public modparameters::zprime_qq_right = (1.0d0, 0d0)
 
complex(8), public modparameters::zprime_zz_1 = (0d0, 0d0)
 
complex(8), public modparameters::zprime_zz_2 = (0d0, 0d0)
 
complex(8), public modparameters::a1 = (0d0, 0d0)
 
complex(8), public modparameters::a2 = (0d0, 0d0)
 
complex(8), public modparameters::a3 = (0d0, 0d0)
 
complex(8), public modparameters::a4 = (0d0, 0d0)
 
complex(8), public modparameters::a5 = (0d0, 0d0)
 
complex(8), public modparameters::graviton_qq_left = (1.0d0, 0d0)
 
complex(8), public modparameters::graviton_qq_right = (1.0d0, 0d0)
 
logical, parameter, public modparameters::generate_bis = .true.
 
logical, parameter, public modparameters::use_dynamic_mg = .true.
 
complex(8), public modparameters::b1 = (0d0, 0d0)
 
complex(8), public modparameters::b2 = (0d0, 0d0)
 
complex(8), public modparameters::b3 = (0d0, 0d0)
 
complex(8), public modparameters::b4 = (0d0, 0d0)
 
complex(8), public modparameters::b5 = (0d0, 0d0)
 
complex(8), public modparameters::b6 = (0d0, 0d0)
 
complex(8), public modparameters::b7 = (0d0, 0d0)
 
complex(8), public modparameters::b8 = (0d0, 0d0)
 
complex(8), public modparameters::b9 = (0d0, 0d0)
 
complex(8), public modparameters::b10 =(0d0, 0d0)
 
complex(8), public modparameters::bzzp1 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp2 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp3 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp4 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp5 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp6 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp7 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp8 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp9 = (0d0, 0d0)
 
complex(8), public modparameters::bzzp10 =(0d0, 0d0)
 
complex(8), public modparameters::bzpzp1 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp2 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp3 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp4 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp5 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp6 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp7 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp8 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp9 = (0d0, 0d0)
 
complex(8), public modparameters::bzpzp10 =(0d0, 0d0)
 
complex(8), public modparameters::bzgs1 = (0d0, 0d0)
 
complex(8), public modparameters::bzgs2 = (0d0, 0d0)
 
complex(8), public modparameters::bzgs3 = (0d0, 0d0)
 
complex(8), public modparameters::bzgs4 = (0d0, 0d0)
 
complex(8), public modparameters::bzgs8 = (0d0, 0d0)
 
complex(8), public modparameters::bgsgs1 = (0d0, 0d0)
 
complex(8), public modparameters::bgsgs2 = (0d0, 0d0)
 
complex(8), public modparameters::bgsgs3 = (0d0, 0d0)
 
complex(8), public modparameters::bgsgs4 = (0d0, 0d0)
 
complex(8), public modparameters::bgsgs8 = (0d0, 0d0)
 
complex(8), public modparameters::bzpgs1 = (0d0, 0d0)
 
complex(8), public modparameters::bzpgs2 = (0d0, 0d0)
 
complex(8), public modparameters::bzpgs3 = (0d0, 0d0)
 
complex(8), public modparameters::bzpgs4 = (0d0, 0d0)
 
complex(8), public modparameters::bzpgs8 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::c1 = (1.0d0, 0d0)
 
complex(8), parameter, public modparameters::c2 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::c3 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::c41 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::c42 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::c5 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::c6 = (0d0, 0d0)
 
complex(8), parameter, public modparameters::c7 = (0d0, 0d0)
 
real(8), public modparameters::daz_lep_left = (0d0)
 
real(8), public modparameters::daz_lep_right = (0d0)
 
real(8), public modparameters::daz_neu_left = (0d0)
 
real(8), public modparameters::daz_neu_right = (0d0)
 
real(8), public modparameters::daz_qup_left = (0d0)
 
real(8), public modparameters::daz_qup_right = (0d0)
 
real(8), public modparameters::daz_qdn_left = (0d0)
 
real(8), public modparameters::daz_qdn_right = (0d0)
 
real(dp), dimension(0:6), parameter, public modparameters::b0_pdf = (/ 0.8753521870054244D0,0.822300539308126D0,0.7692488916108274D0,0.716197243913529D0,0.6631455962162306D0,0.6100939485189321D0,0.5570423008216338D0 /)
 
real(dp), parameter, public modparameters::nf = 5.0_dp
 
real(dp), parameter, public modparameters::xn = 3.0_dp
 
real(dp), parameter, public modparameters::ca = 3.0_dp
 
real(dp), parameter, public modparameters::cf = 4.0_dp/3.0_dp
 
real(dp), parameter, public modparameters::tr = 0.5_dp
 
real(dp), parameter, public modparameters::avegg = 1.0_dp/4.0_dp/64.0_dp
 
real(dp), parameter, public modparameters::aveqg = 1.0_dp/4.0_dp/24.0_dp
 
real(dp), parameter, public modparameters::aveqq = 1.0_dp/4.0_dp/9.0_dp
 
real(8), parameter, public modparameters::t3ll = -0.5d0
 
real(8), parameter, public modparameters::t3lr = 0d0
 
real(8), parameter, public modparameters::t3nl = 0.5d0
 
real(8), parameter, public modparameters::t3nr = 0d0
 
real(8), parameter, public modparameters::t3ul = 0.5d0
 
real(8), parameter, public modparameters::t3ur = 0d0
 
real(8), parameter, public modparameters::t3dl = -0.5d0
 
real(8), parameter, public modparameters::t3dr = 0d0
 
real(8), parameter, public modparameters::qll = -1d0
 
real(8), parameter, public modparameters::qlr = -1d0
 
real(8), parameter, public modparameters::qnl = 0d0
 
real(8), parameter, public modparameters::qnr = 0d0
 
real(8), parameter, public modparameters::qul = 2d0/3d0
 
real(8), parameter, public modparameters::qur = 2d0/3d0
 
real(8), parameter, public modparameters::qdl = -1d0/3d0
 
real(8), parameter, public modparameters::qdr = -1d0/3d0
 
real(8), public modparameters::overallcouplvffsq
 
real(8), public modparameters::ar_lep
 
real(8), public modparameters::al_lep
 
real(8), public modparameters::ar_neu
 
real(8), public modparameters::al_neu
 
real(8), public modparameters::ar_qup
 
real(8), public modparameters::al_qup
 
real(8), public modparameters::ar_qdn
 
real(8), public modparameters::al_qdn
 
real(8), public modparameters::bl
 
real(8), public modparameters::br
 
real(8), public modparameters::cr_lep
 
real(8), public modparameters::cl_lep
 
real(8), public modparameters::cr_neu
 
real(8), public modparameters::cl_neu
 
real(8), public modparameters::cr_qup
 
real(8), public modparameters::cl_qup
 
real(8), public modparameters::cr_qdn
 
real(8), public modparameters::cl_qdn
 
real(dp), public modparameters::couplwffsq
 
real(dp), public modparameters::couplzffsq
 
real(dp), public modparameters::couplazff
 
real(dp), public modparameters::couplaffsq
 
integer, target, public modparameters::up_ = 1
 
integer, target, public modparameters::dn_ = 2
 
integer, target, public modparameters::chm_ = 3
 
integer, target, public modparameters::str_ = 4
 
integer, target, public modparameters::top_ = 5
 
integer, target, public modparameters::bot_ = 6
 
integer, target, public modparameters::elp_ = 7
 
integer, target, public modparameters::mup_ = 8
 
integer, target, public modparameters::tap_ = 9
 
integer, target, public modparameters::glu_ = 10
 
integer, target, public modparameters::pho_ = 11
 
integer, target, public modparameters::z0_ = 12
 
integer, target, public modparameters::wp_ = 13
 
integer, target, public modparameters::nue_ = 14
 
integer, target, public modparameters::num_ = 15
 
integer, target, public modparameters::nut_ = 16
 
integer, target, public modparameters::hig_ = 25
 
integer, target, public modparameters::zpr_ = 32
 
integer, target, public modparameters::zpr2_ = 33
 
integer, target, public modparameters::wppr_ = 34
 
integer, target, public modparameters::gra_ = 39
 
integer, target, public modparameters::aup_ = -1
 
integer, target, public modparameters::adn_ = -2
 
integer, target, public modparameters::achm_ = -3
 
integer, target, public modparameters::astr_ = -4
 
integer, target, public modparameters::atop_ = -5
 
integer, target, public modparameters::abot_ = -6
 
integer, target, public modparameters::elm_ = -7
 
integer, target, public modparameters::mum_ = -8
 
integer, target, public modparameters::tam_ = -9
 
integer, target, public modparameters::wm_ = -13
 
integer, target, public modparameters::anue_ = -14
 
integer, target, public modparameters::anum_ = -15
 
integer, target, public modparameters::anut_ = -16
 
integer, target, public modparameters::wmpr_ = -34
 
integer, parameter, public modparameters::not_a_particle_ = -9000
 
real(8), dimension(1:4), parameter, public modparameters::mom_not_a_particle = (/0d0,0d0,0d0,0d0/)
 
integer, parameter, public modparameters::pdfglu_ = 0
 
integer, parameter, public modparameters::pdfdn_ = 1
 
integer, parameter, public modparameters::pdfup_ = 2
 
integer, parameter, public modparameters::pdfstr_ = 3
 
integer, parameter, public modparameters::pdfchm_ = 4
 
integer, parameter, public modparameters::pdfbot_ = 5
 
integer, parameter, public modparameters::pdftop_ = 6
 
integer, parameter, public modparameters::pdfadn_ = -1
 
integer, parameter, public modparameters::pdfaup_ = -2
 
integer, parameter, public modparameters::pdfastr_ = -3
 
integer, parameter, public modparameters::pdfachm_ = -4
 
integer, parameter, public modparameters::pdfabot_ = -5
 
integer, parameter, public modparameters::pdfatop_ = -6
 
integer, parameter modparameters::io_stdout =6
 
integer, parameter modparameters::io_lheoutfile =14
 
integer, parameter modparameters::io_histofile =15
 
integer, parameter modparameters::io_lheinfile =16
 
integer, parameter modparameters::io_logfile =17
 
integer, parameter modparameters::io_csmaxfile =18
 
integer, parameter modparameters::io_lheoutfile2 =19
 
integer, parameter modparameters::io_lheoutfile3 =20
 
integer, parameter modparameters::io_tmpfile =21
 
integer, dimension(0:10), public modparameters::debugcounter = 0
 
real(8), dimension(0:10), public modparameters::debugvar = 0d0
 
integer, dimension(1:2), public modparameters::ijpartons =0