00001 c----------------------------------------------------------
00002 c Common blocks for the fixed variables
00003 c
00004 c xmll2= Lepton pair mass squared
00005 c xm02 = Vector boson pole mass squared
00006 c gah = width
00007 c xmv2 = Other vector boson mass (usually not set)
00008 c xlam = lambda_QCD (5 flavours)
00009 c zg = strong coupling = sqrt(4*pi*alfas)
00010 c gf = G_F
00011 c ze2 = electron charge squared
00012 c
00013 c sh = (p_had1 + p_had2)^2
00014 real * 8 sh
00015 common/shadr/sh
00016 real * 8 xm02,gah,xmv2,xlam,zg,gf,ze2
00017 common/fixvar/xm02,gah,xmv2,xlam,zg,gf,ze2
00018 real * 8 xmll2,bwfmpl,bwfmmn,bwdelf,xmlow2,xmupp2
00019 common/bwcmm/xmll2,bwfmpl,bwfmmn,bwdelf,xmlow2,xmupp2
00020 c factors to rescale the factorization scales for hadron 1 and 2, and the
00021 c renormalization scale
00022 real * 8 xf2h1,xf2h2,xren2
00023 common/scalef/xf2h1,xf2h2,xren2
00024 c factors to rescale the factorization scales for hadron 1 and 2, and the
00025 c renormalization scale (MC terms)
00026 real * 8 xf2h1mc,xf2h2mc,xren2mc
00027 common/scalemcf/xf2h1mc,xf2h2mc,xren2mc
00028 c renormalization scale, factorization scales for hadron 1 and 2
00029 real * 8 xmur2,xmuf2h1,xmuf2h2
00030 common/phosca/xmur2,xmuf2h1,xmuf2h2
00031 c renormalization scale, factorization scales for hadron 1 and 2 (MC terms)
00032 real * 8 xmumcr2,xmumcf2h1,xmumcf2h2
00033 common/phoscamc/xmumcr2,xmumcf2h1,xmumcf2h2
00034 c Number of light flavours (3 for charm, 4 for bottom, 5 for top)
00035 integer nl
00036 common/nl/nl
00037 c----------------------------------------------------------
00038 c Flag to select subprocess: prc = 'gg','qq' or 'qg'
00039 c
00040 character * 2 prc
00041 common/process/prc
00042 c
00043 c
00044 c scheme = 'DI' for deep inelastic, 'MS' for msbar scheme
00045 character * 2 schhad1,schhad2
00046 common/scheme/schhad1,schhad2
00047 c
00048 c
00049 c use newver='NEW' for vaxes, 'UNKNOWN' in other machines,
00050 character * 7 newver
00051 common/newver/newver
1.5.4