gpamela/gpcdes/gpfield.inc

*
* $Id$
*
* $Log$
*
*
* gpfield.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 10/03/97  12.52.13  by  Francesco Cafagna
*CMZ :  1.00/02 27/02/96  17.40.15  by  Francesco Cafagna
*-- Author :    Paolo Papini   16/02/96
C
C Common with the magnetic field related variables
C
      REAL FX,FY,FZ,V0,V1,V2,V3,VV,DD
      INTEGER IVV,IV
      COMMON /GPCFIELD/FX(41,41,31),FY(41,41,31),
     +                FZ(41,41,31),V0(3),V1(3),V2(3),V3(3),
     +                VV(8,3),DD(8),IVV(8,3),IV(3)
C
1	cafagna	3.1	*
2			* $Id$
3			*
4			* $Log$
5			*
6			*
7			* gpfield.inc
8			*
9			*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola
10			*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna
11			*CMZ : 1.02/00 10/03/97 12.52.13 by Francesco Cafagna
12			*CMZ : 1.00/02 27/02/96 17.40.15 by Francesco Cafagna
13			*-- Author : Paolo Papini 16/02/96
14			C
15			C Common with the magnetic field related variables
16			C
17			REAL FX,FY,FZ,V0,V1,V2,V3,VV,DD
18			INTEGER IVV,IV
19			COMMON /GPCFIELD/FX(41,41,31),FY(41,41,31),
20			+ FZ(41,41,31),V0(3),V1(3),V2(3),V3(3),
21			+ VV(8,3),DD(8),IVV(8,3),IV(3)
22			C