/[PAMELA software]/DarthVader/TrackerLevel2/inc/F77/common_momanhough.f
ViewVC logotype

Diff of /DarthVader/TrackerLevel2/inc/F77/common_momanhough.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by pam-fi, Fri Oct 27 16:08:18 2006 UTC revision 1.6 by pam-fi, Tue Nov 7 15:55:10 2006 UTC
# Line 34  c      parameter (nclstrmax_level2=5*npl Line 34  c      parameter (nclstrmax_level2=5*npl
34  *     (only to dimension the vectors)  *     (only to dimension the vectors)
35  c      parameter (ncouplemax=2*(nclstrmax_level2/nplanes)**2)  c      parameter (ncouplemax=2*(nclstrmax_level2/nplanes)**2)
36  c      parameter (ncouplemaxtot=ncouplemax*nplanes)  c      parameter (ncouplemaxtot=ncouplemax*nplanes)
37         parameter (ncouplemax=nclustermax*nclustermax)         parameter (ncouplemax    = nclustermax*nclustermax)
38         parameter (ncouplemaxtot=ncouplemax*nplanes)         parameter (ncouplemaxtot = ncouplemax*nplanes)
39  *     -----------------------------------------------------------  *     -----------------------------------------------------------
40  *     maximum number of STORED couples  *     maximum number of STORED couples
41  *     (if the identified couples exceeds this number the  *     (if the identified couples exceeds this number the
# Line 43  c      parameter (ncouplemaxtot=ncouplem Line 43  c      parameter (ncouplemaxtot=ncouplem
43  *     tagged as not good)  *     tagged as not good)
44  c      parameter (ncp_max=10*nplanes)  c      parameter (ncp_max=10*nplanes)
45  c      parameter (ncp_max=10*nplanes)  c      parameter (ncp_max=10*nplanes)
46        parameter (ncp_max=ncouplemaxtot)  c      parameter (ncp_max        = ncouplemaxtot)
47    
48    
49    
# Line 51  c      parameter (ncp_max=10*nplanes) Line 51  c      parameter (ncp_max=10*nplanes)
51  *     mask of views  *     mask of views
52  *     0 = ok  *     0 = ok
53  *     1 = n.clusters > nclustermax  *     1 = n.clusters > nclustermax
54    *     2 = n.couples  > ncouplemax
55    *     3 = n.doublets > ndblt_max
56    *     4 = n.triplets > ntrpt_max
57    *     5 = n.clouds yz > ncloyz_max
58    *     6 = n.clouds xz > ncloxz_max
59    *     7 = n.track candidates > NTRACKSMAX
60        integer mask_view(nviews)        integer mask_view(nviews)
61        common/maskview/mask_view        common/maskview/mask_view
62    
# Line 393  c$$$ Line 399  c$$$
399  *     maximum value of deflection from Hough transform  *     maximum value of deflection from Hough transform
400  *     accepted in order to perform the track fit  *     accepted in order to perform the track fit
401  *     -----------------------------------------------------  *     -----------------------------------------------------
402        parameter (defmax=10000.) !GV-1  c      parameter (defmax=10000.) !GV-1
403          parameter (defmax=100.) !GV-1
404    
405  *     -----------------------------------------------------  *     -----------------------------------------------------
406  *     cut to include new couple or single clusters in the  *     cut to include new couple or single clusters in the
407  *     track fitting, after the first fit  *     track fitting, after the first fit
408  *     -----------------------------------------------------  *     -----------------------------------------------------
409        parameter (clinc=10)        parameter (clinc=3)
410    
411    
412    
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.23