gpamela/gpcdes/gpnd.inc

*
* gpnd.inc
*
*CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola
*CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna
*CMZ :  1.02/00 22/10/99  13.42.27  by  Francesco Cafagna
*CMZ :  1.00/02 04/04/96  15.52.53  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   14/02/96
*
* Common with CWN variable for ND
*
      INTEGER NTHND,ITUBEND,IPARND
      REAL    XINND,YINND,ZINND,XOUTND,YOUTND,ZOUTND,ERELND,
     +        TIMEND,P0ND
      COMMON  /GPCND/ NTHND,ITUBEND(NHMND),
     +                IPARND(NHMND),
     +                XINND(NHMND),YINND(NHMND),ZINND(NHMND),
     +                XOUTND(NHMND),YOUTND(NHMND),ZOUTND(NHMND),
     +                ERELND(NHMND),TIMEND(NHMND),P0ND(NHMND)
1	*
2	* gpnd.inc
3	*
4	*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola
5	*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna
6	*CMZ : 1.02/00 22/10/99 13.42.27 by Francesco Cafagna
7	*CMZ : 1.00/02 04/04/96 15.52.53 by Francesco Cafagna
8	*-- Author : Francesco Cafagna 14/02/96
9	*
10	* Common with CWN variable for ND
11	*
12	INTEGER NTHND,ITUBEND,IPARND
13	REAL XINND,YINND,ZINND,XOUTND,YOUTND,ZOUTND,ERELND,
14	+ TIMEND,P0ND
15	COMMON /GPCND/ NTHND,ITUBEND(NHMND),
16	+ IPARND(NHMND),
17	+ XINND(NHMND),YINND(NHMND),ZINND(NHMND),
18	+ XOUTND(NHMND),YOUTND(NHMND),ZOUTND(NHMND),
19	+ ERELND(NHMND),TIMEND(NHMND),P0ND(NHMND)