inc/F77/momanhough_init.f

C     Parameter definition for the program 
C
C     momanhough.f
C
C     Author: Vannuccini Elena
C     Date: 2004/2005
C
c------------------------------------------------------------------------
c     CUTS and other parameters
c------------------------------------------------------------------------

c*****************************************************
cccccc 10/9/2005 modified by david fedele  --> (1)
c
cccccc20/10/2005 modified by elena         --> (2)
c     (rilasciati i tagli per la hough transform, 
c      in attesa dell'allineamento delle colonne)
c****************************************************

      PARAMETER (PIGR=3.14)     !159265359)!(1)
*     -----------------------------------------------------
*     cuts on cluster signal
*     -----------------------------------------------------
c      parameter (dedx_x_min=70.)
c      parameter (dedx_y_min=50.)
      parameter (dedx_x_min=0.)
      parameter (dedx_y_min=0.)
*     -----------------------------------------------------
*     number of GOOD strips around MAXS
*     (NB this cut has been removed in track fitting but 
*     not in calibration)
*     now the cut is used to avoid charge correlation
*     for clusters with bad strips
*     -----------------------------------------------------
*      parameter (ngoodstr=1)   
*      parameter (ngoodstr=2)   
      parameter (ngoodstr=2)   

*     -----------------------------------------------------
*     first cuts on the parameters determined with 
*     the hough transform, in order to exclude from the 
*     following analysis not physical dublets and triplets
*     (out of the geometrical acceptance of the apparatus)
*     -----------------------------------------------------
      parameter (alfyz1_max=70.7) !Y0
      parameter (alfyz2_max=0.47) !tg theta-yz (25 deg)
      parameter (alfxz1_max=80.7) !X0
      parameter (alfxz2_max=0.47) !tg theta-xz (25 deg)
*     -----------------------------------------------------
*     cut on the position of the circle center:
*     center inside the spectrometer volume is not physical
*     ==> THE TRIPLET IS REJECTED
*     -----------------------------------------------------
      parameter (xclimit=8.)    !cm

*     -----------------------------------------------------
*     Parameter normalization constants, needed to evaluate
*     distances in parameter space
*     -----------------------------------------------------
      parameter (Dalfayz1=0.1689e-2)
      parameter (Dalfayz2=0.4813e-4)
      parameter (Dalfaxz1=0.1974e-2)
      parameter (Dalfaxz2=0.7978e-4)
      parameter (Dalfaxz3=1.)
*     -----------------------------------------------------
*     Cut on normalized distances in parameter space. 
*     Doublets/triplets are recursively included in a cloud 
*     if the distance from any of the points already included
*     is less than this cut.
*     -----------------------------------------------------
c      parameter (cutdistyz=10.) !y0 / tg theta_yz space
c      parameter (cutdistxz=30.) !x0 / tg theta_xz space
c      parameter (cutdistyz=20.) !y0 / tg theta_yz space   !(2)
c      parameter (cutdistxz=60.) !x0 / tg theta_xz space   !(2)
      parameter (cutdistyz=30.) !y0 / tg theta_yz space   !(2)
      parameter (cutdistxz=90.) !x0 / tg theta_xz space   !(2)
*     (NB deflection is not considered in the selection criteria)

*     --------------------------------------------------
*     cloud selection
*     --------------------------------------------------
*     minimum number of COUPLES required in order to select a cloud
c      parameter (ncpyz_min=3)   !for a straight line
c      parameter (ncpxz_min=4)   !for a circle
      parameter (ncpyz_min=3)   !for a straight line   !(2)
      parameter (ncpxz_min=3)   !for a circle          !(2)
*     minimum number of POINTS required in order to select a cloud
c      parameter (nptyz_min=3)   !for a straight line
c      parameter (nptxz_min=6)   !for a circle
      parameter (nptyz_min=3)   !for a straight line   !(2)
      parameter (nptxz_min=3)   !for a circle          !(2)
*     minimum number of PLANES required in order to select a cloud
c      parameter (nplyz_min=3)   !for a straight line
c      parameter (nplxz_min=4)   !for a circle
      parameter (nplyz_min=3)   !for a straight line   !(2)
      parameter (nplxz_min=3)   !for a circle          !(2)
*     --------------------------------------------------

*     -----------------------------------------------------
*     minimum number of matching couples required to combine
*     XZ-YZ clouds and perform the fit
*     -----------------------------------------------------
c      parameter (ncpok=4)
      parameter (ncpok=3)       !(2)

*     -----------------------------------------------------
*     maximum value of deflection from Hough transform
*     accepted in order to perform the track fit
*     -----------------------------------------------------
c      parameter (defmax=10.) !GV-1
c      parameter (defmax=10000.) !GV-1
      parameter (defmax=25.)    !GV-1

*     -----------------------------------------------------
*     cut to include new couple or single clusters in the
*     track fitting, after the first fit
*     -----------------------------------------------------
c      parameter (clinc=4)
c      parameter (clinc=6)
      parameter (clinc=10)


