From 2a4e8556a7236aa0fb11c90062c384ffcaf5e6b5 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Mon, 16 May 2022 10:05:03 +0200 Subject: [PATCH 01/15] Remove ttbar tau min cut --- nnpdf31_proc/NNPDF_TTB_14TEV_40_PHENO/launch.txt | 2 -- 1 file changed, 2 deletions(-) diff --git a/nnpdf31_proc/NNPDF_TTB_14TEV_40_PHENO/launch.txt b/nnpdf31_proc/NNPDF_TTB_14TEV_40_PHENO/launch.txt index 142c2b23..d9e3098c 100644 --- a/nnpdf31_proc/NNPDF_TTB_14TEV_40_PHENO/launch.txt +++ b/nnpdf31_proc/NNPDF_TTB_14TEV_40_PHENO/launch.txt @@ -16,8 +16,6 @@ set pdlabel lhapdf set lhaid @LHAPDF_ID@ set dynamical_scale_choice 10 set reweight_scale True -#user_defined_tau_min 340.0 -#enable_patch no_pole_cancellation_checks set req_acc_FO 0.0001 set pineappl True done From 4a0dc7567c00d1c247888585b2dcfba0276f790a Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Tue, 7 Jun 2022 15:48:05 +0200 Subject: [PATCH 02/15] Add runcards for CMS very-high invariant-mass plots --- .../CMS_DY_14TEV_MLL_5000_COSTH/analysis.f | 87 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_5000_COSTH/launch.txt | 25 ++++++ .../CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_5000_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ .../CMS_DY_14TEV_MLL_5000_YLL/analysis.f | 87 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_5000_YLL/launch.txt | 26 ++++++ .../CMS_DY_14TEV_MLL_5000_YLL/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_5000_YLL/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ 10 files changed, 361 insertions(+) create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f new file mode 100644 index 00000000..adb865f5 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f @@ -0,0 +1,87 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = sign((p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt new file mode 100644 index 00000000..624c39be --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt @@ -0,0 +1,25 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = 2.4 +set mll_sf = 5000.0 +set req_acc_FO 0.0005 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/analysis.f new file mode 100644 index 00000000..48675833 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/analysis.f @@ -0,0 +1,87 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',25, 0d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xyll, getabsy + external getabsy + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xyll=getabsy(ppv(0),ppv(3)) + + !if (xyll > 1.0d0) then + ! write (*,*) "error: event outside bin", xyll + ! stop 1 + !endif + + call HwU_fill(1,xyll,wgts) + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + function getabsy(en,pl) + implicit none + real*8 getabsy,en,pl,tmp +c + tmp=pl/en + if (abs(tmp) < 1d0) then + tmp=abs(atanh(tmp)) + else + print *, 'Attempt to compute atanh(x) with x > 1' + stop + endif + getabsy=tmp + return + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt new file mode 100644 index 00000000..19c1caf8 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt @@ -0,0 +1,26 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +#user_defined_cut set yll = 1.0 +set etal = 0.0 +set mll_sf = 5000.0 +set req_acc_FO 0.001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt new file mode 100644 index 00000000..2e1c47cb --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=yll +x1_label_tex=$y_{\ell\bar{\ell}}$ +x1_unit= +y_label=dsig/dyll +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}y_{\ell\bar{\ell}}}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc From ea22e2a662bc12b2e01b7208f12e2d9ce4a5ec18 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Tue, 7 Jun 2022 15:51:41 +0200 Subject: [PATCH 03/15] Change cuts and statistics --- nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt | 2 +- nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt | 7 +++---- 2 files changed, 4 insertions(+), 5 deletions(-) diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt index 624c39be..d1e311b5 100644 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt @@ -16,7 +16,7 @@ set pdlabel lhapdf set lhaid @LHAPDF_ID@ set dynamical_scale_choice 10 set reweight_scale True -set ptl = 0.0 +set ptl = 10.0 set etal = 2.4 set mll_sf = 5000.0 set req_acc_FO 0.0005 diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt index 19c1caf8..d1e311b5 100644 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt @@ -16,11 +16,10 @@ set pdlabel lhapdf set lhaid @LHAPDF_ID@ set dynamical_scale_choice 10 set reweight_scale True -set ptl = 0.0 -#user_defined_cut set yll = 1.0 -set etal = 0.0 +set ptl = 10.0 +set etal = 2.4 set mll_sf = 5000.0 -set req_acc_FO 0.001 +set req_acc_FO 0.0005 set pineappl True done quit From 54192b1ffe430836d20fd5faeac98a43804191a9 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Tue, 7 Jun 2022 16:09:57 +0200 Subject: [PATCH 04/15] Increase statistics --- nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt | 2 +- nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt index d1e311b5..5e341583 100644 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt @@ -19,7 +19,7 @@ set reweight_scale True set ptl = 10.0 set etal = 2.4 set mll_sf = 5000.0 -set req_acc_FO 0.0005 +set req_acc_FO 0.0001 set pineappl True done quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt index d1e311b5..5e341583 100644 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt @@ -19,7 +19,7 @@ set reweight_scale True set ptl = 10.0 set etal = 2.4 set mll_sf = 5000.0 -set req_acc_FO 0.0005 +set req_acc_FO 0.0001 set pineappl True done quit From 45b9fcc637e7699b5e6b4a11a530fe6532ea69d2 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Thu, 9 Jun 2022 13:30:15 +0200 Subject: [PATCH 05/15] Fix problem in the definition of the cosine --- nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f index adb865f5..2c5c2ecd 100644 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f @@ -78,7 +78,8 @@ function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + & (ptyl + ptyal) * (ptyl + ptyal) mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = sign((p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll,pzll) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) if (abs(getcostheta) > 1d0) then print *, 'Calculating cos with cos > 1' From 9b811065ea8cea91d4a7665e5666004a36f51f40 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Wed, 29 Jun 2022 15:40:28 +0200 Subject: [PATCH 06/15] Add slices for 200, 500, 1000 and 3000 GeV --- .../CMS_DY_14TEV_MLL_0200_COSTH/analysis.f | 88 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_0200_COSTH/launch.txt | 25 ++++++ .../CMS_DY_14TEV_MLL_0200_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_0200_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ .../CMS_DY_14TEV_MLL_0500_COSTH/analysis.f | 88 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_0500_COSTH/launch.txt | 25 ++++++ .../CMS_DY_14TEV_MLL_0500_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_0500_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ .../CMS_DY_14TEV_MLL_1000_COSTH/analysis.f | 88 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_1000_COSTH/launch.txt | 25 ++++++ .../CMS_DY_14TEV_MLL_1000_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_1000_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ .../CMS_DY_14TEV_MLL_3000_COSTH/analysis.f | 88 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_3000_COSTH/launch.txt | 25 ++++++ .../CMS_DY_14TEV_MLL_3000_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_3000_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ 20 files changed, 724 insertions(+) create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/analysis.f new file mode 100644 index 00000000..2c5c2ecd --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/analysis.f @@ -0,0 +1,88 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt new file mode 100644 index 00000000..933d7827 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt @@ -0,0 +1,25 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 10.0 +set etal = 2.4 +set mll_sf = 200.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/analysis.f new file mode 100644 index 00000000..2c5c2ecd --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/analysis.f @@ -0,0 +1,88 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt new file mode 100644 index 00000000..74e61b55 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt @@ -0,0 +1,25 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 10.0 +set etal = 2.4 +set mll_sf = 500.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/analysis.f new file mode 100644 index 00000000..2c5c2ecd --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/analysis.f @@ -0,0 +1,88 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt new file mode 100644 index 00000000..c058e6bc --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt @@ -0,0 +1,25 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 10.0 +set etal = 2.4 +set mll_sf = 1000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/analysis.f new file mode 100644 index 00000000..2c5c2ecd --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/analysis.f @@ -0,0 +1,88 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/launch.txt new file mode 100644 index 00000000..5fca57b5 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/launch.txt @@ -0,0 +1,25 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 10.0 +set etal = 2.4 +set mll_sf = 3000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc From c823581ba50ea2bc2cb0fd4bda3bda2f54d9e0a8 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Sat, 9 Jul 2022 07:41:02 +0200 Subject: [PATCH 07/15] Add LO slices --- .../analysis.f | 112 ++++++++++++++++++ .../launch.txt | 27 +++++ .../metadata.txt | 12 ++ .../output.txt | 7 ++ .../postrun.sh | 5 + .../set_scale_to_mll.patch | 52 ++++++++ .../analysis.f | 112 ++++++++++++++++++ .../launch.txt | 27 +++++ .../metadata.txt | 12 ++ .../output.txt | 7 ++ .../postrun.sh | 5 + .../set_scale_to_mll.patch | 52 ++++++++ .../analysis.f | 112 ++++++++++++++++++ .../launch.txt | 27 +++++ .../metadata.txt | 12 ++ .../output.txt | 7 ++ .../postrun.sh | 5 + .../set_scale_to_mll.patch | 52 ++++++++ .../analysis.f | 112 ++++++++++++++++++ .../launch.txt | 27 +++++ .../metadata.txt | 12 ++ .../output.txt | 7 ++ .../postrun.sh | 5 + .../set_scale_to_mll.patch | 52 ++++++++ .../analysis.f | 112 ++++++++++++++++++ .../launch.txt | 27 +++++ .../metadata.txt | 12 ++ .../output.txt | 7 ++ .../postrun.sh | 5 + .../set_scale_to_mll.patch | 52 ++++++++ .../analysis.f | 112 ++++++++++++++++++ .../launch.txt | 27 +++++ .../metadata.txt | 12 ++ .../output.txt | 7 ++ .../postrun.sh | 5 + .../set_scale_to_mll.patch | 52 ++++++++ .../analysis.f | 112 ++++++++++++++++++ .../launch.txt | 26 ++++ .../metadata.txt | 12 ++ .../output.txt | 7 ++ .../postrun.sh | 5 + .../set_scale_to_mll.patch | 52 ++++++++ 42 files changed, 1504 insertions(+) create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt create mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt create mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt create mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt create mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt create mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt create mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt create mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh create mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f new file mode 100644 index 00000000..d34eddac --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f @@ -0,0 +1,112 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'cos theta*',50, 0d0, 2d0) + call HwU_book(2,'cos theta*',50, 2d0, 4d0) + call HwU_book(3,'cos theta*',50, 4d0, 6d0) + call HwU_book(4,'cos theta*',50, 6d0, 8d0) + call HwU_book(5,'cos theta*',50, 8d0, 10d0) + call HwU_book(6,'cos theta*',50,10d0, 12d0) + call HwU_book(7,'cos theta*',50,12d0, 14d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xmll, xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + if (xmll < 200d0) then + print *, 'xmll too low', xmll + stop + else if (xmll < 500d0) then + call HwU_fill(1,xcos + 1d0,wgts) + else if (xmll < 1000d0) then + call HwU_fill(2,xcos + 3d0,wgts) + else if (xmll < 3000d0) then + call HwU_fill(3,xcos + 5d0,wgts) + else if (xmll < 5000d0) then + call HwU_fill(4,xcos + 7d0,wgts) + else if (xmll < 8000d0) then + call HwU_fill(5,xcos + 9d0,wgts) + else if (xmll < 10000d0) then + call HwU_fill(6,xcos + 11d0,wgts) + else + call HwU_fill(7,xcos + 13d0,wgts) + endif + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt new file mode 100644 index 00000000..6defae3c --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt @@ -0,0 +1,27 @@ +launch @OUTPUT@ +order = LO +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = -1.0 +set mll_sf = 200.0 +#user_defined_cut set mmllmax = 500.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt new file mode 100644 index 00000000..15b50537 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt @@ -0,0 +1,12 @@ +arxiv= +description= +hepdata= +x1_label=Mll +x1_label_tex=$M_{\ell\bar{\ell}}$ +x1_unit=GeV +x2_label=costh +x2_label_tex=$\cos \theta^*$ +x2_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh new file mode 100755 index 00000000..2d38d09a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh @@ -0,0 +1,5 @@ +#!/bin/bash + +pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 + +mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f new file mode 100644 index 00000000..d34eddac --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f @@ -0,0 +1,112 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'cos theta*',50, 0d0, 2d0) + call HwU_book(2,'cos theta*',50, 2d0, 4d0) + call HwU_book(3,'cos theta*',50, 4d0, 6d0) + call HwU_book(4,'cos theta*',50, 6d0, 8d0) + call HwU_book(5,'cos theta*',50, 8d0, 10d0) + call HwU_book(6,'cos theta*',50,10d0, 12d0) + call HwU_book(7,'cos theta*',50,12d0, 14d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xmll, xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + if (xmll < 200d0) then + print *, 'xmll too low', xmll + stop + else if (xmll < 500d0) then + call HwU_fill(1,xcos + 1d0,wgts) + else if (xmll < 1000d0) then + call HwU_fill(2,xcos + 3d0,wgts) + else if (xmll < 3000d0) then + call HwU_fill(3,xcos + 5d0,wgts) + else if (xmll < 5000d0) then + call HwU_fill(4,xcos + 7d0,wgts) + else if (xmll < 8000d0) then + call HwU_fill(5,xcos + 9d0,wgts) + else if (xmll < 10000d0) then + call HwU_fill(6,xcos + 11d0,wgts) + else + call HwU_fill(7,xcos + 13d0,wgts) + endif + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt new file mode 100644 index 00000000..bb45a815 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt @@ -0,0 +1,27 @@ +launch @OUTPUT@ +order = LO +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = -1.0 +set mll_sf = 500.0 +#user_defined_cut set mmllmax = 1000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt new file mode 100644 index 00000000..15b50537 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt @@ -0,0 +1,12 @@ +arxiv= +description= +hepdata= +x1_label=Mll +x1_label_tex=$M_{\ell\bar{\ell}}$ +x1_unit=GeV +x2_label=costh +x2_label_tex=$\cos \theta^*$ +x2_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh new file mode 100755 index 00000000..2d38d09a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh @@ -0,0 +1,5 @@ +#!/bin/bash + +pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 + +mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f new file mode 100644 index 00000000..d34eddac --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f @@ -0,0 +1,112 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'cos theta*',50, 0d0, 2d0) + call HwU_book(2,'cos theta*',50, 2d0, 4d0) + call HwU_book(3,'cos theta*',50, 4d0, 6d0) + call HwU_book(4,'cos theta*',50, 6d0, 8d0) + call HwU_book(5,'cos theta*',50, 8d0, 10d0) + call HwU_book(6,'cos theta*',50,10d0, 12d0) + call HwU_book(7,'cos theta*',50,12d0, 14d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xmll, xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + if (xmll < 200d0) then + print *, 'xmll too low', xmll + stop + else if (xmll < 500d0) then + call HwU_fill(1,xcos + 1d0,wgts) + else if (xmll < 1000d0) then + call HwU_fill(2,xcos + 3d0,wgts) + else if (xmll < 3000d0) then + call HwU_fill(3,xcos + 5d0,wgts) + else if (xmll < 5000d0) then + call HwU_fill(4,xcos + 7d0,wgts) + else if (xmll < 8000d0) then + call HwU_fill(5,xcos + 9d0,wgts) + else if (xmll < 10000d0) then + call HwU_fill(6,xcos + 11d0,wgts) + else + call HwU_fill(7,xcos + 13d0,wgts) + endif + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt new file mode 100644 index 00000000..3fdd7e90 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt @@ -0,0 +1,27 @@ +launch @OUTPUT@ +order = LO +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = -1.0 +set mll_sf = 1000.0 +#user_defined_cut set mmllmax = 3000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt new file mode 100644 index 00000000..15b50537 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt @@ -0,0 +1,12 @@ +arxiv= +description= +hepdata= +x1_label=Mll +x1_label_tex=$M_{\ell\bar{\ell}}$ +x1_unit=GeV +x2_label=costh +x2_label_tex=$\cos \theta^*$ +x2_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh new file mode 100755 index 00000000..2d38d09a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh @@ -0,0 +1,5 @@ +#!/bin/bash + +pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 + +mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f new file mode 100644 index 00000000..d34eddac --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f @@ -0,0 +1,112 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'cos theta*',50, 0d0, 2d0) + call HwU_book(2,'cos theta*',50, 2d0, 4d0) + call HwU_book(3,'cos theta*',50, 4d0, 6d0) + call HwU_book(4,'cos theta*',50, 6d0, 8d0) + call HwU_book(5,'cos theta*',50, 8d0, 10d0) + call HwU_book(6,'cos theta*',50,10d0, 12d0) + call HwU_book(7,'cos theta*',50,12d0, 14d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xmll, xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + if (xmll < 200d0) then + print *, 'xmll too low', xmll + stop + else if (xmll < 500d0) then + call HwU_fill(1,xcos + 1d0,wgts) + else if (xmll < 1000d0) then + call HwU_fill(2,xcos + 3d0,wgts) + else if (xmll < 3000d0) then + call HwU_fill(3,xcos + 5d0,wgts) + else if (xmll < 5000d0) then + call HwU_fill(4,xcos + 7d0,wgts) + else if (xmll < 8000d0) then + call HwU_fill(5,xcos + 9d0,wgts) + else if (xmll < 10000d0) then + call HwU_fill(6,xcos + 11d0,wgts) + else + call HwU_fill(7,xcos + 13d0,wgts) + endif + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt new file mode 100644 index 00000000..5f37922b --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt @@ -0,0 +1,27 @@ +launch @OUTPUT@ +order = LO +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = -1.0 +set mll_sf = 3000.0 +#user_defined_cut set mmllmax = 5000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt new file mode 100644 index 00000000..15b50537 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt @@ -0,0 +1,12 @@ +arxiv= +description= +hepdata= +x1_label=Mll +x1_label_tex=$M_{\ell\bar{\ell}}$ +x1_unit=GeV +x2_label=costh +x2_label_tex=$\cos \theta^*$ +x2_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh new file mode 100755 index 00000000..2d38d09a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh @@ -0,0 +1,5 @@ +#!/bin/bash + +pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 + +mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f new file mode 100644 index 00000000..d34eddac --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f @@ -0,0 +1,112 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'cos theta*',50, 0d0, 2d0) + call HwU_book(2,'cos theta*',50, 2d0, 4d0) + call HwU_book(3,'cos theta*',50, 4d0, 6d0) + call HwU_book(4,'cos theta*',50, 6d0, 8d0) + call HwU_book(5,'cos theta*',50, 8d0, 10d0) + call HwU_book(6,'cos theta*',50,10d0, 12d0) + call HwU_book(7,'cos theta*',50,12d0, 14d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xmll, xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + if (xmll < 200d0) then + print *, 'xmll too low', xmll + stop + else if (xmll < 500d0) then + call HwU_fill(1,xcos + 1d0,wgts) + else if (xmll < 1000d0) then + call HwU_fill(2,xcos + 3d0,wgts) + else if (xmll < 3000d0) then + call HwU_fill(3,xcos + 5d0,wgts) + else if (xmll < 5000d0) then + call HwU_fill(4,xcos + 7d0,wgts) + else if (xmll < 8000d0) then + call HwU_fill(5,xcos + 9d0,wgts) + else if (xmll < 10000d0) then + call HwU_fill(6,xcos + 11d0,wgts) + else + call HwU_fill(7,xcos + 13d0,wgts) + endif + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt new file mode 100644 index 00000000..a1b5c674 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt @@ -0,0 +1,27 @@ +launch @OUTPUT@ +order = LO +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = -1.0 +set mll_sf = 5000.0 +#user_defined_cut set mmllmax = 8000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt new file mode 100644 index 00000000..15b50537 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt @@ -0,0 +1,12 @@ +arxiv= +description= +hepdata= +x1_label=Mll +x1_label_tex=$M_{\ell\bar{\ell}}$ +x1_unit=GeV +x2_label=costh +x2_label_tex=$\cos \theta^*$ +x2_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh new file mode 100755 index 00000000..2d38d09a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh @@ -0,0 +1,5 @@ +#!/bin/bash + +pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 + +mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f new file mode 100644 index 00000000..d34eddac --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f @@ -0,0 +1,112 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'cos theta*',50, 0d0, 2d0) + call HwU_book(2,'cos theta*',50, 2d0, 4d0) + call HwU_book(3,'cos theta*',50, 4d0, 6d0) + call HwU_book(4,'cos theta*',50, 6d0, 8d0) + call HwU_book(5,'cos theta*',50, 8d0, 10d0) + call HwU_book(6,'cos theta*',50,10d0, 12d0) + call HwU_book(7,'cos theta*',50,12d0, 14d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xmll, xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + if (xmll < 200d0) then + print *, 'xmll too low', xmll + stop + else if (xmll < 500d0) then + call HwU_fill(1,xcos + 1d0,wgts) + else if (xmll < 1000d0) then + call HwU_fill(2,xcos + 3d0,wgts) + else if (xmll < 3000d0) then + call HwU_fill(3,xcos + 5d0,wgts) + else if (xmll < 5000d0) then + call HwU_fill(4,xcos + 7d0,wgts) + else if (xmll < 8000d0) then + call HwU_fill(5,xcos + 9d0,wgts) + else if (xmll < 10000d0) then + call HwU_fill(6,xcos + 11d0,wgts) + else + call HwU_fill(7,xcos + 13d0,wgts) + endif + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt new file mode 100644 index 00000000..9829ecd7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt @@ -0,0 +1,27 @@ +launch @OUTPUT@ +order = LO +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = -1.0 +set mll_sf = 8000.0 +#user_defined_cut set mmllmax = 10000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt new file mode 100644 index 00000000..15b50537 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt @@ -0,0 +1,12 @@ +arxiv= +description= +hepdata= +x1_label=Mll +x1_label_tex=$M_{\ell\bar{\ell}}$ +x1_unit=GeV +x2_label=costh +x2_label_tex=$\cos \theta^*$ +x2_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh new file mode 100755 index 00000000..2d38d09a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh @@ -0,0 +1,5 @@ +#!/bin/bash + +pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 + +mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f new file mode 100644 index 00000000..d34eddac --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f @@ -0,0 +1,112 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'cos theta*',50, 0d0, 2d0) + call HwU_book(2,'cos theta*',50, 2d0, 4d0) + call HwU_book(3,'cos theta*',50, 4d0, 6d0) + call HwU_book(4,'cos theta*',50, 6d0, 8d0) + call HwU_book(5,'cos theta*',50, 8d0, 10d0) + call HwU_book(6,'cos theta*',50,10d0, 12d0) + call HwU_book(7,'cos theta*',50,12d0, 14d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xmll, xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + if (xmll < 200d0) then + print *, 'xmll too low', xmll + stop + else if (xmll < 500d0) then + call HwU_fill(1,xcos + 1d0,wgts) + else if (xmll < 1000d0) then + call HwU_fill(2,xcos + 3d0,wgts) + else if (xmll < 3000d0) then + call HwU_fill(3,xcos + 5d0,wgts) + else if (xmll < 5000d0) then + call HwU_fill(4,xcos + 7d0,wgts) + else if (xmll < 8000d0) then + call HwU_fill(5,xcos + 9d0,wgts) + else if (xmll < 10000d0) then + call HwU_fill(6,xcos + 11d0,wgts) + else + call HwU_fill(7,xcos + 13d0,wgts) + endif + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt new file mode 100644 index 00000000..eb75652c --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt @@ -0,0 +1,26 @@ +launch @OUTPUT@ +order = LO +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 0.0 +set etal = -1.0 +set mll_sf = 10000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt new file mode 100644 index 00000000..15b50537 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt @@ -0,0 +1,12 @@ +arxiv= +description= +hepdata= +x1_label=Mll +x1_label_tex=$M_{\ell\bar{\ell}}$ +x1_unit=GeV +x2_label=costh +x2_label_tex=$\cos \theta^*$ +x2_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh new file mode 100755 index 00000000..2d38d09a --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh @@ -0,0 +1,5 @@ +#!/bin/bash + +pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 + +mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc From 13f6eec7ac1aead16053578d2b3973bfe33a7e64 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Tue, 12 Jul 2022 17:07:11 +0200 Subject: [PATCH 08/15] Fix metadata --- nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt index 2e1c47cb..6bd2c102 100644 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt @@ -2,8 +2,8 @@ arxiv= description= hepdata= x1_label=yll -x1_label_tex=$y_{\ell\bar{\ell}}$ +x1_label_tex=$|y_{\ell\bar{\ell}}|$ x1_unit= y_label=dsig/dyll -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}y_{\ell\bar{\ell}}}$ +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}|y_{\ell\bar{\ell}}|}$ y_unit=pb From 4b125b424881245c5d9b1d3e77745706c14d605a Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Tue, 16 Aug 2022 11:14:11 +0200 Subject: [PATCH 09/15] Add slice with invariant masses around Z peak --- .../CMS_DY_14TEV_MLL_0060_COSTH/analysis.f | 88 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_0060_COSTH/launch.txt | 26 ++++++ .../CMS_DY_14TEV_MLL_0060_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_0060_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ 5 files changed, 182 insertions(+) create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/analysis.f new file mode 100644 index 00000000..2c5c2ecd --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/analysis.f @@ -0,0 +1,88 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/launch.txt new file mode 100644 index 00000000..959050e4 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/launch.txt @@ -0,0 +1,26 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 10.0 +set etal = 2.4 +set mll_sf = 60.0 +#user_defined_cut set mmllmax = 120.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc From 7b5180dac34ccfcad118fe830c5765957ada34e3 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Fri, 19 Aug 2022 16:29:09 +0200 Subject: [PATCH 10/15] Add setup with Mll > 6 TeV --- .../CMS_DY_14TEV_MLL_6000_COSTH/analysis.f | 88 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_6000_COSTH/launch.txt | 25 ++++++ .../CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_6000_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ 5 files changed, 181 insertions(+) create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f new file mode 100644 index 00000000..2c5c2ecd --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f @@ -0,0 +1,88 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/launch.txt new file mode 100644 index 00000000..4f84828a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/launch.txt @@ -0,0 +1,25 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 10.0 +set etal = 2.4 +set mll_sf = 6000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc From ffad033ff1b16114420b3fd5e40b03554494e8cd Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Mon, 22 Aug 2022 15:14:01 +0200 Subject: [PATCH 11/15] Add setup with Mll > 4 GeV --- .../CMS_DY_14TEV_MLL_4000_COSTH/analysis.f | 88 +++++++++++++++++++ .../CMS_DY_14TEV_MLL_4000_COSTH/launch.txt | 25 ++++++ .../CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt | 9 ++ .../CMS_DY_14TEV_MLL_4000_COSTH/output.txt | 7 ++ .../set_scale_to_mll.patch | 52 +++++++++++ 5 files changed, 181 insertions(+) create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/launch.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/output.txt create mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f new file mode 100644 index 00000000..2c5c2ecd --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f @@ -0,0 +1,88 @@ +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_begin(nwgt,weights_info) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + integer nwgt + character*(*) weights_info(*) + + call HwU_inithist(nwgt,weights_info) + call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) + + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_end(dummy) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + double precision dummy + call HwU_write_file + return + end + +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) +cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + + implicit none + include 'nexternal.inc' + include 'cuts.inc' + integer istatus(nexternal) + integer iPDG(nexternal) + integer ibody + integer i + integer j + double precision p(0:4,nexternal) + double precision wgts(*) + double precision ppl(0:3), pplb(0:3), ppv(0:3) + logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) + double precision xcos, getcostheta + external getcostheta + + double precision p_reco(0:4,nexternal) + integer iPDG_reco(nexternal) + + + + is_nextph_iso(:) = .false. + call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, + $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, + $ is_nextph_iso_reco) + + do j = nincoming+1, nexternal + if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) + if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) + enddo + do i=0,3 + ppv(i)=ppl(i)+pplb(i) + enddo + + xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), + & pplb(2),pplb(3)) + + call HwU_fill(1,xcos,wgts) + end + + function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) + implicit none + real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal + real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll +c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 + p1p = enl + pzl + p1m = enl - pzl + p2p = enal + pzal + p2m = enal - pzal + pzll = pzl + pzal + pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + + & (ptyl + ptyal) * (ptyl + ptyal) + mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) + getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* + & sign(1d0,pzll) + + if (abs(getcostheta) > 1d0) then + print *, 'Calculating cos with cos > 1' + stop + endif + end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/launch.txt new file mode 100644 index 00000000..eae149c9 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/launch.txt @@ -0,0 +1,25 @@ +launch @OUTPUT@ +fixed_order = ON +set maxjetflavor 5 +set gf @GF@ +set mh @MH@ +set mt @MT@ +set mw @MW@ +set mz @MZ@ +set wh @WH@ +set wt @WT@ +set ww @WW@ +set wz @WZ@ +set ebeam1 7000 +set ebeam2 7000 +set pdlabel lhapdf +set lhaid @LHAPDF_ID@ +set dynamical_scale_choice 10 +set reweight_scale True +set ptl = 10.0 +set etal = 2.4 +set mll_sf = 4000.0 +set req_acc_FO 0.0001 +set pineappl True +done +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt new file mode 100644 index 00000000..8a1ddd7d --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt @@ -0,0 +1,9 @@ +arxiv= +description= +hepdata= +x1_label=costh +x1_label_tex=$\cos \theta^*$ +x1_unit= +y_label=dsig/dcosth +y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ +y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/output.txt new file mode 100644 index 00000000..a64cd92a --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/output.txt @@ -0,0 +1,7 @@ +set complex_mass_scheme True +import model loop_qcd_qed_sm_Gmu +define p = p b b~ +define j = p +generate p p > mu+ mu- [QCD] +output @OUTPUT@ +quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/set_scale_to_mll.patch new file mode 100644 index 00000000..10c218d7 --- /dev/null +++ b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/set_scale_to_mll.patch @@ -0,0 +1,52 @@ +--- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 ++++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 +@@ -527,6 +527,18 @@ + integer i,j + character*80 temp_scale_id + common/ctemp_scale_id/temp_scale_id ++ integer iPDG_reco(nexternal) ++ double precision ppl(0:3), pplb(0:3), ppv(0:3) ++ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) ++ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) ++c les houches accord stuff to identify particles ++c ++ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), ++ & icolup(2,nexternal,maxflow),niprocs ++ common /c_leshouche_inc/idup,mothup,icolup,niprocs ++c Masses of external particles ++ double precision pmass(nexternal) ++ common/to_mass/pmass + c + tmp=0 + if(ickkw.eq.-1)then +@@ -568,10 +579,26 @@ + cc dynamical_scale_choice = 10 cc + cc in the run_card (run_card.dat) cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +- write(*,*) "User-defined scale not set" +- stop 1 +- temp_scale_id='User-defined dynamical scale' ! use a meaningful string +- tmp = 0d0 ++ temp_scale_id='FOOBAR' ! use a meaningful string ++ tmp = -1d0 ++ do i=1,nexternal ++ p_in(0:3,i) = pp(0:3,i) ++ p_in(4,i) = pmass(i) ++ enddo ++ is_nextph_iso(:) = .false. ++ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, ++ $ p_in, idup(1,1), is_nextph_iso, p_reco, ++ $ iPDG_reco, is_nextph_iso_reco) ++ ++ do j = nincoming+1, nexternal ++ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) ++ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) ++ enddo ++ do i=0,3 ++ ppv(i)=ppl(i)+pplb(i) ++ enddo ++ ++ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc + cc USER-DEFINED SCALE: END OF USER CODE cc + ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc From 2fc7601ce24599f24b043417022c7e6e684289c0 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Sat, 27 Aug 2022 10:07:35 +0200 Subject: [PATCH 12/15] Remove superfluous LO calculations --- .../analysis.f | 112 ------------------ .../launch.txt | 27 ----- .../metadata.txt | 12 -- .../output.txt | 7 -- .../postrun.sh | 5 - .../set_scale_to_mll.patch | 52 -------- .../analysis.f | 112 ------------------ .../launch.txt | 27 ----- .../metadata.txt | 12 -- .../output.txt | 7 -- .../postrun.sh | 5 - .../set_scale_to_mll.patch | 52 -------- .../analysis.f | 112 ------------------ .../launch.txt | 27 ----- .../metadata.txt | 12 -- .../output.txt | 7 -- .../postrun.sh | 5 - .../set_scale_to_mll.patch | 52 -------- .../analysis.f | 112 ------------------ .../launch.txt | 27 ----- .../metadata.txt | 12 -- .../output.txt | 7 -- .../postrun.sh | 5 - .../set_scale_to_mll.patch | 52 -------- .../analysis.f | 112 ------------------ .../launch.txt | 27 ----- .../metadata.txt | 12 -- .../output.txt | 7 -- .../postrun.sh | 5 - .../set_scale_to_mll.patch | 52 -------- .../analysis.f | 112 ------------------ .../launch.txt | 27 ----- .../metadata.txt | 12 -- .../output.txt | 7 -- .../postrun.sh | 5 - .../set_scale_to_mll.patch | 52 -------- .../analysis.f | 112 ------------------ .../launch.txt | 26 ---- .../metadata.txt | 12 -- .../output.txt | 7 -- .../postrun.sh | 5 - .../set_scale_to_mll.patch | 52 -------- 42 files changed, 1504 deletions(-) delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt delete mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt delete mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt delete mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt delete mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt delete mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt delete mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt delete mode 100755 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh delete mode 100644 nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f deleted file mode 100644 index d34eddac..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/analysis.f +++ /dev/null @@ -1,112 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'cos theta*',50, 0d0, 2d0) - call HwU_book(2,'cos theta*',50, 2d0, 4d0) - call HwU_book(3,'cos theta*',50, 4d0, 6d0) - call HwU_book(4,'cos theta*',50, 6d0, 8d0) - call HwU_book(5,'cos theta*',50, 8d0, 10d0) - call HwU_book(6,'cos theta*',50,10d0, 12d0) - call HwU_book(7,'cos theta*',50,12d0, 14d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xmll, xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - if (xmll < 200d0) then - print *, 'xmll too low', xmll - stop - else if (xmll < 500d0) then - call HwU_fill(1,xcos + 1d0,wgts) - else if (xmll < 1000d0) then - call HwU_fill(2,xcos + 3d0,wgts) - else if (xmll < 3000d0) then - call HwU_fill(3,xcos + 5d0,wgts) - else if (xmll < 5000d0) then - call HwU_fill(4,xcos + 7d0,wgts) - else if (xmll < 8000d0) then - call HwU_fill(5,xcos + 9d0,wgts) - else if (xmll < 10000d0) then - call HwU_fill(6,xcos + 11d0,wgts) - else - call HwU_fill(7,xcos + 13d0,wgts) - endif - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt deleted file mode 100644 index 6defae3c..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/launch.txt +++ /dev/null @@ -1,27 +0,0 @@ -launch @OUTPUT@ -order = LO -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 0.0 -set etal = -1.0 -set mll_sf = 200.0 -#user_defined_cut set mmllmax = 500.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt deleted file mode 100644 index 15b50537..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/metadata.txt +++ /dev/null @@ -1,12 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=Mll -x1_label_tex=$M_{\ell\bar{\ell}}$ -x1_unit=GeV -x2_label=costh -x2_label_tex=$\cos \theta^*$ -x2_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh deleted file mode 100755 index 2d38d09a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/postrun.sh +++ /dev/null @@ -1,5 +0,0 @@ -#!/bin/bash - -pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 - -mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00200_00500/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f deleted file mode 100644 index d34eddac..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/analysis.f +++ /dev/null @@ -1,112 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'cos theta*',50, 0d0, 2d0) - call HwU_book(2,'cos theta*',50, 2d0, 4d0) - call HwU_book(3,'cos theta*',50, 4d0, 6d0) - call HwU_book(4,'cos theta*',50, 6d0, 8d0) - call HwU_book(5,'cos theta*',50, 8d0, 10d0) - call HwU_book(6,'cos theta*',50,10d0, 12d0) - call HwU_book(7,'cos theta*',50,12d0, 14d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xmll, xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - if (xmll < 200d0) then - print *, 'xmll too low', xmll - stop - else if (xmll < 500d0) then - call HwU_fill(1,xcos + 1d0,wgts) - else if (xmll < 1000d0) then - call HwU_fill(2,xcos + 3d0,wgts) - else if (xmll < 3000d0) then - call HwU_fill(3,xcos + 5d0,wgts) - else if (xmll < 5000d0) then - call HwU_fill(4,xcos + 7d0,wgts) - else if (xmll < 8000d0) then - call HwU_fill(5,xcos + 9d0,wgts) - else if (xmll < 10000d0) then - call HwU_fill(6,xcos + 11d0,wgts) - else - call HwU_fill(7,xcos + 13d0,wgts) - endif - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt deleted file mode 100644 index bb45a815..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/launch.txt +++ /dev/null @@ -1,27 +0,0 @@ -launch @OUTPUT@ -order = LO -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 0.0 -set etal = -1.0 -set mll_sf = 500.0 -#user_defined_cut set mmllmax = 1000.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt deleted file mode 100644 index 15b50537..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/metadata.txt +++ /dev/null @@ -1,12 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=Mll -x1_label_tex=$M_{\ell\bar{\ell}}$ -x1_unit=GeV -x2_label=costh -x2_label_tex=$\cos \theta^*$ -x2_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh deleted file mode 100755 index 2d38d09a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/postrun.sh +++ /dev/null @@ -1,5 +0,0 @@ -#!/bin/bash - -pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 - -mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_00500_01000/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f deleted file mode 100644 index d34eddac..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/analysis.f +++ /dev/null @@ -1,112 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'cos theta*',50, 0d0, 2d0) - call HwU_book(2,'cos theta*',50, 2d0, 4d0) - call HwU_book(3,'cos theta*',50, 4d0, 6d0) - call HwU_book(4,'cos theta*',50, 6d0, 8d0) - call HwU_book(5,'cos theta*',50, 8d0, 10d0) - call HwU_book(6,'cos theta*',50,10d0, 12d0) - call HwU_book(7,'cos theta*',50,12d0, 14d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xmll, xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - if (xmll < 200d0) then - print *, 'xmll too low', xmll - stop - else if (xmll < 500d0) then - call HwU_fill(1,xcos + 1d0,wgts) - else if (xmll < 1000d0) then - call HwU_fill(2,xcos + 3d0,wgts) - else if (xmll < 3000d0) then - call HwU_fill(3,xcos + 5d0,wgts) - else if (xmll < 5000d0) then - call HwU_fill(4,xcos + 7d0,wgts) - else if (xmll < 8000d0) then - call HwU_fill(5,xcos + 9d0,wgts) - else if (xmll < 10000d0) then - call HwU_fill(6,xcos + 11d0,wgts) - else - call HwU_fill(7,xcos + 13d0,wgts) - endif - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt deleted file mode 100644 index 3fdd7e90..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/launch.txt +++ /dev/null @@ -1,27 +0,0 @@ -launch @OUTPUT@ -order = LO -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 0.0 -set etal = -1.0 -set mll_sf = 1000.0 -#user_defined_cut set mmllmax = 3000.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt deleted file mode 100644 index 15b50537..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/metadata.txt +++ /dev/null @@ -1,12 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=Mll -x1_label_tex=$M_{\ell\bar{\ell}}$ -x1_unit=GeV -x2_label=costh -x2_label_tex=$\cos \theta^*$ -x2_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh deleted file mode 100755 index 2d38d09a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/postrun.sh +++ /dev/null @@ -1,5 +0,0 @@ -#!/bin/bash - -pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 - -mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_01000_03000/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f deleted file mode 100644 index d34eddac..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/analysis.f +++ /dev/null @@ -1,112 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'cos theta*',50, 0d0, 2d0) - call HwU_book(2,'cos theta*',50, 2d0, 4d0) - call HwU_book(3,'cos theta*',50, 4d0, 6d0) - call HwU_book(4,'cos theta*',50, 6d0, 8d0) - call HwU_book(5,'cos theta*',50, 8d0, 10d0) - call HwU_book(6,'cos theta*',50,10d0, 12d0) - call HwU_book(7,'cos theta*',50,12d0, 14d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xmll, xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - if (xmll < 200d0) then - print *, 'xmll too low', xmll - stop - else if (xmll < 500d0) then - call HwU_fill(1,xcos + 1d0,wgts) - else if (xmll < 1000d0) then - call HwU_fill(2,xcos + 3d0,wgts) - else if (xmll < 3000d0) then - call HwU_fill(3,xcos + 5d0,wgts) - else if (xmll < 5000d0) then - call HwU_fill(4,xcos + 7d0,wgts) - else if (xmll < 8000d0) then - call HwU_fill(5,xcos + 9d0,wgts) - else if (xmll < 10000d0) then - call HwU_fill(6,xcos + 11d0,wgts) - else - call HwU_fill(7,xcos + 13d0,wgts) - endif - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt deleted file mode 100644 index 5f37922b..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/launch.txt +++ /dev/null @@ -1,27 +0,0 @@ -launch @OUTPUT@ -order = LO -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 0.0 -set etal = -1.0 -set mll_sf = 3000.0 -#user_defined_cut set mmllmax = 5000.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt deleted file mode 100644 index 15b50537..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/metadata.txt +++ /dev/null @@ -1,12 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=Mll -x1_label_tex=$M_{\ell\bar{\ell}}$ -x1_unit=GeV -x2_label=costh -x2_label_tex=$\cos \theta^*$ -x2_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh deleted file mode 100755 index 2d38d09a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/postrun.sh +++ /dev/null @@ -1,5 +0,0 @@ -#!/bin/bash - -pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 - -mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_03000_05000/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f deleted file mode 100644 index d34eddac..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/analysis.f +++ /dev/null @@ -1,112 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'cos theta*',50, 0d0, 2d0) - call HwU_book(2,'cos theta*',50, 2d0, 4d0) - call HwU_book(3,'cos theta*',50, 4d0, 6d0) - call HwU_book(4,'cos theta*',50, 6d0, 8d0) - call HwU_book(5,'cos theta*',50, 8d0, 10d0) - call HwU_book(6,'cos theta*',50,10d0, 12d0) - call HwU_book(7,'cos theta*',50,12d0, 14d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xmll, xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - if (xmll < 200d0) then - print *, 'xmll too low', xmll - stop - else if (xmll < 500d0) then - call HwU_fill(1,xcos + 1d0,wgts) - else if (xmll < 1000d0) then - call HwU_fill(2,xcos + 3d0,wgts) - else if (xmll < 3000d0) then - call HwU_fill(3,xcos + 5d0,wgts) - else if (xmll < 5000d0) then - call HwU_fill(4,xcos + 7d0,wgts) - else if (xmll < 8000d0) then - call HwU_fill(5,xcos + 9d0,wgts) - else if (xmll < 10000d0) then - call HwU_fill(6,xcos + 11d0,wgts) - else - call HwU_fill(7,xcos + 13d0,wgts) - endif - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt deleted file mode 100644 index a1b5c674..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/launch.txt +++ /dev/null @@ -1,27 +0,0 @@ -launch @OUTPUT@ -order = LO -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 0.0 -set etal = -1.0 -set mll_sf = 5000.0 -#user_defined_cut set mmllmax = 8000.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt deleted file mode 100644 index 15b50537..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/metadata.txt +++ /dev/null @@ -1,12 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=Mll -x1_label_tex=$M_{\ell\bar{\ell}}$ -x1_unit=GeV -x2_label=costh -x2_label_tex=$\cos \theta^*$ -x2_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh deleted file mode 100755 index 2d38d09a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/postrun.sh +++ /dev/null @@ -1,5 +0,0 @@ -#!/bin/bash - -pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 - -mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_05000_08000/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f deleted file mode 100644 index d34eddac..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/analysis.f +++ /dev/null @@ -1,112 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'cos theta*',50, 0d0, 2d0) - call HwU_book(2,'cos theta*',50, 2d0, 4d0) - call HwU_book(3,'cos theta*',50, 4d0, 6d0) - call HwU_book(4,'cos theta*',50, 6d0, 8d0) - call HwU_book(5,'cos theta*',50, 8d0, 10d0) - call HwU_book(6,'cos theta*',50,10d0, 12d0) - call HwU_book(7,'cos theta*',50,12d0, 14d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xmll, xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - if (xmll < 200d0) then - print *, 'xmll too low', xmll - stop - else if (xmll < 500d0) then - call HwU_fill(1,xcos + 1d0,wgts) - else if (xmll < 1000d0) then - call HwU_fill(2,xcos + 3d0,wgts) - else if (xmll < 3000d0) then - call HwU_fill(3,xcos + 5d0,wgts) - else if (xmll < 5000d0) then - call HwU_fill(4,xcos + 7d0,wgts) - else if (xmll < 8000d0) then - call HwU_fill(5,xcos + 9d0,wgts) - else if (xmll < 10000d0) then - call HwU_fill(6,xcos + 11d0,wgts) - else - call HwU_fill(7,xcos + 13d0,wgts) - endif - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt deleted file mode 100644 index 9829ecd7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/launch.txt +++ /dev/null @@ -1,27 +0,0 @@ -launch @OUTPUT@ -order = LO -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 0.0 -set etal = -1.0 -set mll_sf = 8000.0 -#user_defined_cut set mmllmax = 10000.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt deleted file mode 100644 index 15b50537..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/metadata.txt +++ /dev/null @@ -1,12 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=Mll -x1_label_tex=$M_{\ell\bar{\ell}}$ -x1_unit=GeV -x2_label=costh -x2_label_tex=$\cos \theta^*$ -x2_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh deleted file mode 100755 index 2d38d09a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/postrun.sh +++ /dev/null @@ -1,5 +0,0 @@ -#!/bin/bash - -pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 - -mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_08000_10000/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f deleted file mode 100644 index d34eddac..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/analysis.f +++ /dev/null @@ -1,112 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'cos theta*',50, 0d0, 2d0) - call HwU_book(2,'cos theta*',50, 2d0, 4d0) - call HwU_book(3,'cos theta*',50, 4d0, 6d0) - call HwU_book(4,'cos theta*',50, 6d0, 8d0) - call HwU_book(5,'cos theta*',50, 8d0, 10d0) - call HwU_book(6,'cos theta*',50,10d0, 12d0) - call HwU_book(7,'cos theta*',50,12d0, 14d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xmll, xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xmll=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - if (xmll < 200d0) then - print *, 'xmll too low', xmll - stop - else if (xmll < 500d0) then - call HwU_fill(1,xcos + 1d0,wgts) - else if (xmll < 1000d0) then - call HwU_fill(2,xcos + 3d0,wgts) - else if (xmll < 3000d0) then - call HwU_fill(3,xcos + 5d0,wgts) - else if (xmll < 5000d0) then - call HwU_fill(4,xcos + 7d0,wgts) - else if (xmll < 8000d0) then - call HwU_fill(5,xcos + 9d0,wgts) - else if (xmll < 10000d0) then - call HwU_fill(6,xcos + 11d0,wgts) - else - call HwU_fill(7,xcos + 13d0,wgts) - endif - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt deleted file mode 100644 index eb75652c..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/launch.txt +++ /dev/null @@ -1,26 +0,0 @@ -launch @OUTPUT@ -order = LO -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 0.0 -set etal = -1.0 -set mll_sf = 10000.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt deleted file mode 100644 index 15b50537..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/metadata.txt +++ /dev/null @@ -1,12 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=Mll -x1_label_tex=$M_{\ell\bar{\ell}}$ -x1_unit=GeV -x2_label=costh -x2_label_tex=$\cos \theta^*$ -x2_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh deleted file mode 100755 index 2d38d09a..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/postrun.sh +++ /dev/null @@ -1,5 +0,0 @@ -#!/bin/bash - -pineappl remap "${GRID}" "${GRID}".tmp '200,500,1000,3000,5000,8000,10000,14000;-1,-0.96,-0.92,-0.88,-0.84,-0.8,-0.76,-0.72,-0.68,-0.64,-0.6,-0.56,-0.52,-0.48,-0.44,-0.4,-0.36,-0.32,-0.28,-0.24,-0.2,-0.16,-0.12,-0.08,-0.04,0,0.04,0.08,0.12,0.16,0.2,0.24,0.28,0.32,0.36,0.4,0.44,0.48,0.52,0.56,0.6,0.64,0.68,0.72,0.76,0.8,0.84,0.88,0.92,0.96,1' --ignore_obs_norm 1 - -mv "${GRID}".tmp "${GRID}" diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_10000_14000/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc From e108c0a99679430ccec037d6b5f7eba220249f36 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Sat, 27 Aug 2022 10:12:43 +0200 Subject: [PATCH 13/15] Rename and delete runs --- .../CMS_DY_14TEV_MLL_0200_COSTH/launch.txt | 25 ------ .../CMS_DY_14TEV_MLL_0500_COSTH/launch.txt | 25 ------ .../CMS_DY_14TEV_MLL_1000_COSTH/launch.txt | 25 ------ .../CMS_DY_14TEV_MLL_4000_COSTH/analysis.f | 88 ------------------- .../CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt | 9 -- .../CMS_DY_14TEV_MLL_5000_COSTH/analysis.f | 88 ------------------- .../CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt | 9 -- .../CMS_DY_14TEV_MLL_5000_COSTH/output.txt | 7 -- .../set_scale_to_mll.patch | 52 ----------- .../CMS_DY_14TEV_MLL_5000_YLL/output.txt | 7 -- .../set_scale_to_mll.patch | 52 ----------- .../CMS_DY_14TEV_MLL_6000_COSTH/analysis.f | 88 ------------------- .../CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt | 9 -- .../CMS_DY_14TEV_MLL_6000_COSTH/output.txt | 7 -- .../set_scale_to_mll.patch | 52 ----------- .../analysis.f | 0 .../launch.txt | 0 .../metadata.txt | 0 .../output.txt | 0 .../set_scale_to_mll.patch | 0 .../analysis.f | 0 .../launch.txt | 0 .../metadata.txt | 0 .../output.txt | 0 .../set_scale_to_mll.patch | 0 .../analysis.f | 0 .../launch.txt | 0 .../metadata.txt | 0 .../output.txt | 0 .../set_scale_to_mll.patch | 0 .../analysis.f | 0 .../launch.txt | 0 .../metadata.txt | 0 .../output.txt | 0 .../set_scale_to_mll.patch | 0 .../analysis.f | 0 .../launch.txt | 0 .../metadata.txt | 0 .../output.txt | 0 .../set_scale_to_mll.patch | 0 .../analysis.f | 0 .../launch.txt | 0 .../metadata.txt | 0 .../output.txt | 0 .../set_scale_to_mll.patch | 0 45 files changed, 543 deletions(-) delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt delete mode 100644 nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0060_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_060_120}/analysis.f (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0060_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_060_120}/launch.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0060_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_060_120}/metadata.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0060_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_060_120}/output.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0060_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_060_120}/set_scale_to_mll.patch (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0200_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_3000}/analysis.f (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_3000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_3000}/launch.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0200_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_3000}/metadata.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0200_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_3000}/output.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0200_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_3000}/set_scale_to_mll.patch (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0500_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_4000}/analysis.f (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_4000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_4000}/launch.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0500_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_4000}/metadata.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0500_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_4000}/output.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_0500_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_4000}/set_scale_to_mll.patch (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_1000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_5000}/analysis.f (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_5000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_5000}/launch.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_1000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_5000}/metadata.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_1000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_5000}/output.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_1000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_5000}/set_scale_to_mll.patch (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_3000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_6000}/analysis.f (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_6000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_6000}/launch.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_3000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_6000}/metadata.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_3000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_6000}/output.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_3000_COSTH => NNPDF_DY_14TEV_BSM_AFB_COS_6000}/set_scale_to_mll.patch (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_5000_YLL => NNPDF_DY_14TEV_BSM_AFB_YLL_5000}/analysis.f (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_5000_YLL => NNPDF_DY_14TEV_BSM_AFB_YLL_5000}/launch.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_5000_YLL => NNPDF_DY_14TEV_BSM_AFB_YLL_5000}/metadata.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_4000_COSTH => NNPDF_DY_14TEV_BSM_AFB_YLL_5000}/output.txt (100%) rename nnpdf31_proc/{CMS_DY_14TEV_MLL_4000_COSTH => NNPDF_DY_14TEV_BSM_AFB_YLL_5000}/set_scale_to_mll.patch (100%) diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt deleted file mode 100644 index 933d7827..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/launch.txt +++ /dev/null @@ -1,25 +0,0 @@ -launch @OUTPUT@ -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 10.0 -set etal = 2.4 -set mll_sf = 200.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt deleted file mode 100644 index 74e61b55..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/launch.txt +++ /dev/null @@ -1,25 +0,0 @@ -launch @OUTPUT@ -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 10.0 -set etal = 2.4 -set mll_sf = 500.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt deleted file mode 100644 index c058e6bc..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/launch.txt +++ /dev/null @@ -1,25 +0,0 @@ -launch @OUTPUT@ -fixed_order = ON -set maxjetflavor 5 -set gf @GF@ -set mh @MH@ -set mt @MT@ -set mw @MW@ -set mz @MZ@ -set wh @WH@ -set wt @WT@ -set ww @WW@ -set wz @WZ@ -set ebeam1 7000 -set ebeam2 7000 -set pdlabel lhapdf -set lhaid @LHAPDF_ID@ -set dynamical_scale_choice 10 -set reweight_scale True -set ptl = 10.0 -set etal = 2.4 -set mll_sf = 1000.0 -set req_acc_FO 0.0001 -set pineappl True -done -quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f deleted file mode 100644 index 2c5c2ecd..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/analysis.f +++ /dev/null @@ -1,88 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - call HwU_fill(1,xcos,wgts) - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt deleted file mode 100644 index 8a1ddd7d..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/metadata.txt +++ /dev/null @@ -1,9 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=costh -x1_label_tex=$\cos \theta^*$ -x1_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f deleted file mode 100644 index 2c5c2ecd..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/analysis.f +++ /dev/null @@ -1,88 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - call HwU_fill(1,xcos,wgts) - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt deleted file mode 100644 index 8a1ddd7d..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/metadata.txt +++ /dev/null @@ -1,9 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=costh -x1_label_tex=$\cos \theta^*$ -x1_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f deleted file mode 100644 index 2c5c2ecd..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/analysis.f +++ /dev/null @@ -1,88 +0,0 @@ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_begin(nwgt,weights_info) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - integer nwgt - character*(*) weights_info(*) - - call HwU_inithist(nwgt,weights_info) - call HwU_book(1,'lmlp yrap',50, -1d0, 1d0) - - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_end(dummy) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - double precision dummy - call HwU_write_file - return - end - -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - subroutine analysis_fill(p,istatus,ipdg,wgts,ibody) -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - - implicit none - include 'nexternal.inc' - include 'cuts.inc' - integer istatus(nexternal) - integer iPDG(nexternal) - integer ibody - integer i - integer j - double precision p(0:4,nexternal) - double precision wgts(*) - double precision ppl(0:3), pplb(0:3), ppv(0:3) - logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) - double precision xcos, getcostheta - external getcostheta - - double precision p_reco(0:4,nexternal) - integer iPDG_reco(nexternal) - - - - is_nextph_iso(:) = .false. - call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, - $ p, iPDG, is_nextph_iso, p_reco, iPDG_reco, - $ is_nextph_iso_reco) - - do j = nincoming+1, nexternal - if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) - if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) - enddo - do i=0,3 - ppv(i)=ppl(i)+pplb(i) - enddo - - xcos=getcostheta(ppl(0),ppl(1),ppl(2),ppl(3),pplb(0),pplb(1), - & pplb(2),pplb(3)) - - call HwU_fill(1,xcos,wgts) - end - - function getcostheta(enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal) - implicit none - real*8 getcostheta,enl,ptxl,ptyl,pzl,enal,ptxal,ptyal,pzal - real*8 pzll,mll,p1p,p1m,p2p,p2m,pt2ll -c implementation of first formula on page 6 of https://arxiv.org/abs/1710.05167 - p1p = enl + pzl - p1m = enl - pzl - p2p = enal + pzal - p2m = enal - pzal - pzll = pzl + pzal - pt2ll = (ptxl + ptxal) * (ptxl + ptxal) + - & (ptyl + ptyal) * (ptyl + ptyal) - mll = sqrt((enl + enal) * (enl + enal) - (pt2ll + pzll * pzll)) - getcostheta = (p1p*p2m-p1m*p2p)/sqrt(mll*mll+pt2ll)/mll* - & sign(1d0,pzll) - - if (abs(getcostheta) > 1d0) then - print *, 'Calculating cos with cos > 1' - stop - endif - end diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt deleted file mode 100644 index 8a1ddd7d..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/metadata.txt +++ /dev/null @@ -1,9 +0,0 @@ -arxiv= -description= -hepdata= -x1_label=costh -x1_label_tex=$\cos \theta^*$ -x1_unit= -y_label=dsig/dcosth -y_label_tex=$\frac{\mathrm{d}\sigma}{\mathrm{d}\cos \theta^*}$ -y_unit=pb diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt deleted file mode 100644 index a64cd92a..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/output.txt +++ /dev/null @@ -1,7 +0,0 @@ -set complex_mass_scheme True -import model loop_qcd_qed_sm_Gmu -define p = p b b~ -define j = p -generate p p > mu+ mu- [QCD] -output @OUTPUT@ -quit diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch deleted file mode 100644 index 10c218d7..00000000 --- a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/set_scale_to_mll.patch +++ /dev/null @@ -1,52 +0,0 @@ ---- NLO/SubProcesses/setscales.f 2020-05-21 17:23:55.126143088 +0200 -+++ NLO/SubProcesses/setscales.f.new 2020-05-21 17:27:26.262700419 +0200 -@@ -527,6 +527,18 @@ - integer i,j - character*80 temp_scale_id - common/ctemp_scale_id/temp_scale_id -+ integer iPDG_reco(nexternal) -+ double precision ppl(0:3), pplb(0:3), ppv(0:3) -+ logical is_nextph_iso(nexternal),is_nextph_iso_reco(nexternal) -+ double precision p_reco(0:4,nexternal), p_in(0:4,nexternal) -+c les houches accord stuff to identify particles -+c -+ integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc), -+ & icolup(2,nexternal,maxflow),niprocs -+ common /c_leshouche_inc/idup,mothup,icolup,niprocs -+c Masses of external particles -+ double precision pmass(nexternal) -+ common/to_mass/pmass - c - tmp=0 - if(ickkw.eq.-1)then -@@ -568,10 +579,26 @@ - cc dynamical_scale_choice = 10 cc - cc in the run_card (run_card.dat) cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc -- write(*,*) "User-defined scale not set" -- stop 1 -- temp_scale_id='User-defined dynamical scale' ! use a meaningful string -- tmp = 0d0 -+ temp_scale_id='FOOBAR' ! use a meaningful string -+ tmp = -1d0 -+ do i=1,nexternal -+ p_in(0:3,i) = pp(0:3,i) -+ p_in(4,i) = pmass(i) -+ enddo -+ is_nextph_iso(:) = .false. -+ call recombine_momenta(rphreco, etaphreco, lepphreco, quarkphreco, -+ $ p_in, idup(1,1), is_nextph_iso, p_reco, -+ $ iPDG_reco, is_nextph_iso_reco) -+ -+ do j = nincoming+1, nexternal -+ if (iPDG_reco(j).eq.13) ppl(0:3)=p_reco(0:3,j) -+ if (iPDG_reco(j).eq.-13) pplb(0:3)=p_reco(0:3,j) -+ enddo -+ do i=0,3 -+ ppv(i)=ppl(i)+pplb(i) -+ enddo -+ -+ tmp=sqrt(ppv(0)**2-ppv(1)**2-ppv(2)**2-ppv(3)**2) - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc - cc USER-DEFINED SCALE: END OF USER CODE cc - ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/analysis.f similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/analysis.f rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/analysis.f diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/launch.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/metadata.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/metadata.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/metadata.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/output.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/output.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/output.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/set_scale_to_mll.patch similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0060_COSTH/set_scale_to_mll.patch rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/analysis.f similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/analysis.f rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/analysis.f diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/launch.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/launch.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/launch.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/metadata.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/metadata.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/metadata.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/output.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/output.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/output.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/set_scale_to_mll.patch similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0200_COSTH/set_scale_to_mll.patch rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_3000/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/analysis.f similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/analysis.f rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/analysis.f diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/launch.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/launch.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/launch.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/metadata.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/metadata.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/metadata.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/output.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/output.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/output.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/set_scale_to_mll.patch similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_0500_COSTH/set_scale_to_mll.patch rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_4000/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/analysis.f similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/analysis.f rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/analysis.f diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/launch.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_5000_COSTH/launch.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/launch.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/metadata.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/metadata.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/metadata.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/output.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/output.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/output.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/set_scale_to_mll.patch similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_1000_COSTH/set_scale_to_mll.patch rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_5000/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/analysis.f similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/analysis.f rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/analysis.f diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/launch.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_6000_COSTH/launch.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/launch.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/metadata.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/metadata.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/metadata.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/output.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/output.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/output.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/set_scale_to_mll.patch similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_3000_COSTH/set_scale_to_mll.patch rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_6000/set_scale_to_mll.patch diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/analysis.f b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/analysis.f similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/analysis.f rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/analysis.f diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/launch.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/launch.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/launch.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/metadata.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_5000_YLL/metadata.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/metadata.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/output.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/output.txt similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/output.txt rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/output.txt diff --git a/nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/set_scale_to_mll.patch b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/set_scale_to_mll.patch similarity index 100% rename from nnpdf31_proc/CMS_DY_14TEV_MLL_4000_COSTH/set_scale_to_mll.patch rename to nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_YLL_5000/set_scale_to_mll.patch From 54137ac4cdc42d570963596c107cec7b5337a531 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Sat, 27 Aug 2022 13:29:01 +0200 Subject: [PATCH 14/15] Increase statistics to improve Afb plot --- nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt index 959050e4..1db8228d 100644 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt @@ -20,7 +20,7 @@ set ptl = 10.0 set etal = 2.4 set mll_sf = 60.0 #user_defined_cut set mmllmax = 120.0 -set req_acc_FO 0.0001 +set req_acc_FO 0.000025 set pineappl True done quit From 1385221d9b6433f7fb95971fe6d7cd001b707079 Mon Sep 17 00:00:00 2001 From: Christopher Schwan Date: Sun, 28 Aug 2022 09:28:01 +0200 Subject: [PATCH 15/15] Increase statistics even further --- nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt index 1db8228d..b10b2cec 100644 --- a/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt +++ b/nnpdf31_proc/NNPDF_DY_14TEV_BSM_AFB_COS_060_120/launch.txt @@ -20,7 +20,7 @@ set ptl = 10.0 set etal = 2.4 set mll_sf = 60.0 #user_defined_cut set mmllmax = 120.0 -set req_acc_FO 0.000025 +set req_acc_FO 0.00001 set pineappl True done quit