In order to work with this library, hzxxxxx routines have to fulfill some additional requirements.
The HZNLO common block is defined as follows:
INTEGER NLO, TOT, DIJET, TRIPJET, QUADJET COMMON /HZNLO/NLO, TOT, DIJET, TRIPJET, QUADJET
An example might look like:
IF (iflag.eq.1) THEN C... init step NLO=0 ELSE IF (iflag.eq.2) THEN C... fill step C... make some phase space cuts CTH add total x-section IF ((NLO.eq.1).AND.(TOT.ne.1)) GOTO 11112 nall=nall+xw 11112 CONTINUE C... run some jet algorithm and make some cuts on dijet events IF (twojet) THEN IF ((NLO.eq.1).AND.(DIJET.ne.1)) GOTO 11114 nall2=nall2+xw call hfill(121,x,0.,xw) call hfill(131,q2,0.,xw) 11114 CONTINUE ENDIF ENDIF