26{
29
30 typedef JToken<
';'> JToken_t;
32
34 string inputFile;
35 string formula;
37 Int_t numberOfEvents;
38 string title;
42 bool sumw2;
44
45 try {
46
47 JParser<> zap(
"Program to create TH2D and fill according given formula.");
48
60
61 zap(argc, argv);
62 }
63 catch(const exception &error) {
64 FATAL(error.what() << endl);
65 }
66
67
68 if ((formula != "" && inputFile != "") ||
69 (formula == "" && inputFile == "")) {
70 FATAL(
"Specify input file or formula." << endl);
71 }
72
73
75
76 const string::size_type pos = title.rfind('/');
77
78 if (pos != string::npos) {
79
80 const string dir = title.substr(0, pos);
81
82 out.mkdir(dir.c_str());
83 out.cd (dir.c_str());
84
85 title = title.substr(pos + 1);
86 }
87
88 TH3D h0(title.c_str(), NULL,
92
93 if (formula != "") {
94
95 TF3
f3(
"f3", formula.c_str());
96
97 for (vector<JToken_t>::const_iterator i = parameters.begin(); i != parameters.end(); ++i) {
98 f3.FixParameter(getParameter(*i),
getValue(*i));
99 }
100
101 if (numberOfEvents > 0) {
102
103 h0.Sumw2();
104 h0.FillRandom(
f3.GetName(), numberOfEvents);
105
106 } else {
107
108 for (Int_t ix = 1; ix <= h0.GetXaxis()->GetNbins(); ++ix) {
109 for (Int_t iy = 1; iy <= h0.GetYaxis()->GetNbins(); ++iy) {
110 for (Int_t iz = 1; iz <= h0.GetZaxis()->GetNbins(); ++iz) {
111
112 h0.SetBinContent(ix, iy, iz,
f3.Eval(h0.GetXaxis()->GetBinCenter(ix),
113 h0.GetYaxis()->GetBinCenter(iy),
114 h0.GetZaxis()->GetBinCenter(iz)));
115 }
116 }
117 }
118 }
119 } else if (inputFile != "") {
120
121 if (sumw2) {
122 h0.Sumw2();
123 }
124
125 ifstream in(inputFile.c_str());
126
127 for (
double x, y, z; in >>
x >>
y >> z; ) {
128 h0.Fill(x, y, z);
129 }
130
131 in.close();
132 }
133
134 out.Write();
135 out.Close();
136}
#define make_field(A,...)
macro to convert parameter to JParserTemplateElement object
double f3(const double x, const double y, const double z)
3D function.
Wrapper class around string.
Utility class to parse command line options.
double getValue(const JScale_t scale)
Get numerical value corresponding to scale.
This name space includes all other name spaces (except KM3NETDAQ, KM3NET and ANTARES).
Empty structure for specification of parser element that is initialised (i.e. does not require input)...