First commit.
[u/mrichter/AliRoot.git] / ISAJET / doc / ztext.doc
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.1  1996/03/08 17:27:17  mclareni
6 * Isajet714
7 *
8 *
9
10                           ISAJET ZEBRA INTERFACE
11                      F.E. Paige and S.D. Protopopescu
12                             Physics Department
13                       Brookhaven National Laboratory
14                              Upton, NY 11973
15                               March 30, 1991
16
17
18      [1] Overview
19      ============
20
21       The ZEBRA  version of ISAJET  contains subroutines  which replace the
22 usual  output package  for ISAJET  with one using  the CERN  package ZEBRA.
23 This version  provides some  features which  are not part  of the  standard
24 ISAJET  output. Momenta  and masses  of the  partons are  rescaled from the
25 final  particles so that  they match  exactly  (this is not  so in ISAJET).
26 Resonances   decaying  strongly are  not part  of the  particle  list while
27 particles with heavy quarks decaying  weakly are part of a vertex list with
28 the corresponding  vertex position  and appropriate  links to the particles
29 belonging  to that  vertex.  Thus there  is no need  to  generate secondary
30 vertices for charmed or other heavy quark particles and the event structure
31 makes it easy to find which particles come from the decay of a heavy quark.
32 The  association of  particles  with  parent partons  is also  made easy by
33 reference  links. For simple  calorimeter  studies banks  are also provided
34 with  energy sums  over  calorimeter  cells and  banks  containing only the
35 leptons (see  below). If only those  are written  instead of particle banks
36 the resulting files are more compact and require considerably less CPU time
37 to analyze (albeit the information is rather limited). In addition jets are
38 calculated by  using a cone  algorithm on the partons,  these can be useful
39 for studying  efficiencies of jet finding  algorithms and comparing results
40 to theoretical jets. The results of parton jets are in Zebra banks PJET.
41
42       NOTE: The present  version can only handle  one run at a time, so you
43 cannot supply a command  file with many runs for  now. This problem will be
44 fixed in a future release.
45
46     [2] Creating and running a job
47     ==============================
48
49     There are command files in BNLCL6::$2$DUA14:[ISAJET.ISALIBRARY] to make
50 EXE files for event generation and analysis.
51
52     To make an EXE generating ISAJET events which are then written to
53 a file in ZEBRA format users should run command file:
54
55 $ @isa$area:MAKE_ISAJET_ZEBRA
56
57 this starts from  ISAJET.PAM and  makes  ISAJET_ZEBRA.FOR, ISAJET_ZEBRA.OLB
58 and  ISAJET_ZEBRA.EXE.  It requires  that  ISA$AREA de  defined as the area
59 where ISAJET.PAM and command files  reside. It also requires that CERN$AREA
60 be defined   as the area  for the  CERN  libraries. The above  command file
61 assumes symbol YPATCHY is defined. If running on a machine other than a VAX
62 looking at the command file should give a pretty good idea of what needs to
63 be done.
64
65 If you  already have ISAJET_ZEBRA.OLB you can run command file
66
67 $ @isa$area:LINK_ISAJET_ZEBRA
68
69 to make ISAJET_ZEBRA.EXE, this program runs with an interactive
70 dialog to generate ISAJET instructions. You can supply your own
71 ISARUN main program if you wish to bypass the dialog, see command
72 file MAKE_ISAJET.COM for the simplest example.
73
74 User can provide any of 3 logical functions to reduce the
75 size of output files:
76 1) EDIT(I)     = if false event will not be written out
77                  I is event number
78                  Zebra banks have not yet been generated, so
79                  user must work from standard ISAJET common blocks
80 2) ISEDIT()    = same as EDIT but Zebra banks have been filled
81 3) PEDIT(ID,P) = if false particle will not be included in
82                  the list of particles written out
83                  ID= particle ID, P(4)= particle momentum vector
84
85
86 To generate a user program that reads an ISAJET output file in ZEBRA
87 format users should run
88
89 $ @isa$area:MAKE_ISZRUN
90 this makes a sample user analysis subroutine ISZUSR and an ISZRUN.EXE
91 program. ISZUSR gives an example of how to use the utility subroutines
92 mentioned in next section for analysis.
93
94 If user already has an ISZUSR subroutine he can generate ISZRUN.EXE by
95
96 $ @isa$area:LINK_ISZRUN
97
98
99     [3] Utilities
100     =============
101
102     A number of utilities  are provided for the  user to make it easier for
103 him to use the  information in ZEBRA form without  him having to learn much
104 about  ZEBRA. It is   nevertheless  recommended that  the user  familiarize
105 himself with ZEBRA by  reading the first chapter  of the ZEBRA manual. Also
106 to make  full  use of  the power  of  ZEBRA users  may   eventually want to
107 familiarize themselves with some of  the utilities provided with it such as
108 MZDROP and ZSORT.
109
110 o For every ZEBRA bank of name ISxx (most ISAJET ZEBRA banks start with
111   IS) there exist:
112     1) GZISxx : an integer function returning pointer to first bank in
113                 the linear structure
114     2) GTISxx : a subroutine returning the contents of the bank
115     3) PRISxx : a subroutine generating a printout of the banks with name ISxx
116
117 o To generate a full dump:
118         CALL PRTEVZ(unit #)
119   This subroutine calls all the PRISxx subroutines.
120
121 o Users can provide a primary vertex for each event by:
122         CALL SETVTX(XYZ)
123   where XYZ is a 3-vector with values x,y,z
124   To supply a function for the vertex user should supply subroutine
125   INTVTX(XYZ) which returns an XYZ vector with each call. The
126   default returns 0,0,0.
127
128 o The parameters for generating PJET banks can be controlled by
129       CALL PJPSET(N,ALG,ETCUT,DRCUT,MAXIT,IR,MUON)
130   where
131                                                           Default values
132           N     = NUMBER OF PJET ALGORITHMS                      1
133           ALG   = ALGORITHM TPYE 'CONE' OR 'ANGLE'            'CONE'
134           ETCUT = ET CUT FR PJET JETS                           5.0
135           DRCUT = CONE CUT (IN R OR ANGLE)                      0.45
136           MAXIT = MAXIMUM NUMBER OF ITERATIONS                   1
137           IR    = INIT RADIATION FLAG 0=USE IR,   1=NO IR        0
138           MUON  = MUON FLAG    0=NO MUONS, 1=use MUONS in PJET   0
139
140
141       Other subroutines of interest are:
142 o ISZJET  find jets using ISCL banks
143 o ISZUSR  example of a user subroutine for analysis
144
145
146
147     [4] Other Subroutines
148     =====================
149
150     We list here the subroutines that are part of ISAJET_ZEBRA:
151
152 GENVTX  generate secondary vertices (for heavy quark decays)
153 ISABFL  fill ISAB bank (begin of run bank)
154 ISACFL  fill ISAC and ISCL banks (calorimeter description and
155         calorimeter cells with non-zero energy deposited).
156         Entry point ISACIN calculates all numbers needed for
157         calorimeter description.
158 ISAEFL  fill ISAE bank (main header)
159 ISAFFL  fill ISAF bank (end of run bank)
160 ISAJFL  fill ISAJ banks (primary jets)
161 ISALFL  fill ISAL banks (leptons)
162 ISAPFL  fill ISV1 and ISP1 banks (vertices and particles)
163 ISAQFL  fill ISAQ banks (secondary partons, both initial and final)
164 ISCMFL  fill ISCM (copy of command instructions)
165 ISMEAR  generates smeared calorimeter data (modifies ISCL banks)
166 PJETFL  fill PJET banks (jets obtained from partons)
167 QRECAL  to recalculate momenta and masses of partons starting
168         from the final particles
169
170
171
172
173
174    [5] Brief description of Zebra banks
175    ====================================
176
177       The beginning and end of run  records have Zebra banks named ISAB and
178 ISAF  while  the  whole  event  hangs  from  Zebra  bank  ISAE. A  complete
179 description of the banks is given in section [6].
180
181 ISAB data describing event generation              (in beginning record)
182 ISCM copy of command file used for event generation(       "           )
183 ISAF cumulative results from run (in end record)
184 ISAE general event information such as weight, type, etc.
185 ISAJ primary jet momenta and masses
186 ISAQ final and initial partons (momenta and masses)
187 ISV1 primary and short lived vertices (heavy quarks), includes
188      id,mass and 4-momenta of decaying particle
189 ISP1 particles associated with ISV1 (connected via a structural link)
190      id,mass and 4-momenta
191 ISAC simple calorimeter description (no depth)
192 ISCL energy deposition and cell description in calorimeter cell
193 ISMR description of smearing parameters
194 ISAL stable leptons (including neutrinos):id,mass and 4-momenta
195      with reference links to calorimeter cell and ISP1 if they
196      exist
197 ISJT jets found by subroutine ISZJET.
198 PJHD header for PJET banks
199 PJET jets found adding over partons
200 PJPT pointers to parton banks (ISAQ) contributing to a jet in PJET
201
202       Whether   banks    ISV1,ISP1,ISAC,ISCL  and  ISAL are  written out is
203 optional. The ISARUN job  asks user to chose an  option ISAP, ISAC or ISAL.
204 If ISAP is selected then  ISV1 and ISP1 are  written out, if ISAC then ISAC
205 and  ISCL are   written out  and  if ISAL  then  ISAL  is  written out. Any
206 combination can be selected, the  instruction ISAPISACISAL causes all banks
207 to be written out.
208
209       The banks ISJT are created by calling ISZJET, the banks ISAC and ISCL
210 must be available. One can create  the banks ISAC,ISCL and/or ISAL starting
211 from a file  containing ISV1 and  ISP1 by calling  ISACFL and/or ISALFL for
212 each event.
213
214
215
216    [6] Zebra banks documentation
217    =============================
218
219
220                      +------------------+
221                      |      ISAE        |
222                      | event descriptor |
223                      |                  |
224                      +------------------+
225         struc. link         |||   |  |
226                             |||   |  +------------------------------+
227                             |||   +-----------------------------+   |
228        +-------+------------+|                                  |   |
229        |       |             |                                  |   |
230   ______     ______       ______    ______                      |   |
231  | ISAJ \   | ISAQ \     | ISV1 |  | ISV1 \                     |   |
232  |  -1   >  |  -2   >    |  -3  |--| (-3)  >                    |   |
233  |______/   |______/     |______|  |______/                     |   |
234               :  ^         | :...<..: |                         |   |
235               :  :         |   [-2]   |                         |   |
236   [PJET -1].<..  :         |          |                         |   |
237                  : [-2] ______      ______                      |   |
238                  :.....| ISP1 \    | ISP1 \                     |   |
239   [PJET -3] ..<........|  -1   >   |  -1   >                    |   |
240                        |______/    |______/                     |   |
241                         : |[-1]      : : :                      |   |
242                     [-4]: v     <....: : :[-4]                  |   |
243                         : free  <......: :                      |   |
244                         v                v                      |   |
245                       ISV2             ISV2                     |   |
246                    (end vertex)     (end vertex)                |   |
247                                                                 |   |
248                              +------------+---------------------+   |
249                              |            |                         |
250                              |            |                         |
251                          _________      ______                     ______
252                         |  ISAC   |    | ISAL \                   | PJHD \
253                         |   -6    |    |  -7   >                  |  -8   >
254                         |_________|    |______/                   |______/
255                               |                                     |
256             +-------+---------+--+                                 ______
257             |       |            |               [ISAQ -1]..>.....| PJET \
258          ______     ______       ______                           |  -1   >
259         | ISCL \   | ISMR \     | ISJT \                          |______/
260         |  -1   >  |  -2   >    |  -3   >                             |
261         |______/   |______/     |______/                           ______
262                                                                   | PJPT |
263                                                      [ISAQ]...<...|  -1  |
264                                                                   |______|
265
266      +-----------+            +-----------+
267      |    ISAB   |            |    ISAF   |
268      | begin run |            |  end  run |
269      |           |            |           |
270      +-----------+            +-----------+
271            |
272      +----------+
273      |   ISCM   |
274      |    -1    |
275      +----------+
276
277
278
279 C=======================================================================
280 C
281 C  Bank name: ISAC
282 C  Author   : SDP
283 C  Date     : June 14,1989
284 C
285 C                    Calorimeter descriptor
286 C
287 C    LQ     Q/IQ
288 C ___________________________________________________________________________
289 C     -3            struct.  to ISJT (jets found using ISZJET)
290 C     -2            struct.  to smearing parameters (ISMR)
291 C     -1            struct.  to calorimeter cells (ISCL)
292 C      0            next     to next ISAC (only one at present)
293 C     +1            up       to ISAE
294 C     +2            origin   to ISAE for first and previous ISAC for others
295 C ............................................................................
296 C            I-5             calorimeter number
297 C             -4             bank name,  'ISAC'
298 C             -3             NL=2
299 C             -2             NS=0
300 C             -1             ND=6
301 C              0             STATUS
302 C             +1     I       number of phi cells
303 C              2     I         "       eta     "
304 C              3     F      phi cell size
305 C              4     F      eta     "   "
306 C              5     F      minimum eta
307 C              6     F      maximum eta
308 C=======================================================================
309
310
311
312 C=======================================================================
313 C
314 C  Bank name: ISAE
315 C  Author   : SDP
316 C  Date     : June 19,1986     DH add ISAM
317 C
318 C                Top level bank and event descriptor for ISAZEB
319 C
320 C    LQ     Q/IQ
321 C ___________________________________________________________________________
322 C     -8            struct.  to PJHD (parton jet structure header)
323 C     -7            struct.  to lepton bank (ISAL)
324 C     -6            struct.  to pseudo cal. (ISAC)
325 C     -5            struct.  to unassociated particles (ISP3)
326 C     -4            struct.  to long lived vertices (ISV2)
327 C     -3            struct.  to short  "      "     (ISV1)
328 C     -2            struct.  to final/initial bank (ISAQ)
329 C     -1            struct.  to primary jet (ISAJ)
330 C      0            next     to next ISAE
331 C     +1            up
332 C     +2            origin
333 C ............................................................................
334 C            I-5             bank number
335 C             -4             bank name,  'ISAE'
336 C             -3             NL=7
337 C             -2             NS=7
338 C             -1             ND=18
339 C              0             STATUS
340 C             +1     I       event id(1)
341 C              2     I       event id(2)
342 C              3     I       event number
343 C              4     I       reaction type
344 C              5     I       number of primary jet banks
345 C              6     I         "    of stable parton banks (final+initial)
346 C              7     I         "    of PJET banks
347 C              8     I         "    of particle banks
348 C              9     I         "    of vertex banks
349 C             10     I         "    of lepton banks
350 C             11     F       cross section in microbarns
351 C             12     F       weight
352 C             13     F       effective q**2
353 C             14     F       hard scattering invariant s
354 C             15     F        "      "          "      t
355 C             16     F        "      "          "      u
356 C             17     D        Seed (part 1)
357 C             18     D        Seed (part 2)
358 C=======================================================================
359
360
361
362 C=======================================================================
363 C
364 C  Bank name: ISAJ
365 C  Author   : SDP
366 C  Date     : June 19,1986
367 C
368 C                Primary jet information
369 C
370 C    LQ     Q/IQ
371 C ___________________________________________________________________________
372 C    L-1            ref. to parent primary (ISAJ) (0 if original)
373 C     +0            next     to next jet (ISAJ)
374 C     +1            up       to ISAE
375 C     +2            origin   to ISAE
376 C ............................................................................
377 C            I-5             Primary jet number
378 C             -4             bank name,  'ISAJ'
379 C             -3             NL=0
380 C             -2             NS=0
381 C             -1             ND=9
382 C              0             STATUS
383 C             +1     I       jet ID
384 C              2     F       px
385 C              3     F       py
386 C              4     F       pz
387 C              5     F       p
388 C              6     F       mass
389 C              7     F       phi
390 C              8     F       theta
391 C              9     F       eta
392 C=======================================================================
393
394
395
396 C=======================================================================
397 C
398 C  Bank name: ISAL
399 C  Author   : SDP
400 C  Date     : June 19,1986
401 C
402 C                  Lepton bank (from primary and short lived vertices)
403 C
404 C    LQ     Q/IQ
405 C ___________________________________________________________________________
406 C    L-4            ref.  to particle bank  (ISP1)
407 C     -3            ref.  to primary jet    (ISAJ)
408 C     -2            ref.  to initial parton (ISAQ)
409 C     -1            struct.  (free)
410 C      0            next     to next ISAL
411 C     +1            up       to ISAE
412 C     +2            origin   to ISAE for first and previous ISAL for others
413 C ............................................................................
414 C            I-5             particle number
415 C             -4             bank name,  'ISAL'
416 C             -3             NL=4
417 C             -2             NS=1
418 C             -1             ND=9
419 C              0             STATUS
420 C             +1     I       ISAJET particle ID
421 C              2     F       px
422 C              3     F       py
423 C              4     F       pz
424 C              5     F       p
425 C              6     F       mass
426 C              7     F       phi
427 C              8     F       theta
428 C              9     F       eta
429 C=======================================================================
430
431
432
433 C=======================================================================
434 C
435 C  Bank name: ISAQ
436 C  Author   : SDP
437 C  Date     : June 19,1986
438 C
439 C            Final and initial partons
440 C
441 C    LQ     Q/IQ
442 C ___________________________________________________________________________
443 C    L-2            ref.  to PJET (parton structure jets)
444 C     -1            ref.  to primary jet (ISAJ)
445 C                            0 for initial parton
446 C      0            next     to next ISAQ
447 C     +1            up       to ISAE
448 C     +2            origin   to ISAE for first and previous ISAQ for others
449 C ............................................................................
450 C            I-5             final/initial parton number
451 C             -4             bank name,  'ISAQ'
452 C             -3             NL=2
453 C             -2             NS=0
454 C             -1             ND=9
455 C              0             STATUS
456 C             +1     I       final/initial parton type
457 C              2     F       px
458 C              3     F       py
459 C              4     F       pz
460 C              5     F       E
461 C              6     F       mass
462 C              7     F       phi
463 C              8     F       theta
464 C              9     F       eta
465 C=======================================================================
466
467
468
469 C=======================================================================
470 C
471 C  Bank name: ISCL
472 C  Author   : SDP
473 C  Date     : June 19,1986
474 C
475 C               Calorimeter cell bank
476 C
477 C    LQ     Q/IQ
478 C ___________________________________________________________________________
479 C    L-2            ref.  to reconstructed jet (ISJT)
480 C     -1            ref.  to parent parton (ISAQ)
481 C      0            next     to next ISCL
482 C     +1            up       to ISAC
483 C     +2            origin   to ISAC for first and previous ISAL for others
484 C ............................................................................
485 C            I-5             cell number (ordinal)
486 C             -4             bank name,  'ISCL'
487 C             -3             NL=2
488 C             -2             NS=0
489 C             -1             ND=10
490 C              0             STATUS
491 C             +1     I       10000*(phi index) + y index
492 C              2     I       10000*(# of charged trks) + # of gammas
493 C              3     F       e.m. energy deposited
494 C              4     F       had.  "        "
495 C              5     F       sin(theta) at center of cell
496 C              6     F       cos(theta)         "
497 C              7     F       sin(phi)           "
498 C              8     F       cos(phi)           "
499 C              9     F       phi                "
500 C             10     F       eta                "
501 C===========================================================================
502
503
504
505
506 C=======================================================================
507 C
508 C  Bank name: ISJT
509 C  Author   : SDP
510 C  Date     : June 19,1986
511 C
512 C                Jets found by ISZJET
513 C
514 C    LQ     Q/IQ
515 C ___________________________________________________________________________
516 C     -1            to possible parent parton (ISAQ)
517 C     +0            next     to next jet (ISJT)
518 C     +1            up       to ISJT
519 C     +2            origin   to ISAC
520 C ............................................................................
521 C            I-5             jet number
522 C             -4             bank name,  'ISJT'
523 C             -3             NL=0
524 C             -2             NS=0
525 C             -1             ND=6
526 C              0             STATUS
527 C             +1     F       ET (transverse energy)
528 C              2     F       px
529 C              3     F       py
530 C              4     F       pz
531 C              5     F       E
532 C              6     F       mass
533 C              7     F       phi
534 C              8     F       theta
535 C              9     F       eta
536 C=======================================================================
537
538
539
540
541 C=======================================================================
542 C
543 C  Bank name: ISP1
544 C  Author   : SDP
545 C  Date     : June 19,1986
546 C
547 C             Particle bank (from primary and short lived vertices)
548 C
549 C    LQ     Q/IQ
550 C ___________________________________________________________________________
551 C    L-5            ref.  to GCAH
552 C    L-4            ref.  to secondary vertex (ISV2)
553 C     -3            ref.  to primary jet    (ISAJ)
554 C     -2            ref.  to initial parton (ISAQ)
555 C     -1            struct.  (free)
556 C      0            next     to next ISP1
557 C     +1            up       to ISV1
558 C     +2            origin   to ISV1 for first and previous ISP1 for others
559 C ............................................................................
560 C            I-5             particle number
561 C             -4             bank name,  'ISP1'
562 C             -3             NL=4
563 C             -2             NS=1
564 C             -1             ND=9
565 C              0             STATUS
566 C             +1     I       ISAJET particle ID
567 C              2     F       px
568 C              3     F       py
569 C              4     F       pz
570 C              5     F       E
571 C              6     F       mass
572 C              7     F       phi
573 C              8     F       theta
574 C              9     F       eta
575 C=======================================================================
576
577
578
579 C=======================================================================
580 C
581 C  Bank Name : PJET
582 C  Author    : Chip Stewart
583 C  Date      :  7-NOV-1989 18:10:09.84
584 C  Version   : 2.0
585 C
586 C  Bank description : PARTON JET BANK
587 C      PJET is constructed by applying a jet algorithm (CONE or
588 C      OPENING ANGLE) to either Partons given in the ISAQ bank
589 C      or Paricles given in the ISP1 bank.
590 C
591 C     LQ     Q/IQ
592 C-----------------------------------------------------------------------
593 C     +2          Down   link to SPARE
594 C     -1          Down   link to PJPT
595 C      0          Next   link to
596 C     +1          Up     link to PJHD
597 C     +2          Origin link to PJHD
598 C.......................................................................
599 C             -5         Bank number
600 C             -4         Bank name, 'PJET'
601 C             -3         NL = 2
602 C             -2         NS = 2
603 C             -1         ND = 12
604 C              0         Status
605 C             +1     I   NV = 2 Version Number
606 C              2     F   Et ( =Pt in version NV=1 )
607 C              3     F   Px
608 C              4     F   Py
609 C              5     F   Pz
610 C              6     F   E
611 C              7     F   mass
612 C              8     F   phi
613 C              9     F   theta
614 C             10     F   eta
615 C             11     I   CLASS - (eg. for mapping PJET with RECO )
616 C             12     I   NEXT
617 C=======================================================================
618 C
619 C  Definitions:
620 C  -----------
621 C
622 C  E  - Sum(Ei) over all the Partons/Particles included in the jet.
623 C
624 C  Px - Sum(Pxi).
625 C  Py - Sum(Pyi).
626 C  Pz - Sum(Pzi).
627 C
628 C  Et - Sum[Ei*sin(Thetai)]
629 C
630 C  Comment: In version NV=1 word 2 was Pt = SQRT ( Px**2 + Py**2 )
631 C
632 C  Mass - SQRT [ E**2 - ( Px**2 + Py**2 + Pz**2 )]
633 C
634 C  For Theta, Phi and Eta the following code was used
635 C  to calculate them from Px,Py,Pz
636 C
637 C  PARAMETER( SMALL = 1.0E-5 )
638 C  Phi=ATAN2(Py,Px+SMALL)   ;   IF(Phi.LT.0) Phi=Phi+TWOPI
639 C  Theta=ACOS((Pz+SMALL)/(SQRT(Px*Px+Py*Py+Pz*Pz)+SMALL))
640 C  Eta=-ALOG(TAN(Theta/2.)+SMALL)
641 C
642 C=======================================================================
643
644
645
646 C=======================================================================
647 C
648 C  Bank Name : PJHD
649 C  Author    : Chip Stewart
650 C  Date      :  7-NOV-1989 17:57:58.00
651 C
652 C  Bank description : Header for PJET structure
653 C
654 C     LQ     Q/IQ
655 C-----------------------------------------------------------------------
656 C     -2          DOWN   spare
657 C     -1          DOWN   LINK TO PJET
658 C      0          Next   link to PJHD
659 C     +1          Up     link to ISAE
660 C     +2          Origin link to ISAE
661 C.......................................................................
662 C             -5         Bank number
663 C             -4         Bank name, 'PJHD'
664 C             -3         NL = 2
665 C             -2         NS = 2
666 C             -1         ND = 8
667 C              0         Status
668 C              1     I   NV=2 Version number
669 C              2     I   N_ALG - 1 for DR CONE , 2 for CMS OPEN ANGLE
670 C              3     I   NJET - NUMBER OF PARTON JETS
671 C              4     F   algorithm parameters DR_CONE_CUT/OPENING_ANGLE_CUT
672 C              5     F   algorithm parameters JET_ET_CUT
673 C              6     I   algorithm parameters MAX ITERATIONS
674 C              7     I   Initial Radiation switch 0-use IR      1-no IR
675 C              8     I   MUON switch (IF NV=1 MUON NOT USED) 
676 C                        0-no MUONS    1-use MUONS
677 C=======================================================================
678
679
680
681 C=======================================================================
682 C
683 C  Bank Name : PJPT
684 C  Author    : Chip Stewart
685 C  Date      : 15-Dec-1989
686 C
687 C  Bank description : pointers to Partons (ISAQ) in a given jet
688 C
689 C     LQ     Q/IQ
690 C-----------------------------------------------------------------------
691 C     -N+1        Ref Link to parton bank ISAQ for Nth parton in this PJET
692 C     -2          Ref Link to parton bank ISAQ for 1st    "    "  "    "
693 C     -1          not used
694 C      0          Next   link to none
695 C     +1          Up     link to PJET
696 C     +2          Origin link to PJET
697 C.......................................................................
698 C             -5         Bank number
699 C             -4         Bank name, 'PJPT'
700 C             -3         NL = N+1
701 C             -2         NS = 0
702 C             -1         ND = 1 - number of data words in PJPT bank = 1
703 C              0         Status
704 C             +1     I   Bank version (=1)
705 C=======================================================================
706