gpamela/gcdes/iounit.inc

*
* $Id: iounit.inc,v 1.1.1.1 1995/10/24 10:20:40 cernlib Exp $
*
* $Log: iounit.inc,v $
* Revision 1.1.1.1  1995/10/24 10:20:40  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_IOUNIT_INC
#define CERNLIB_GEANT321_IOUNIT_INC
*
*
* iounit.inc
*
*                                                                     *
*=== iounit ==========================================================*
*                                                                     *
*---------------------------------------------------------------------*
*                                                                     *
*      Iounit: included in any routine                                *
*                                                                     *
*         lunin  = standard input unit                                *
*         lunout = standard output unit                               *
*         lunerr = standard error unit                                *
*         lunber = input file for bertini nuclear data                *
*         lunech = echo file for pegs dat                             *
*         lunflu = input file for photoelectric edges and X-ray fluo- *
*                  rescence data                                      *
*         lungeo = scratch file for combinatorial geometry            *
*         lunpgs = input file for pegs material data                  *
*         lunran = output file for the final random number seed       *
*         lunxsc = input file for low energy neutron cross sections   *
*                                                                     *
*---------------------------------------------------------------------*
*                                                                     *
      PARAMETER ( LUNIN  = 5  )
      PARAMETER ( LUNOUT = 6  )
      PARAMETER ( LUNERR = 66 )
      PARAMETER ( LUNBER = 22 )
      PARAMETER ( LUNECH = 8  )
      PARAMETER ( LUNFLU = 86 )
      PARAMETER ( LUNGEO = 16 )
      PARAMETER ( LUNPGS = 12 )
      PARAMETER ( LUNRAN = 2  )
      PARAMETER ( LUNXSC = 81 )
 

#endif
1	bottai	3.1	*
2			* $Id: iounit.inc,v 1.1.1.1 1995/10/24 10:20:40 cernlib Exp $
3			*
4			* $Log: iounit.inc,v $
5			* Revision 1.1.1.1 1995/10/24 10:20:40 cernlib
6			* Geant
7			*
8			*
9			#ifndef CERNLIB_GEANT321_IOUNIT_INC
10			#define CERNLIB_GEANT321_IOUNIT_INC
11			*
12			*
13			* iounit.inc
14			*
15			* *
16			=== iounit ==========================================================
17			* *
18			---------------------------------------------------------------------
19			* *
20			* Iounit: included in any routine *
21			* *
22			* lunin = standard input unit *
23			* lunout = standard output unit *
24			* lunerr = standard error unit *
25			* lunber = input file for bertini nuclear data *
26			* lunech = echo file for pegs dat *
27			* lunflu = input file for photoelectric edges and X-ray fluo- *
28			* rescence data *
29			* lungeo = scratch file for combinatorial geometry *
30			* lunpgs = input file for pegs material data *
31			* lunran = output file for the final random number seed *
32			* lunxsc = input file for low energy neutron cross sections *
33			* *
34			---------------------------------------------------------------------
35			* *
36			PARAMETER ( LUNIN = 5 )
37			PARAMETER ( LUNOUT = 6 )
38			PARAMETER ( LUNERR = 66 )
39			PARAMETER ( LUNBER = 22 )
40			PARAMETER ( LUNECH = 8 )
41			PARAMETER ( LUNFLU = 86 )
42			PARAMETER ( LUNGEO = 16 )
43			PARAMETER ( LUNPGS = 12 )
44			PARAMETER ( LUNRAN = 2 )
45			PARAMETER ( LUNXSC = 81 )
46
47
48			#endif