Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/isajet/isabnk.inc is written in an unsupported language. File is not indexed.

0001 #ifndef CERNLIB_ISAJET_ISABNK_INC
0002 #define CERNLIB_ISAJET_ISABNK_INC
0003 *
0004 *
0005 * isabnk.inc
0006 *
0007 C
0008       COMMON/ISABNK/BANK,FILISA,FILIS2
0009       SAVE /ISABNK/
0010       CHARACTER*12 BANK
0011       CHARACTER*80 FILISA,FILIS2
0012 C
0013 C  If BANK='ISAP' Zebra bank ISAP (particles) will be written out
0014 C  if BANK='ISAC'     "      ISAC (pseudo calorimeter) will be written out
0015 C  If BANK='ISAL'     "      ISAL (leptons) will be written out
0016 C  if BANK='ISAPISAC' both groups will be written out
0017 C  if BANK='ISAPISACISAL' all groups will be written out
0018 C
0019 C  FILISA= name of ISAJET events file (ZEBRA)
0020 C  FILIS2= name of second file if needed for output
0021 C
0022 
0023 #endif