~madteam/mg5amcnlo/series2.0

« back to all changes in this revision

Viewing changes to Template/NLO/MCatNLO/PYAnalyzer/py6an_HwU_pp_lplm.f

  • Committer: olivier Mattelaer
  • Date: 2016-05-12 11:00:18 UTC
  • mfrom: (262.1.150 2.3.4)
  • Revision ID: olivier.mattelaer@uclouvain.be-20160512110018-sevb79f0wm4g8mpp
pass to 2.4.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
48
48
      integer nwgt,max_weight,nwgt_analysis
49
49
      common/cnwgt/nwgt
50
50
      common/c_analysis/nwgt_analysis
51
 
      parameter (max_weight=maxscales*maxscales+maxpdfs+1)
52
 
      character*15 weights_info(max_weight)
 
51
      character*50 weights_info(max_weight_shower)
53
52
      common/cwgtsinfo/weights_info
54
53
c Initialize histograms
55
54
      call HwU_inithist(nwgt,weights_info)
137
136
      SAVE INOBOSON,INOLEPTON,INOLEPTONB
138
137
      integer nwgt_analysis,max_weight
139
138
      common/c_analysis/nwgt_analysis
140
 
      parameter (max_weight=maxscales*maxscales+maxpdfs+1)
 
139
      integer maxRWGT
 
140
      parameter (maxRWGT=100)
 
141
      double precision wgtxsecRWGT(maxRWGT)
 
142
      parameter (max_weight=maxscales*maxscales+maxpdfs+maxRWGT+1)
141
143
      double precision ww(max_weight),www(max_weight)
142
144
      common/cww/ww
143
145
      IF(IFAIL.EQ.1)RETURN
234
236
      etalb=getpseudorap(pplb(4),pplb(1),pplb(2),pplb(3))
235
237
c
236
238
      ptpair=ptv
237
 
      azi=getdelphi(ppl(1),pplb(1),ppl(2),pplb(2))
 
239
      azi=getdelphi(ppl(1),ppl(2),pplb(1),pplb(2))
238
240
      azinorm=(pi-azi)/pi
239
241
      xmll=xmv
240
242
      detallb=etal-etalb