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

Diff of /gpamela/gpcdes/gpsed.inc

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

revision 3.1.1.1 by cafagna, Thu Jul 11 16:02:00 2002 UTC revision 3.5 by pam-ba, Tue May 2 11:44:49 2006 UTC
# Line 1  Line 1 
1  *  *
2  * $Id$  * $Id: gpsed.inc,v 3.4 2006/05/02 11:13:41 pam-ba Exp $
3    *
4    * $Log: gpsed.inc,v $
5    * Revision 3.4  2006/05/02 11:13:41  pam-ba
6    * TOF geometry and position updated and a new material, the mylar, added
7    *
8    * Revision 3.3  2006/04/09 23:29:00  cafagna
9    * Several new things, among this: ND and CARD
10    *
11    * Revision 3.2  2005/06/21 02:42:17  cafagna
12    * Major modification to the geometry and to the random number chain
13    *
14    * Revision 3.1.1.1  2002/07/11 16:02:00  cafagna
15    * First GPAMELA release on CVS
16  *  *
 * $Log$  
17  *  *
18  *  *
19  * gpsed.inc  * gpsed.inc
# Line 12  Line 24 
24  *CMZ :  1.02/00 21/10/99  16.32.09  by  Francesco Cafagna  *CMZ :  1.02/00 21/10/99  16.32.09  by  Francesco Cafagna
25  *CMZ :  1.00/02 15/03/96  16.23.08  by  Francesco Cafagna  *CMZ :  1.00/02 15/03/96  16.23.08  by  Francesco Cafagna
26  *-- Author :    Francesco Cafagna   13/02/96  *-- Author :    Francesco Cafagna   13/02/96
27        PARAMETER  (NSET=12, NSDET=3)  c$$$<<<<<<< gpsed.inc
28        INTEGER    NVTOF,NVS4,NVTRD,NVCAT,NVCAS,        PARAMETER  (NSET=11, NSDET=3)
29       +           NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,        INTEGER    NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD,
30       +           IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,       +           NVSPE ,NVCAL ,NVCALI,ISS1,IDS11Y,IDS12X,ISS2,
31       +           ISS4,IDS4,ISTRD ,       +           IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X,
32       +           IDTRSI,IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,       +           ISS4,IDS4,ISTRD,IDTRSI,
33       +           IDCASX,IDCASY,ISSPE ,IDTSPA,ISCAL,IDCASI  c$$$ =======
34    c$$$      PARAMETER  (NSET=14, NSDET=3)
35    c$$$      INTEGER    NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD,
36    c$$$c ml: 27/10/04
37    c$$$c    +           NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,
38    c$$$     +           NVSPE ,NVCAL ,NVCALI,NVND,
39    c$$$     +           ISS11,IDS11YISS12,IDS12X,ISS21,
40    c$$$c end ml.
41    c$$$     +           IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,
42    c$$$     +           ISS4,IDS4,ISTRD ,
43    c$$$>>>>>>> 3.3
44         +           IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,
45         +           IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA,
46         +           ISCAL,IDCASI,IDCAST,ISND,IDNDTI
47  *  *
48        CHARACTER*4 CNSED        CHARACTER*4 CNSED
49  *  *
50        COMMON /GPCSED/ NVTOF,NVS4,NVTRD,NVCAT,NVCAS,        COMMON /GPCSED/ NVTOF,NVS4,NVTRD,NVCAT,NVCAS,
51       +               NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,  c$$$<<<<<<< gpsed.inc
52       +               IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,       +               NVSPE ,NVCAL,NVCALI,NVND,ISS1,IDS11Y,IDS12X,ISS2,
53       +               ISS4,IDS4,ISTRD ,       +               IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X,
54       +               IDTRSI,IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,       +               ISS4,IDS4,ISTRD,IDTRSI,
55       +               IDCASX,IDCASY,ISSPE ,IDTSPA,ISCAL ,IDCASI,  c$$$=======
56    c$$$c ml: 27/10/04:
57    c$$$c    +               NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,
58    c$$$     +               NVSPE ,NVCAL,NVCALI,NVND,
59    c$$$     +               ISS11,IDS11Y,ISS12,IDS12X,ISS21,
60    c$$$c ml.
61    c$$$     +               IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,
62    c$$$     +               ISS4,IDS4,ISTRD ,
63    c$$$>>>>>>> 3.3
64         +               IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,
65         +               IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA,
66         +               ISCAL,IDCASI,IDCAST,ISND,IDNDTI,
67       +               CNSED(NSET,NSDET)       +               CNSED(NSET,NSDET)
68  *  *

Legend:
Removed from v.3.1.1.1  
changed lines
  Added in v.3.5

  ViewVC Help
Powered by ViewVC 1.1.23