*
* $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
