Next: Over-all event information module Up: User Module Global Variables. Previous: User Module Global Variables. Contents
MODULE zaste
INTEGER,PARAMETER :: nwhead=4 , &
perigee = 1 , &
refit = 2 , &
reass = 3 , &
evass = 4 , &
tkrdata = 1 , &
notkrdata = 0
LOGICAL :: first,& ! TRUE if very first call to analysing
! code
downup,& ! vertex-fit method : include tracks
! until Xi^2 becomes bad (.TRUE.), or
! exclude tracks until it becomes good
! (.FALSE.)
vtxgen,& ! TRUE if main vertex position variations
! were generated, FALSE otherwise.
dst,& ! TRUE if data comes from full
! simulation or real data
real_data ! TRUE if real data
INTEGER ::&
evt,& ! current event number
igeom,& ! present detector geometry
lunpr,& ! print unit
maxpr,& ! max number of events to print
minjet,& ! min number of jets to accept event
nwbhit(10),& ! Number of words used for barrel hit-
! list
nwfhit(10) ! Number of words used for forward hit-
! list
REAL ::&
ssepl,& ! Limiting probability for two
! showers to be separable in
! calorimeters
mstca ! Lowest distance between shower
! start-point and track extrapolation
! to calorimeter at which the shower
! will not be attached to the track
CHARACTER (LEN=80) :: hbdir ! current hbook directory
INTEGER ::&
method,& ! method to use when including hits in
! the track (if hits were generated)
TYPE,& ! type of data on tracks (TKR or pxpypz)
nwntt,& ! Number of words in track ntuple, if
! any.
nwntj ! Ditto, jet-ntuple.
END MODULE zaste
over-all-event-information-module-zaevt