1	mocchiut	1.1	C Parameter definition for the program
2			C
3			C momanhough.f
4			C
5			C Author: Vannuccini Elena
6			C Date: 2004/2005
7			C
8			c------------------------------------------------------------------------
9			c CUTS and other parameters
10			c------------------------------------------------------------------------
11
12			c*****************************************************
13			cccccc 10/9/2005 modified by david fedele --> (1)
14			c
15			cccccc20/10/2005 modified by elena --> (2)
16			c (rilasciati i tagli per la hough transform,
17			c in attesa dell'allineamento delle colonne)
18			c****************************************************
19
20			PARAMETER (PIGR=3.14) !159265359)!(1)
21			* -----------------------------------------------------
22			* cuts on cluster signal
23			* -----------------------------------------------------
24	pam-fi	1.3	c parameter (dedx_x_min=70.)
25			c parameter (dedx_y_min=50.)
26			parameter (dedx_x_min=0.)
27			parameter (dedx_y_min=0.)
28	mocchiut	1.1	* -----------------------------------------------------
29			* number of GOOD strips around MAXS
30			* (NB this cut has been removed in track fitting but
31			* not in calibration)
32	pam-fi	1.3	* now the cut is used to avoid charge correlation
33			* for clusters with bad strips
34	mocchiut	1.1	* -----------------------------------------------------
35			* parameter (ngoodstr=1)
36	pam-fi	1.3	* parameter (ngoodstr=2)
37	mocchiut	1.1	parameter (ngoodstr=2)
38
39			* -----------------------------------------------------
40			* first cuts on the parameters determined with
41			* the hough transform, in order to exclude from the
42			* following analysis not physical dublets and triplets
43			* (out of the geometrical acceptance of the apparatus)
44			* -----------------------------------------------------
45			parameter (alfyz1_max=70.7) !Y0
46			parameter (alfyz2_max=0.47) !tg theta-yz (25 deg)
47			parameter (alfxz1_max=80.7) !X0
48			parameter (alfxz2_max=0.47) !tg theta-xz (25 deg)
49			* -----------------------------------------------------
50			* cut on the position of the circle center:
51			* center inside the spectrometer volume is not physical
52			* ==> THE TRIPLET IS REJECTED
53			* -----------------------------------------------------
54			parameter (xclimit=8.) !cm
55
56			* -----------------------------------------------------
57			* Parameter normalization constants, needed to evaluate
58			* distances in parameter space
59			* -----------------------------------------------------
60			parameter (Dalfayz1=0.1689e-2)
61			parameter (Dalfayz2=0.4813e-4)
62			parameter (Dalfaxz1=0.1974e-2)
63			parameter (Dalfaxz2=0.7978e-4)
64			parameter (Dalfaxz3=1.)
65			* -----------------------------------------------------
66			* Cut on normalized distances in parameter space.
67			* Doublets/triplets are recursively included in a cloud
68			* if the distance from any of the points already included
69			* is less than this cut.
70			* -----------------------------------------------------
71			c parameter (cutdistyz=10.) !y0 / tg theta_yz space
72			c parameter (cutdistxz=30.) !x0 / tg theta_xz space
73	pam-fi	1.2	c parameter (cutdistyz=20.) !y0 / tg theta_yz space !(2)
74			c parameter (cutdistxz=60.) !x0 / tg theta_xz space !(2)
75			parameter (cutdistyz=30.) !y0 / tg theta_yz space !(2)
76			parameter (cutdistxz=90.) !x0 / tg theta_xz space !(2)
77	mocchiut	1.1	* (NB deflection is not considered in the selection criteria)
78
79			* --------------------------------------------------
80			* cloud selection
81			* --------------------------------------------------
82			* minimum number of COUPLES required in order to select a cloud
83			c parameter (ncpyz_min=3) !for a straight line
84			c parameter (ncpxz_min=4) !for a circle
85			parameter (ncpyz_min=3) !for a straight line !(2)
86			parameter (ncpxz_min=3) !for a circle !(2)
87			* minimum number of POINTS required in order to select a cloud
88			c parameter (nptyz_min=3) !for a straight line
89			c parameter (nptxz_min=6) !for a circle
90			parameter (nptyz_min=3) !for a straight line !(2)
91			parameter (nptxz_min=3) !for a circle !(2)
92			* minimum number of PLANES required in order to select a cloud
93			c parameter (nplyz_min=3) !for a straight line
94			c parameter (nplxz_min=4) !for a circle
95			parameter (nplyz_min=3) !for a straight line !(2)
96			parameter (nplxz_min=3) !for a circle !(2)
97			* --------------------------------------------------
98
99			* -----------------------------------------------------
100			* minimum number of matching couples required to combine
101			* XZ-YZ clouds and perform the fit
102			* -----------------------------------------------------
103			c parameter (ncpok=4)
104			parameter (ncpok=3) !(2)
105
106			* -----------------------------------------------------
107			* maximum value of deflection from Hough transform
108			* accepted in order to perform the track fit
109			* -----------------------------------------------------
110			c parameter (defmax=10.) !GV-1
111			c parameter (defmax=10000.) !GV-1
112			parameter (defmax=25.) !GV-1
113
114			* -----------------------------------------------------
115			* cut to include new couple or single clusters in the
116			* track fitting, after the first fit
117			* -----------------------------------------------------
118			c parameter (clinc=4)
119			c parameter (clinc=6)
120			parameter (clinc=10)
121
122