gpamela/gpspe/gpsitr.F

*
* $Id: gpsitr.F,v 3.2 2006/03/15 16:22:52 bottai Exp $
*
* $Log: gpsitr.F,v $
* Revision 3.2  2006/03/15 16:22:52  bottai
*  Delta rays are disabled in SITR. Delta rays should not be simulated
* because at present the SPE strips are still not simulated and
* only the hits positions and their spread from true value (already
* taking into account the delta rays contribution) are simulated.
*
* Revision 3.1.1.1  2002/07/11 16:02:14  cafagna
* First GPAMELA release on CVS
*
*
*CMZ :  2.01/00 05/04/2000  14.35.18  by  Marialuigia Ambriola
*CMZ :  2.00/00 03/03/2000  15.39.06  by  Francesco Cafagna
*CMZ :  1.01/00 16/05/96  17.19.05  by  Francesco Cafagna
*CMZ :  1.00/02 04/04/96  17.54.02  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   04/04/96
      SUBROUTINE GPSITR
************************************************************************
*                                                                      *
* To define special tracking parameters for tracker silicon            *
*                                                                      *
* Called by: GPDAT                                                     *
* Author: Francesco Cafagna, 04/04/96 17.41.17                         *
*                                                                      *
************************************************************************
#include "gpsitr.inc"
#include "gpkey.inc"
* Spectromiter silicon parameters from Paolo papini

      IF(HLONG) THEN 
       LOSSSITR=1.
       DRAYSITR=1.
      ELSE
       LOSSSITR=2.
       DRAYSITR=0.
      ENDIF

      DCUTESITR=0.00001
      DCUTMSITR=0.00001
      CUTELESITR=0.00001
      CUTMUOSITR=0.00001
      STRASITR=0.
      RETURN
      END
1	cafagna	3.1	*
2	bottai	3.3	* $Id: gpsitr.F,v 3.2 2006/03/15 16:22:52 bottai Exp $
3	bottai	3.2	*
4			* $Log: gpsitr.F,v $
5	bottai	3.3	* Revision 3.2 2006/03/15 16:22:52 bottai
6			* Delta rays are disabled in SITR. Delta rays should not be simulated
7			* because at present the SPE strips are still not simulated and
8			* only the hits positions and their spread from true value (already
9			* taking into account the delta rays contribution) are simulated.
10			*
11	bottai	3.2	* Revision 3.1.1.1 2002/07/11 16:02:14 cafagna
12			* First GPAMELA release on CVS
13	cafagna	3.1	*
14			*
15			*CMZ : 2.01/00 05/04/2000 14.35.18 by Marialuigia Ambriola
16			*CMZ : 2.00/00 03/03/2000 15.39.06 by Francesco Cafagna
17			*CMZ : 1.01/00 16/05/96 17.19.05 by Francesco Cafagna
18			*CMZ : 1.00/02 04/04/96 17.54.02 by Francesco Cafagna
19			*-- Author : Francesco Cafagna 04/04/96
20			SUBROUTINE GPSITR
21			************************************************************************
22			* *
23			* To define special tracking parameters for tracker silicon *
24			* *
25			* Called by: GPDAT *
26			* Author: Francesco Cafagna, 04/04/96 17.41.17 *
27			* *
28			************************************************************************
29			#include "gpsitr.inc"
30	bottai	3.3	#include "gpkey.inc"
31	cafagna	3.1	* Spectromiter silicon parameters from Paolo papini
32	bottai	3.3
33			IF(HLONG) THEN
34			LOSSSITR=1.
35			DRAYSITR=1.
36			ELSE
37			LOSSSITR=2.
38			DRAYSITR=0.
39			ENDIF
40
41	cafagna	3.1	DCUTESITR=0.00001
42			DCUTMSITR=0.00001
43			CUTELESITR=0.00001
44			CUTMUOSITR=0.00001
45			STRASITR=0.
46			RETURN
47			END