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

Annotation of /gpamela/gpcdes/gpsed.inc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3.6 - (hide annotations) (download)
Thu May 18 10:52:32 2006 UTC (18 years, 7 months ago) by pam-ba
Branch: MAIN
CVS Tags: v4r7, v4r8, v4r9, v4r14, v4r12, v4r13, v4r10, v4r11, HEAD
Changes since 3.5: +6 -3 lines
TOF geometry completed and a new material, the polystyrene (density 35 g/l), added

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

  ViewVC Help
Powered by ViewVC 1.1.23