00001 c----------------------------------------------------------
00002 c Common blocks for the fixed variables
00003 c
00004 c sh = (p_had1 + p_had2)^2
00005 c
00006 c xm0i2 = Pole mass squared of the intermediate vector boson
00007 c gai = Width of the intermediate vector boson
00008 c xm0v2 = Pole mass squared of the final-state vector boson
00009 c gav = Width of the final-state vector boson
00010 c xm0h2 = Pole mass squared of the Higgs
00011 c gah = Width of the Higgs
00012 c xlam = lambda_QCD (5 flavours)
00013 c zg = strong coupling = sqrt(4*pi*alfas)
00014 c gf = G_F
00015 c ze2 = electron charge squared
00016 c ze2v = electron charge squared, computed at the vector boson mass
00017 c
00018 real * 8 sh
00019 common/shadr/sh
00020 real * 8 xm0i2,gai,xm0v2,gav,xm0h2,gah,xlam,zg,gf,ze2,ze2v
00021 common/fixvar/xm0i2,gai,xm0v2,gav,xm0h2,gah,xlam,zg,gf,ze2,ze2v
00022 c xmi2 = Mass squared of the intermediate vector boson
00023 c The other variables are relevant to the Breit-Wigner function
00024 real * 8 xmi2,bwifmpl,bwifmmn,bwidelf,xmilow2,xmiupp2
00025 common/bwicmm/xmi2,bwifmpl,bwifmmn,bwidelf,xmilow2,xmiupp2
00026 c xmv2 = Mass squared of the final-state vector boson
00027 c The other variables are relevant to the Breit-Wigner function
00028 real * 8 xmv2,bwvfmpl,bwvfmmn,bwvdelf,xmvlow2,xmvupp2
00029 common/bwvcmm/xmv2,bwvfmpl,bwvfmmn,bwvdelf,xmvlow2,xmvupp2
00030 c xmh2 = Mass squared of the Higgs
00031 c The other variables are relevant to the Breit-Wigner function
00032 real * 8 xmh2,bwhfmpl,bwhfmmn,bwhdelf,xmhlow2,xmhupp2
00033 common/bwhcmm/xmh2,bwhfmpl,bwhfmmn,bwhdelf,xmhlow2,xmhupp2
00034 c factors to rescale the factorization scales for hadron 1 and 2, and the
00035 c renormalization scale
00036 real * 8 xf2h1,xf2h2,xren2
00037 common/scalef/xf2h1,xf2h2,xren2
00038 c factors to rescale the factorization scales for hadron 1 and 2, and the
00039 c renormalization scale (MC terms)
00040 real * 8 xf2h1mc,xf2h2mc,xren2mc
00041 common/scalemcf/xf2h1mc,xf2h2mc,xren2mc
00042 c renormalization scale, factorization scales for hadron 1 and 2
00043 real * 8 xmur2,xmuf2h1,xmuf2h2
00044 common/phosca/xmur2,xmuf2h1,xmuf2h2
00045 c renormalization scale, factorization scales for hadron 1 and 2 (MC terms)
00046 real * 8 xmumcr2,xmumcf2h1,xmumcf2h2
00047 common/phoscamc/xmumcr2,xmumcf2h1,xmumcf2h2
00048 c Number of light flavours (3 for charm, 4 for bottom, 5 for top)
00049 integer nl
00050 common/nl/nl
00051 c----------------------------------------------------------
00052 c Flag to select subprocess: prc = 'gg','qq' or 'qg'
00053 c
00054 character * 2 prc
00055 common/process/prc
00056 c
00057 c
00058 c scheme = 'DI' for deep inelastic, 'MS' for msbar scheme
00059 character * 2 schhad1,schhad2
00060 common/scheme/schhad1,schhad2
00061 c
00062 c
00063 c use newver='NEW' for vaxes, 'UNKNOWN' in other machines,
00064 character * 7 newver
00065 common/newver/newver
1.5.4