/[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.4 by pam-ba, Tue May 2 11:13:41 2006 UTC revision 3.5 by pam-ba, Tue May 2 11:44:49 2006 UTC
# Line 1  Line 1 
1  *  *
2  * $Id: gpsed.inc,v 3.3 2006/04/09 23:29:00 cafagna Exp $  * $Id: gpsed.inc,v 3.4 2006/05/02 11:13:41 pam-ba Exp $
3  *  *
4  * $Log: gpsed.inc,v $  * $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  * Revision 3.3  2006/04/09 23:29:00  cafagna
9  * Several new things, among this: ND and CARD  * Several new things, among this: ND and CARD
10  *  *
# Line 21  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  <<<<<<< gpsed.inc  c$$$<<<<<<< gpsed.inc
28        PARAMETER  (NSET=14, NSDET=3)        PARAMETER  (NSET=11, NSDET=3)
29        INTEGER    NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD,        INTEGER    NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD,
30       +           NVSPE ,NVCAL ,NVCALI,ISS1,IDS11Y,IDS12X,ISS2,       +           NVSPE ,NVCAL ,NVCALI,ISS1,IDS11Y,IDS12X,ISS2,
31       +           IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X,       +           IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X,
32       +           ISS4,IDS4,ISTRD,IDTRSI,       +           ISS4,IDS4,ISTRD,IDTRSI,
33  =======  c$$$ =======
34        PARAMETER  (NSET=14, NSDET=3)  c$$$      PARAMETER  (NSET=14, NSDET=3)
35        INTEGER    NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD,  c$$$      INTEGER    NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD,
36  c ml: 27/10/04  c$$$c ml: 27/10/04
37  c    +           NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,  c$$$c    +           NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,
38       +           NVSPE ,NVCAL ,NVCALI,NVND,  c$$$     +           NVSPE ,NVCAL ,NVCALI,NVND,
39       +           ISS11,IDS11YISS12,IDS12X,ISS21,  c$$$     +           ISS11,IDS11YISS12,IDS12X,ISS21,
40  c end ml.  c$$$c end ml.
41       +           IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,  c$$$     +           IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,
42       +           ISS4,IDS4,ISTRD ,  c$$$     +           ISS4,IDS4,ISTRD ,
43  >>>>>>> 3.3  c$$$>>>>>>> 3.3
44       +           IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,       +           IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,
45       +           IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA,       +           IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA,
46       +           ISCAL,IDCASI,IDCAST,ISND,IDNDTI       +           ISCAL,IDCASI,IDCAST,ISND,IDNDTI
# Line 45  c end ml. Line 48  c end ml.
48        CHARACTER*4 CNSED        CHARACTER*4 CNSED
49  *  *
50        COMMON /GPCSED/ NVTOF,NVS4,NVTRD,NVCAT,NVCAS,        COMMON /GPCSED/ NVTOF,NVS4,NVTRD,NVCAT,NVCAS,
51  <<<<<<< gpsed.inc  c$$$<<<<<<< gpsed.inc
52       +               NVSPE ,NVCAL,NVCALI,NVND,ISS1,IDS11Y,IDS12X,ISS2,       +               NVSPE ,NVCAL,NVCALI,NVND,ISS1,IDS11Y,IDS12X,ISS2,
53       +               IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X,       +               IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X,
54       +               ISS4,IDS4,ISTRD,IDTRSI,       +               ISS4,IDS4,ISTRD,IDTRSI,
55  =======  c$$$=======
56  c ml: 27/10/04:  c$$$c ml: 27/10/04:
57  c    +               NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,  c$$$c    +               NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21,
58       +               NVSPE ,NVCAL,NVCALI,NVND,  c$$$     +               NVSPE ,NVCAL,NVCALI,NVND,
59       +               ISS11,IDS11Y,ISS12,IDS12X,ISS21,  c$$$     +               ISS11,IDS11Y,ISS12,IDS12X,ISS21,
60  c ml.  c$$$c ml.
61       +               IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,  c$$$     +               IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X,
62       +               ISS4,IDS4,ISTRD ,  c$$$     +               ISS4,IDS4,ISTRD ,
63  >>>>>>> 3.3  c$$$>>>>>>> 3.3
64       +               IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,       +               IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS ,
65       +               IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA,       +               IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA,
66       +               ISCAL,IDCASI,IDCAST,ISND,IDNDTI,       +               ISCAL,IDCASI,IDCAST,ISND,IDNDTI,

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

  ViewVC Help
Powered by ViewVC 1.1.23