* * $Id: gpsed.inc,v 3.3 2006/04/09 23:29:00 cafagna Exp $ * * $Log: gpsed.inc,v $ * Revision 3.3 2006/04/09 23:29:00 cafagna * Several new things, among this: ND and CARD * * Revision 3.2 2005/06/21 02:42:17 cafagna * Major modification to the geometry and to the random number chain * * Revision 3.1.1.1 2002/07/11 16:02:00 cafagna * First GPAMELA release on CVS * * * * gpsed.inc * *CMZ : 3.00/00 28/03/2001 19.49.01 by Marialuigia Ambriola *CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola *CMZ : 2.00/00 22/02/2000 18.01.18 by Francesco Cafagna *CMZ : 1.02/00 21/10/99 16.32.09 by Francesco Cafagna *CMZ : 1.00/02 15/03/96 16.23.08 by Francesco Cafagna *-- Author : Francesco Cafagna 13/02/96 <<<<<<< gpsed.inc PARAMETER (NSET=14, NSDET=3) INTEGER NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD, + NVSPE ,NVCAL ,NVCALI,ISS1,IDS11Y,IDS12X,ISS2, + IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X, + ISS4,IDS4,ISTRD,IDTRSI, ======= PARAMETER (NSET=14, NSDET=3) INTEGER NVTOF,NVS4,NVTRD,NVCAT,NVCAS,NVCARD, c ml: 27/10/04 c + NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21, + NVSPE ,NVCAL ,NVCALI,NVND, + ISS11,IDS11YISS12,IDS12X,ISS21, c end ml. + IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X, + ISS4,IDS4,ISTRD , >>>>>>> 3.3 + IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS , + IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA, + ISCAL,IDCASI,IDCAST,ISND,IDNDTI * CHARACTER*4 CNSED * COMMON /GPCSED/ NVTOF,NVS4,NVTRD,NVCAT,NVCAS, <<<<<<< gpsed.inc + NVSPE ,NVCAL,NVCALI,NVND,ISS1,IDS11Y,IDS12X,ISS2, + IDS21X,IDS22Y,ISS3A,IDS31Y,IDS32X, + ISS4,IDS4,ISTRD,IDTRSI, ======= c ml: 27/10/04: c + NVSPE ,NVCAL ,ISS11,IDS11X,ISS12,IDS12Y,ISS21, + NVSPE ,NVCAL,NVCALI,NVND, + ISS11,IDS11Y,ISS12,IDS12X,ISS21, c ml. + IDS21X,ISS22,IDS22Y,ISS31,IDS31Y,ISS32,IDS32X, + ISS4,IDS4,ISTRD , >>>>>>> 3.3 + IDTRSO,ISCAT ,IDCATL,IDCATT,ISCAS , + IDCASX,IDCASY,ISCARD,IDCAR1,IDCAR2,ISSPE ,IDTSPA, + ISCAL,IDCASI,IDCAST,ISND,IDNDTI, + CNSED(NSET,NSDET) *