ISAJET/isajet/isabnk.inc

   1 #ifndef CERNLIB_ISAJET_ISABNK_INC
   2 #define CERNLIB_ISAJET_ISABNK_INC
   3 *
   4 *
   5 * isabnk.inc
   6 *
   7 C
   8       COMMON/ISABNK/BANK,FILISA,FILIS2
   9       SAVE /ISABNK/
  10       CHARACTER*12 BANK
  11       CHARACTER*80 FILISA,FILIS2
  12 C
  13 C  If BANK='ISAP' Zebra bank ISAP (particles) will be written out
  14 C  if BANK='ISAC'     "      ISAC (pseudo calorimeter) will be written out
  15 C  If BANK='ISAL'     "      ISAL (leptons) will be written out
  16 C  if BANK='ISAPISAC' both groups will be written out
  17 C  if BANK='ISAPISACISAL' all groups will be written out
  18 C
  19 C  FILISA= name of ISAJET events file (ZEBRA)
  20 C  FILIS2= name of second file if needed for output
  21 C
  22
  23 #endif