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

Diff of /gpamela/gpcdes/gpunit.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.4 by bottai, Thu Dec 22 16:18:27 2005 UTC
# Line 1  Line 1 
1  *  *
2  * $Id$  * $Id: gpunit.inc,v 3.3 2005/12/05 12:15:20 pam-ba Exp $
3    *
4    * $Log: gpunit.inc,v $
5    * Revision 3.3  2005/12/05 12:15:20  pam-ba
6    * new spectrometer geometry and internal magnetic field
7    *
8    * Revision 3.2  2005/06/21 02:42:19  cafagna
9    * Major modification to the geometry and to the random number chain
10    *
11    * Revision 3.1.1.1  2002/07/11 16:02:00  cafagna
12    * First GPAMELA release on CVS
13  *  *
 * $Log$  
14  *  *
15  *  *
16  * gpunit.inc  * gpunit.inc
17  *  *
18    *               14/04/2005  13:22     by Marialuigia Ambriola
19  *CMZ :  3.00/00 01/05/2001  16.07.26  by  Marialuigia Ambriola  *CMZ :  3.00/00 01/05/2001  16.07.26  by  Marialuigia Ambriola
20  *CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola  *CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola
21  *CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna  *CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna
# Line 15  Line 25 
25  *  *
26  * Common with the lgical unit number for each file opened by GPAMELA  * Common with the lgical unit number for each file opened by GPAMELA
27  *  *
28        INTEGER LUHBK,LUFMAP,LUFFR,LUTR,LUGAR        INTEGER LUHBK,LUFMAP1,LUFMAP2,LUFMAP3,LUFFR,LUTR,LUFMAP,LUGAR
29        CHARACTER*80 CHHBK,CHFMAP,CHFFR,CHTR,CHGAR       +        ,LURSPE,LUFSF,LULSF
30  *        CHARACTER*80 CHHBK,CHFMAP1,CHFMAP2,CHFMAPEX,CHFFR,CHTR,CHGAR,
31        COMMON /GPCUNIT/ LUHBK ,LUFMAP,LUFFR,LUTR,LUGAR,       +             CHFMAP,CHRSPE,CHFSF,CHLSF
32       +                 CHHBK ,CHFMAP,CHFFR,CHTR,CHGAR  *
33          COMMON /GPCUNIT/ LUHBK,LUFMAP1,LUFMAP2,LUFMAP3,LUFFR,LUTR,LUFMAP
34         +             ,LUGAR,LURSPE,LUFSF,LULSF,CHHBK,CHFMAP1,CHFMAP2
35         +             ,CHFMAPEX,CHFFR,CHTR,CHGAR,CHFMAP,CHRSPE,CHFSF,CHLSF

Legend:
Removed from v.3.1  
changed lines
  Added in v.3.4

  ViewVC Help
Powered by ViewVC 1.1.23