[KLOE] [Offline Doc] [TRK Files] Track Reconstruction Library loguni.inc

C  DEC/CMS REPLACEMENT HISTORY, Element LOGUNI.CIN
C  *2    13-JUL-1991 23:28:45 FLAVIA "get rid of ABSOFT expander option"
C  *1    18-JUN-1991 19:47:55 FLAVIA "Logical unit numbers"
C  DEC/CMS REPLACEMENT HISTORY, Element LOGUNI.CIN
C===Include File C$INC:LOGUNI.INC
C
C	This include file contains the definitions for the
C	standard CDF Offline logical unit numbers.
C
C===Author:
C
C	Keith Chadwick
C	CDF-Purdue University
C
C===Include File Variant:
C
C	The following two logical unit numbers are associated with
C	graphics and histogram output.
C
C---Logical unit number for Graphics output file:
	INTEGER    LUGRA
	PARAMETER (LUGRA  =  1)
C
C---Default HBOOK output file:
	INTEGER    LUHBK
	PARAMETER (LUHBK  =  2)
C
C	The following two logical unit numbers are associated with
C	input and output from the users terminal/batch command/log file.
C
C---Logical unit number for user input:
	INTEGER    LUTTYI
	PARAMETER (LUTTYI =  5)
C
C---Logical unit number for user output:
	INTEGER    LUTTYO
	PARAMETER (LUTTYO =  6)
C
C	The following set of four logical unit numbers are used
C	in YBOS based Input/Output
C
C---Logical unit number for YBOS input event file 1:
	INTEGER    LUINP
	PARAMETER (LUINP  = 11)
C
C---Logical unit number for YBOS input event file 2:
	INTEGER    LUINP2
	PARAMETER (LUINP2 = 12)
C
C---Logical unit number for YBOS output event file 1:
	INTEGER    LUOUT
	PARAMETER (LUOUT  = 13)
C
C---Logical unit number for YBOS output event file 2:
	INTEGER    LUOUT2
	PARAMETER (LUOUT2 = 14)
C
C	The next two logical unit numbers are associated with files
C	containing lists of selected events.  Such a list might
C	typically contain two numbers per record (run and event no.).
C
C---Logical unit number for event selection list input file
	INTEGER    LUELSI
	PARAMETER (LUELSI = 15)
C
C---Logical unit number for event selection list output file
	INTEGER    LUELSO
	PARAMETER (LUELSO = 16)
C
C	The next four logical unit numbers are reserved for use by
C	CDFANA to manage multiple files and magnetic tape I/O.
C
C---Logical unit number for runcard file 1
	INTEGER    LUMINP
	PARAMETER (LUMINP = 17)
C
C---Logical unit number for runcard file 2
	INTEGER    LUMIN2
	PARAMETER (LUMIN2 = 18)
C
C---Logical unit number for future CDFANA use
	INTEGER    LUMOUT
	PARAMETER (LUMOUT = 19)
C
C---Logical unit number for future CDFANA use
	INTEGER    LUMOU2
	PARAMETER (LUMOU2 = 20)
C
C	The next four logical unit numbers are intended for temporary
C	usage only.  This means that any subroutine may open file(s) on
C	one or more of these unit numbers so long as all such files are
C	closed before execution returns to the calling program.
C
C---Logical unit number for temporary use
	INTEGER    LUTMP1
	PARAMETER (LUTMP1 = 21)
C
C---Logical unit number for temporary use
	INTEGER    LUTMP2
	PARAMETER (LUTMP2 = 22)
C
C---Logical unit number for temporary use
	INTEGER    LUTMP3
	PARAMETER (LUTMP3 = 23)
C
C---Logical unit number for temporary use
	INTEGER    LUTMP4
	PARAMETER (LUTMP4 = 24)
C
C	The following two logical unit numbers are in a common block
C	in order that any output sent to them may be re-directed.
C
C	LUPRT specifies where the user main program (e.g. CDFANA) directs
C	its diagnostic/error printout (in addition to LUTTYO).
C
C	LUERR specifies wherer the error logger directs its diagnostic
C	printout (in addition to LUTTYO).
C
C---Logical unit number common block:
	INTEGER LUPRT, LUERR
	COMMON /LOGUNI/	LUPRT, LUERR
C
$$If Block_Data
C
C===Block Data Variant:
C
	DATA LUPRT / LUTTYO /	! general printout
	DATA LUERR / LUTTYO /	! error logger printout
$$Endif
C
C===End of Include File C$INC:LOGUNI.INC