include/f77/gcunit.inc

*
* $Id: gcunit.inc,v 3.1.1.1 2002/07/11 16:02:13 cafagna Exp $
*
* $Log: gcunit.inc,v $
* Revision 3.1.1.1  2002/07/11 16:02:13  cafagna
* First GPAMELA release on CVS
*
*
*
* gcunit.inc
*
      COMMON/GCUNIT/LIN,LOUT,NUNITS,LUNITS(5)
      INTEGER LIN,LOUT,NUNITS,LUNITS
      COMMON/GCMAIL/CHMAIL
      CHARACTER*132 CHMAIL
C
*
* gcunit.inc
*
#if defined(GPAMELA_INCLUDE)
*
#include "incbeg.inc"
     +   gcunit
#include "incend.inc"
#endif
1	*
2	* $Id: gcunit.inc,v 3.1.1.1 2002/07/11 16:02:13 cafagna Exp $
3	*
4	* $Log: gcunit.inc,v $
5	* Revision 3.1.1.1 2002/07/11 16:02:13 cafagna
6	* First GPAMELA release on CVS
7	*
8	*
9	*
10	* gcunit.inc
11	*
12	COMMON/GCUNIT/LIN,LOUT,NUNITS,LUNITS(5)
13	INTEGER LIN,LOUT,NUNITS,LUNITS
14	COMMON/GCMAIL/CHMAIL
15	CHARACTER*132 CHMAIL
16	C
17	*
18	* gcunit.inc
19	*
20	#if defined(GPAMELA_INCLUDE)
21	*
22	#include "incbeg.inc"
23	+ gcunit
24	#include "incend.inc"
25	#endif