* * $Id$ * * $Log$ * * * gpdspe.inc * *CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola *CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna *CMZ : 1.02/00 10/03/97 12.52.13 by Francesco Cafagna *CMZ : 1.01/00 04/05/96 10.28.46 by Francesco Cafagna *-- Author : Francesco Cafagna 04/05/96 * * Parameters for spectrometer digitalization * PARAMETER (NPCHXY=275,NPCHZ=60,NUDSPE=20) * INTEGER LKD1,LKD2,LKD3,LKDH,NXSTR,NYSTR * REAL RLKD4,WXSTR,WYSTR,CHARX,CHARX_I, + CHARY,CCX,CCY,STEPX,STEPY,STEPZ, + ENOISX,ENOISY,PIEDX,PIEDY,ADCX,ADCY,D,TVX,TVY,UD,UU,PX1, + PX2,PY1,PY2 * COMMON /GPCDSPE/LKD1(NDMSPE),LKD2(NDMSPE),LKD3(NDMSPE), + LKDH(NDMSPE),NXSTR,NYSTR, + RLKD4(NDMSPE),WXSTR,WYSTR,CHARX(NPCHXY,NPCHZ), + CHARX_I(NPCHXY,NPCHZ), + CHARY(NPCHXY,NPCHZ),CCX(3),CCY(3),STEPX,STEPY, + STEPZ,ENOISX,ENOISY,PIEDX,PIEDY,ADCX,ADCY,D, + TVX,TVY,UD,UU,PX1,PX2,PY1,PY2