1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
c**************************************************************
c run.inc
c**************************************************************
c
c Scales
c
real*8 scale,scalefact,alpsfact
logical fixed_ren_scale,fixed_fac_scale,fixed_couplings,hmult
integer ickkw,nhmult,asrwgtflavor
common/to_scale/scale,scalefact,alpsfact,fixed_ren_scale,fixed_fac_scale,
$ fixed_couplings,ickkw,nhmult,hmult,asrwgtflavor
c
c Collider
c
integer lpp(2)
double precision ebeam(2), xbk(2),q2fact(2)
common/to_collider/ ebeam , xbk ,q2fact, lpp
c
c BW treatment
c
double precision bwcutoff
common/to_bwcutoff/ bwcutoff
c
c Sudakov grid file name
c
character*130 issgridfile
common/to_sgridfile/issgridfile
c
c kT/pT scheme for xqcut, clustering according to channel
c
integer ktscheme
logical chcluster,pdfwgt
common/to_cluster/ktscheme,chcluster,pdfwgt
|