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	*
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