1
subroutine amcatnlo_fastjetppgenkt_timed(pQCD,NN,rfj,sycut,palg,
4
include 'nexternal.inc'
7
double precision pQCD(0:3,nexternal),PJET(0:3,nexternal)
8
double precision rfj,sycut,palg
9
integer NN,JET(nexternal),njet
12
real*4 tbefore, tAfter
13
real*4 tTot, tOLP, tFastJet, tPDF
14
common/timings/tTot, tOLP, tFastJet, tPDF
16
call cpu_time(tBefore)
17
call amcatnlo_fastjetppgenkt(pQCD,NN,rfj,sycut,palg,
20
tFastJet = tFastJet + (tAfter-tBefore)