1459
1459
COMMON/TO_CUTSDONE/CUTSDONE,CUTSPASSED
1461
1461
CHARACTER*7 PDLABEL,EPA_LABEL
1464
COMMON/TO_PDF/LHAID,PDLABEL,EPA_LABEL,pdsublabel
1467
1468
c It is important to divide the wgt stored in the grid by the
1468
1469
c corresponding jacobian otherwise it flattens the sampled
1471
1472
C is in the initialization stage where all helicity were probed
1472
1473
c and added individually to the grid directly by matrix<i>.f so
1473
1474
c that they shouldn't be added here.
1475
1476
& (.NOT.CUTSDONE.or.CUTSPASSED)) then
1476
1477
call DS_add_entry('Helicity',HEL_PICKED,(wgt/hel_jacobian))