Changes for Root6 (Mikolaj)
[u/mrichter/AliRoot.git] / THbtp / common_histograms.inc
1 CCC   common/histograms/
2 C
3 C     This common block includes the following data:
4 C
5 C          o One- and Two-Body Histograms:
6 C   
7 C            One-Body:  hist1* - Originally filled and updated after each
8 C                                iteration where Chi-Square is improved.
9 C                       htmp1* - Working copy used within the track adjustment
10 C                                iteration loop
11 C                       href1* - Fixed reference distributions obtained from
12 C                                event text input file for all events.
13 C                       hinc1* - Inclusive event sum of all final, fitted
14 C                                one-body distributions
15 C
16 C                                (*) denotes pt,phi,eta and PID#1,2
17 C                                NOTE: The pt,phi,eta distributions are
18 C                                      projections of the full, 3D dist.
19 C                                      onto these axes.
20 C
21 C            Two-Body:  hist* - Originally filled and updated after each
22 C                               iteration where Chi-Square is improved.
23 C                       htmp* - Working copy used within the track adjustment
24 C                               iteration loop
25 C                       href* - Fixed reference distributions obtained from
26 C                               event text input file for all events.
27 C                       hinc* - Inclusive event sum of all final, fitted
28 C                               two-body distributions
29 C
30 C                               (*) denotes arrays for the following:
31 C                                   - Like pairs,   1D distributions
32 C                                   - Unlike pairs, 1D distributions           
33 C                                   - Like pairs,   3D dist., Fine Mesh
34 C                                   - Unlike pairs, 3D dist., Fine Mesh
35 C                                   - Like pairs,   3D dist., Coarse Mesh
36 C                                   - Unlike pairs, 3D dist., Coarse Mesh
37
38       integer*4 max_h_1d, max_h_3d
39       parameter (max_h_1d = 100)
40       parameter (max_h_3d = 10 )
41
42       common/histograms/
43      1 hist1_pt_1(max_h_1d),hist1_phi_1(max_h_1d),hist1_eta_1(max_h_1d),
44      2 hist1_pt_2(max_h_1d),hist1_phi_2(max_h_1d),hist1_eta_2(max_h_1d),
45      3 htmp1_pt_1(max_h_1d),htmp1_phi_1(max_h_1d),htmp1_eta_1(max_h_1d),
46      4 htmp1_pt_2(max_h_1d),htmp1_phi_2(max_h_1d),htmp1_eta_2(max_h_1d),
47      5 href1_pt_1(max_h_1d),href1_phi_1(max_h_1d),href1_eta_1(max_h_1d),
48      6 href1_pt_2(max_h_1d),href1_phi_2(max_h_1d),href1_eta_2(max_h_1d),
49      7 hinc1_pt_1(max_h_1d),hinc1_phi_1(max_h_1d),hinc1_eta_1(max_h_1d),
50      8 hinc1_pt_2(max_h_1d),hinc1_phi_2(max_h_1d),hinc1_eta_2(max_h_1d),
51      9 hist_like_1d(max_h_1d),hist_unlike_1d(max_h_1d),
52      1 htmp_like_1d(max_h_1d),htmp_unlike_1d(max_h_1d),
53      2 href_like_1d(max_h_1d),href_unlike_1d(max_h_1d),
54      3 hinc_like_1d(max_h_1d),hinc_unlike_1d(max_h_1d),
55      4 hist_like_3d_fine(max_h_3d,max_h_3d,max_h_3d),
56      5 hist_unlike_3d_fine(max_h_3d,max_h_3d,max_h_3d),
57      6 hist_like_3d_coarse(max_h_3d,max_h_3d,max_h_3d),
58      7 hist_unlike_3d_coarse(max_h_3d,max_h_3d,max_h_3d),
59      4 htmp_like_3d_fine(max_h_3d,max_h_3d,max_h_3d),
60      5 htmp_unlike_3d_fine(max_h_3d,max_h_3d,max_h_3d),
61      6 htmp_like_3d_coarse(max_h_3d,max_h_3d,max_h_3d),
62      7 htmp_unlike_3d_coarse(max_h_3d,max_h_3d,max_h_3d),
63      4 href_like_3d_fine(max_h_3d,max_h_3d,max_h_3d),
64      5 href_unlike_3d_fine(max_h_3d,max_h_3d,max_h_3d),
65      6 href_like_3d_coarse(max_h_3d,max_h_3d,max_h_3d),
66      7 href_unlike_3d_coarse(max_h_3d,max_h_3d,max_h_3d),
67      4 hinc_like_3d_fine(max_h_3d,max_h_3d,max_h_3d),
68      5 hinc_unlike_3d_fine(max_h_3d,max_h_3d,max_h_3d),
69      6 hinc_like_3d_coarse(max_h_3d,max_h_3d,max_h_3d),
70      7 hinc_unlike_3d_coarse(max_h_3d,max_h_3d,max_h_3d)
71
72 CCC   Variable Type Declarations:
73
74 CCC   One-Body Distributions:
75
76       integer*4 hist1_pt_1,hist1_phi_1,hist1_eta_1
77       integer*4 hist1_pt_2,hist1_phi_2,hist1_eta_2
78       integer*4 htmp1_pt_1,htmp1_phi_1,htmp1_eta_1
79       integer*4 htmp1_pt_2,htmp1_phi_2,htmp1_eta_2
80       integer*4 href1_pt_1,href1_phi_1,href1_eta_1
81       integer*4 href1_pt_2,href1_phi_2,href1_eta_2
82       integer*4 hinc1_pt_1,hinc1_phi_1,hinc1_eta_1
83       integer*4 hinc1_pt_2,hinc1_phi_2,hinc1_eta_2
84
85 CCC   Two-Body Distributions 1D:
86
87       integer*4 hist_like_1d, hist_unlike_1d
88       integer*4 htmp_like_1d, htmp_unlike_1d
89       integer*4 href_like_1d, href_unlike_1d
90       integer*4 hinc_like_1d, hinc_unlike_1d
91
92 CCC   Two-Body Distributions 3D:
93
94       integer*4 hist_like_3d_fine
95       integer*4 hist_unlike_3d_fine
96       integer*4 hist_like_3d_coarse
97       integer*4 hist_unlike_3d_coarse
98       integer*4 htmp_like_3d_fine
99       integer*4 htmp_unlike_3d_fine
100       integer*4 htmp_like_3d_coarse
101       integer*4 htmp_unlike_3d_coarse
102       integer*4 href_like_3d_fine
103       integer*4 href_unlike_3d_fine
104       integer*4 href_like_3d_coarse
105       integer*4 href_unlike_3d_coarse
106       integer*4 hinc_like_3d_fine
107       integer*4 hinc_unlike_3d_fine
108       integer*4 hinc_like_3d_coarse
109       integer*4 hinc_unlike_3d_coarse
110
111 CCC   END common/histograms/