/[PAMELA software]/gpamela/gpcdes/gpspe.inc
ViewVC logotype

Diff of /gpamela/gpcdes/gpspe.inc

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3.1 by cafagna, Thu Jul 11 16:02:00 2002 UTC revision 3.2 by bottai, Tue Jan 24 13:52:57 2006 UTC
# Line 1  Line 1 
1  *  *
2  * $Id$  * $Id: gpspe.inc,v 3.1.1.1 2002/07/11 16:02:00 cafagna Exp $
3    *
4    * $Log: gpspe.inc,v $
5    * Revision 3.1.1.1  2002/07/11 16:02:00  cafagna
6    * First GPAMELA release on CVS
7  *  *
 * $Log$  
8  *  *
9  *  *
10  * gpspe.inc  * gpspe.inc
# Line 16  Line 19 
19  * Common with CWN variable for TSPA  * Common with CWN variable for TSPA
20  *  *
21        INTEGER NTHSPE,IPARSPE,ITRPB,ITRSL,ITSPA,NDISPE,NDPLAN,NDSIL,        INTEGER NTHSPE,IPARSPE,ITRPB,ITRSL,ITSPA,NDISPE,NDPLAN,NDSIL,
22       +        NDISTR,NDIADC       +        NDISTR,NDIADC,NXMULT,NYMULT
23        REAL  XINSPE,YINSPE,ZINSPE,XOUTSPE,YOUTSPE,ZOUTSPE,        REAL  XINSPE,YINSPE,ZINSPE,XOUTSPE,YOUTSPE,ZOUTSPE,
24       +      XAVSPE,YAVSPE,ZAVSPE,ERELSPE,PATHSPE,P0SPE       +      XAVSPE,YAVSPE,ZAVSPE,ERELSPE,PATHSPE,P0SPE
25        COMMON /GPCSPE/ NTHSPE,IPARSPE(NHMSPE),ITRPB(NHMSPE),        COMMON /GPCSPE/ NTHSPE,IPARSPE(NHMSPE),ITRPB(NHMSPE),
# Line 26  Line 29 
29       +                XINSPE(NHMSPE),YINSPE(NHMSPE),ZINSPE(NHMSPE),       +                XINSPE(NHMSPE),YINSPE(NHMSPE),ZINSPE(NHMSPE),
30       +                XOUTSPE(NHMSPE),YOUTSPE(NHMSPE),ZOUTSPE(NHMSPE),       +                XOUTSPE(NHMSPE),YOUTSPE(NHMSPE),ZOUTSPE(NHMSPE),
31       +                XAVSPE(NHMSPE),YAVSPE(NHMSPE),ZAVSPE(NHMSPE),       +                XAVSPE(NHMSPE),YAVSPE(NHMSPE),ZAVSPE(NHMSPE),
32       +                ERELSPE(NHMSPE),PATHSPE(NHMSPE),P0SPE(NHMSPE)       +                ERELSPE(NHMSPE),PATHSPE(NHMSPE),P0SPE(NHMSPE),
33         +                NXMULT(NHMSPE),NYMULT(NHMSPE)
34  *  *
Legend:
Removed from v.3.1  
changed lines
  Added in v.3.2
  ViewVC Help
Powered by ViewVC 1.1.23