43{
46
48
50 JRange_t T_GeV;
52 bool use_numerical;
53 string lepton;
54 double A;
55 double Z;
56 string option;
57 double precision;
59
60 try {
61
62 JParser<> zap(
"Program to determine the energy loss due to visible delta-rays.");
63
66 zap[
'N'] =
make_field(use_numerical,
"perform numeric integration");
67 zap[
'T'] =
make_field(T_GeV,
"kinetic energy range of electron [GeV]") = JRange_t();
68 zap[
'L'] =
make_field(lepton) = muon, tau, positron, electron;
69 zap[
'A'] =
make_field(A,
"atomic mass") = 18.0;
70 zap[
'Z'] =
make_field(Z,
"atomic number") = 10.0;
74
75 zap(argc, argv);
76 }
77 catch(const exception &error) {
78 FATAL(error.what() << endl);
79 }
80
81 if (option.find('R') == string::npos) { option += 'R'; }
82 if (option.find('S') == string::npos) { option += 'S'; }
84
85 double MASS_LEPTON;
86
87 if (lepton == muon)
88 MASS_LEPTON = MASS_MUON;
89 else if (lepton == tau)
90 MASS_LEPTON = MASS_TAU;
91 else if (lepton == positron)
92 MASS_LEPTON = MASS_ELECTRON;
93 else if (lepton == electron)
94 MASS_LEPTON = MASS_ELECTRON;
95 else
96 FATAL(
"Invalid lepton " << lepton << endl);
97
98 const double Tmin = (T_GeV.is_valid() ?
99 T_GeV.constrain(JDeltaRays::getTmin()) : JDeltaRays::getTmin());
100
102
103 const double xmin = -3.00;
104 const double xmax = +9.25;
105
106 TH1D h0("h0", NULL, 320, xmin, xmax);
107 TH1D h1("h1", NULL, 320, xmin, xmax);
108
109 for (int i = 1; i <= h0.GetNbinsX(); ++i) {
110
111 const double x = h0.GetBinCenter(i);
112 const double E =
pow(10.0,x);
113
114 double Tmax = (lepton != electron ?
115 JDeltaRays::getTmax (E, MASS_LEPTON) :
116 0.5 * getKineticEnergy(E, MASS_ELECTRON));
117
118 if (T_GeV.is_valid()) { Tmax = T_GeV.constrain(Tmax); }
119
120 double dEdx = 0.0;
121 double dNdx = 0.0;
122
124
125 const double gamma = E / MASS_LEPTON;
126 const double beta = sqrt((1.0 + 1.0/gamma) * (1 - 1.0/gamma));
127
129
130 dEdx = JDeltaRays::getEnergyLoss(E, MASS_LEPTON, Tmin, Tmax, Z, A, F,
numberOfPoints) * 1.0e3;
131 dNdx = JDeltaRays::getCount (E, MASS_LEPTON, Tmin, Tmax, Z, A, F,
numberOfPoints);
132
133 } else {
134
135 dEdx = JDeltaRays::getEnergyLoss(E, MASS_LEPTON, Tmin, Tmax, Z, A) * 1.0e3;
136 dNdx = JDeltaRays::getCount (E, MASS_LEPTON, Tmin, Tmax, Z, A);
137 }
138
142 DEBUG(
"dE/dx [MeV g^-1 cm^2] " <<
FIXED(5,4) << dEdx << endl);
143 DEBUG(
"dE/dx [g^-1 cm^2] " <<
FIXED(5,2) << dNdx << endl);
144
145 h0.SetBinContent(i, dEdx);
146 h1.SetBinContent(i, dNdx);
147 }
148
149 if (use_numerical) {
150
151 TF1 f1("f1", "[0] + [1]*x + [2]*x*x + [3]*x*x*x");
152
153 if (option.find('W') == string::npos) {
154 option += "W";
155 }
156
157 f1.SetParameter(0, h0.GetMinimum());
158 f1.SetParameter(1, (h0.GetMaximum() - h0.GetMinimum()) / (h0.GetXaxis()->GetXmax() - h0.GetXaxis()->GetXmin()));
159 f1.SetParameter(2, 0.0);
160 f1.SetParameter(3, 0.0);
161
162 f1.SetLineColor(kRed);
163
164
165
166 const TFitResultPtr
result = h0.Fit(&f1, option.c_str(),
"same", xmin, xmax);
167
168 cout <<
"chi2/NDF " <<
result->Chi2() <<
'/' <<
result->Ndf() << endl;
169
170 cout << "\t// " << lepton << endl;
171 cout << "\t// dE/dX = a + bx + cx^2 + dx^3; // [MeV g^-1 cm^2]; x = log10(E/GeV);" << endl;
172
173 for (int i = 0; i != 4; ++i) {
174 cout <<
"\tstatic const double " << (char) (
'a' + i) <<
" = " <<
SCIENTIFIC(10,3) << f1.GetParameter(i) <<
";" << endl;
175 }
176
177 double Emin = 1 * MASS_LEPTON;
178 double Emax = 5 * MASS_LEPTON;
179
180 for (double E = 0.5 * (Emin + Emax); ; E = 0.5 * (Emin + Emax)) {
181
182 const double Tmax = JDeltaRays::getTmax(E, MASS_LEPTON);
183
184 if (fabs(Tmax - Tmin) < precision) {
185 cout <<
"\tstatic const double Emin = " <<
FIXED(7,5) << E <<
"; // [GeV]" << endl;
186 break;
187 }
188
189 if (Tmax > Tmin)
190 Emax = E;
191 else
192 Emin = E;
193 }
194 }
195
196 out.Write();
197 out.Close();
198}
#define DEBUG(A)
Message macros.
#define make_field(A,...)
macro to convert parameter to JParserTemplateElement object
Utility class to parse command line options.
T pow(const T &x, const double y)
Power .
This name space includes all other name spaces (except KM3NETDAQ, KM3NET and ANTARES).
Auxiliary data structure for floating point format specification.
Auxiliary data structure for floating point format specification.