4.2.3 SUBROUTINE ZEUGEN(I, STEER, IERR) : User GENerator

User event generator routine, SUSYGEN version.

ARGUMENTS:

INPUT :

    I : Current event number.
    STEER : Steering info. The event generator uses row 2:
                  STEER(2,0)   : Type of event to be generated.
                         ,1)   : CMS energy of reaction to be simulated.
                         ,2)   : Lifetime of B hadrons.
                         ,4)   : 0.0 -> use fixed primary vertex position.
                                 1,0 -> generate primary vertex position.
                                        event by event.
                         ,5-7) : Average production point.
                         ,8-10): Spread in production-point.
                 All other position of the row are free to use.

    IERR  : error code.

IMPLICIT INPUTS:

     From /ZXSTE/ : LUNPRC, printing unit; MAXPR, max number of
          events to print; NEWAMV, flag to load average mean vertex.
    SUSYGEN commons :
     From /STR/ : SCAN, flag for SUSY parameter scan.
     From /SCAN/ : RVS1,RVS2,RVS3 and RVS4, list of points to scan;
        ISCAN, number of points in each scan-direction.
     From /CONST/ : IRAD, flag for ISR generation.
     From /DECSEL/ : IPROCSEL, list of processes.
     From /STEER/ : GMAUM,GMAUR,GM0,GTANB, the current working point
        in the SUSY parameter plane.

IMPLICIT OUTPUTS:

     To /ZXEVT/ : XYZV, average vertex position; SIGV, vertex error;
       EVTYPE, type of generated event.
     To /LUJETS/ : event record in JETSET conventions. This routine
       will directly modify the production points of tracks (vector
       V in LUJETS), and the history code (vector K in LUJETS).
    SUSYGEN commons :
     To /STEER/ : GMAUM,GMAUR,GM0,GTANB, the current working point
       in the SUSY parameter plane.

CALLED BY :

ZXCEST, Create the Event STructure (see 4.1.5).

CALLED ROUTINE(S):

ZURECT (see 4.7.14)

(To get a RECTangular random-number)

ZEPVTX (see 4.2.7)

(To generate Primary VerTeX.)

HCDIR

(CERNLIB HBOOK routine.)

SUSINI,PROCINIT,SUSISR,SUSEVE

(SUSYGEN routines.)

LULIST

(JETSET routine.)

UCOPY

(CERNLIB routine.)

SIDE EFFECTS:

none.

AUTHORS:

M. Berggren, IPN Lyon

CREATION DATE:

20-JAN-1998