gpamela/gcdes/gtscan.inc

*
* $Id$
*
* $Log$
*
*
* gtscan.inc
*
      INTEGER MSLIST,NPHI,IPHIMI,IPHIMA,IPHI1,IPHIL,NTETA,MODTET,NSLMAX,
     +        MAXMDT,NSLIST,ISLIST,IPHI,ITETA,ISCUR
      REAL    PHIMIN,PHIMAX,TETMIN,TETMAX,VSCAN,FACTX0,FACTL,
     +        FACTR,SX0,SABS,TETMID,TETMAD
     +       ,SX0S,SX0T,SABSS,SABST,FACTSF
     +       ,DLTPHI,DLTETA,DPHIM1,DTETM1
     +       ,FCX0M1,FCLLM1,FCRRM1
1	cafagna	3.1	*
2			* $Id$
3			*
4			* $Log$
5			*
6			*
7			* gtscan.inc
8			*
9			INTEGER MSLIST,NPHI,IPHIMI,IPHIMA,IPHI1,IPHIL,NTETA,MODTET,NSLMAX,
10			+ MAXMDT,NSLIST,ISLIST,IPHI,ITETA,ISCUR
11			REAL PHIMIN,PHIMAX,TETMIN,TETMAX,VSCAN,FACTX0,FACTL,
12			+ FACTR,SX0,SABS,TETMID,TETMAD
13			+ ,SX0S,SX0T,SABSS,SABST,FACTSF
14			+ ,DLTPHI,DLTETA,DPHIM1,DTETM1
15			+ ,FCX0M1,FCLLM1,FCRRM1