| 1 |
* |
* |
| 2 |
* $Id: gpsed.inc,v 3.1.1.1 2002/07/11 16:02:00 cafagna Exp $ |
* $Id: gpsed.inc,v 3.2 2005/06/21 02:42:17 cafagna Exp $ |
| 3 |
* |
* |
| 4 |
* $Log: gpsed.inc,v $ |
* $Log: gpsed.inc,v $ |
| 5 |
|
* Revision 3.2 2005/06/21 02:42:17 cafagna |
| 6 |
|
* Major modification to the geometry and to the random number chain |
| 7 |
|
* |
| 8 |
* Revision 3.1.1.1 2002/07/11 16:02:00 cafagna |
* Revision 3.1.1.1 2002/07/11 16:02:00 cafagna |
| 9 |
* First GPAMELA release on CVS |
* First GPAMELA release on CVS |
| 10 |
* |
* |
| 18 |
*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 |
| 19 |
*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 |
| 20 |
*-- Author : Francesco Cafagna 13/02/96 |
*-- Author : Francesco Cafagna 13/02/96 |
| 21 |
PARAMETER (NSET=12, NSDET=3) |
PARAMETER (NSET=14, NSDET=3) |
| 22 |
INTEGER NVTOF,NVS4,NVTRD,NVCAT,NVCAS, |
INTEGER NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD, |
| 23 |
c ml: 27/10/04 |
c ml: 27/10/04 |
| 24 |
c + NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21, |
c + NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21, |
| 25 |
+ NVSPE ,NVCAL ,NVCALI,ISS11,IDS11YISS12,IDS12X,ISS21, |
+ NVSPE ,NVCAL ,NVCALI,NVND, |
| 26 |
|
+ ISS11,IDS11YISS12,IDS12X,ISS21, |
| 27 |
c end ml. |
c end ml. |
| 28 |
+ IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X, |
+ IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X, |
| 29 |
+ ISS4,IDS4,ISTRD , |
+ ISS4,IDS4,ISTRD , |
| 30 |
+ IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS , |
+ IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS , |
| 31 |
+ IDCASX,IDCASY,ISSPE ,IDTSPA,ISCAL,IDCASI,IDCAST |
+ IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA, |
| 32 |
|
+ ISCAL,IDCASI,IDCAST,ISND,IDNDTI |
| 33 |
* |
* |
| 34 |
CHARACTER*4 CNSED |
CHARACTER*4 CNSED |
| 35 |
* |
* |
| 36 |
COMMON /GPCSED/ NVTOF,NVS4,NVTRD,NVCAT,NVCAS, |
COMMON /GPCSED/ NVTOF,NVS4,NVTRD,NVCAT,NVCAS, |
| 37 |
c ml: 27/10/04: |
c ml: 27/10/04: |
| 38 |
c + NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21, |
c + NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21, |
| 39 |
+ NVSPE ,NVCAL,NVCALI,ISS11,IDS11Y,ISS12,IDS12X,ISS21, |
+ NVSPE ,NVCAL,NVCALI,NVND, |
| 40 |
|
+ ISS11,IDS11Y,ISS12,IDS12X,ISS21, |
| 41 |
c ml. |
c ml. |
| 42 |
+ IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X, |
+ IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X, |
| 43 |
+ ISS4,IDS4,ISTRD , |
+ ISS4,IDS4,ISTRD , |
| 44 |
+ IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS , |
+ IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS , |
| 45 |
+ IDCASX,IDCASY,ISSPE ,IDTSPA,ISCAL ,IDCASI,IDCAST, |
+ IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA, |
| 46 |
|
+ ISCAL,IDCASI,IDCAST,ISND,IDNDTI, |
| 47 |
+ CNSED(NSET,NSDET) |
+ CNSED(NSET,NSDET) |
| 48 |
* |
* |