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
*     -----------------------------------------------------
      parameter (dedx_x_min=70.)
      parameter (dedx_y_min=50.)
*     -----------------------------------------------------
*     number of GOOD strips around MAXS
*     (NB this cut has been removed in track fitting but 
*     not in calibration)
*     -----------------------------------------------------
*      parameter (ngoodstr=1)   
      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			parameter (dedx_x_min=70.)
25			parameter (dedx_y_min=50.)
26			* -----------------------------------------------------
27			* number of GOOD strips around MAXS
28			* (NB this cut has been removed in track fitting but
29			* not in calibration)
30			* -----------------------------------------------------
31			* parameter (ngoodstr=1)
32			parameter (ngoodstr=2)
33
34			* -----------------------------------------------------
35			* first cuts on the parameters determined with
36			* the hough transform, in order to exclude from the
37			* following analysis not physical dublets and triplets
38			* (out of the geometrical acceptance of the apparatus)
39			* -----------------------------------------------------
40			parameter (alfyz1_max=70.7) !Y0
41			parameter (alfyz2_max=0.47) !tg theta-yz (25 deg)
42			parameter (alfxz1_max=80.7) !X0
43			parameter (alfxz2_max=0.47) !tg theta-xz (25 deg)
44			* -----------------------------------------------------
45			* cut on the position of the circle center:
46			* center inside the spectrometer volume is not physical
47			* ==> THE TRIPLET IS REJECTED
48			* -----------------------------------------------------
49			parameter (xclimit=8.) !cm
50
51			* -----------------------------------------------------
52			* Parameter normalization constants, needed to evaluate
53			* distances in parameter space
54			* -----------------------------------------------------
55			parameter (Dalfayz1=0.1689e-2)
56			parameter (Dalfayz2=0.4813e-4)
57			parameter (Dalfaxz1=0.1974e-2)
58			parameter (Dalfaxz2=0.7978e-4)
59			parameter (Dalfaxz3=1.)
60			* -----------------------------------------------------
61			* Cut on normalized distances in parameter space.
62			* Doublets/triplets are recursively included in a cloud
63			* if the distance from any of the points already included
64			* is less than this cut.
65			* -----------------------------------------------------
66			c parameter (cutdistyz=10.) !y0 / tg theta_yz space
67			c parameter (cutdistxz=30.) !x0 / tg theta_xz space
68	pam-fi	1.2	c parameter (cutdistyz=20.) !y0 / tg theta_yz space !(2)
69			c parameter (cutdistxz=60.) !x0 / tg theta_xz space !(2)
70			parameter (cutdistyz=30.) !y0 / tg theta_yz space !(2)
71			parameter (cutdistxz=90.) !x0 / tg theta_xz space !(2)
72	mocchiut	1.1	* (NB deflection is not considered in the selection criteria)
73
74			* --------------------------------------------------
75			* cloud selection
76			* --------------------------------------------------
77			* minimum number of COUPLES required in order to select a cloud
78			c parameter (ncpyz_min=3) !for a straight line
79			c parameter (ncpxz_min=4) !for a circle
80			parameter (ncpyz_min=3) !for a straight line !(2)
81			parameter (ncpxz_min=3) !for a circle !(2)
82			* minimum number of POINTS required in order to select a cloud
83			c parameter (nptyz_min=3) !for a straight line
84			c parameter (nptxz_min=6) !for a circle
85			parameter (nptyz_min=3) !for a straight line !(2)
86			parameter (nptxz_min=3) !for a circle !(2)
87			* minimum number of PLANES required in order to select a cloud
88			c parameter (nplyz_min=3) !for a straight line
89			c parameter (nplxz_min=4) !for a circle
90			parameter (nplyz_min=3) !for a straight line !(2)
91			parameter (nplxz_min=3) !for a circle !(2)
92			* --------------------------------------------------
93
94			* -----------------------------------------------------
95			* minimum number of matching couples required to combine
96			* XZ-YZ clouds and perform the fit
97			* -----------------------------------------------------
98			c parameter (ncpok=4)
99			parameter (ncpok=3) !(2)
100
101			* -----------------------------------------------------
102			* maximum value of deflection from Hough transform
103			* accepted in order to perform the track fit
104			* -----------------------------------------------------
105			c parameter (defmax=10.) !GV-1
106			c parameter (defmax=10000.) !GV-1
107			parameter (defmax=25.) !GV-1
108
109			* -----------------------------------------------------
110			* cut to include new couple or single clusters in the
111			* track fitting, after the first fit
112			* -----------------------------------------------------
113			c parameter (clinc=4)
114			c parameter (clinc=6)
115			parameter (clinc=10)
116
117