BOSS 7.0.3
BESIII Offline Software System
Loading...
Searching...
No Matches
EvtPhokhara_LLB.cc
Go to the documentation of this file.
1//--------------------------------------------------------------------------
2//
3// Environment:
4// This software is part of models developed at BES collaboration
5// based on the EvtGen framework. If you use all or part
6// of it, please give an appropriate acknowledgement.
7//
8// Copyright Information: See EvtGen/BesCopyright
9// Copyright (A) 2006 Ping Rong-Gang @IHEP
10//
11// Module: EvtPhokhara.cc
12// the necessary file: phokharar.F
13// fist.inc,gen.inc mix.inc stdhep.inc
14// Description: Modified Lund model at tau-charm energy level, see
15// PHYSICAL REVIEW D, VOLUME 62, 034003
16// Modification history:
17//
18// Ping R.-G. Jan.25, 2010 Module created
19// The random engine RLU0 is unified with RLU for BesEvtGen
20//------------------------------------------------------------------------
21//
22#include "EvtGenBase/EvtPatches.hh"
23#include "EvtGenBase/EvtPatches.hh"
24#include "EvtGenBase/EvtParticle.hh"
25#include "EvtGenBase/EvtStringParticle.hh"
26#include "EvtGenBase/EvtDecayTable.hh"
27#include "EvtGenBase/EvtPDL.hh"
28#include "EvtGenModels/EvtPhokhara_LLB.hh"
29#include "EvtGenModels/EvtPhokharaDef.hh"
30#include "EvtGenBase/EvtReport.hh"
31#include <string>
32#include "EvtGenBase/EvtId.hh"
33#include <iostream>
34#include <iomanip>
35#include <fstream>
36#include <string.h>
37#include <stdlib.h>
38#include <unistd.h>
39#include <stdio.h>
40
41#include "GeneratorObject/McGenEvent.h"
42#include "BesKernel/IBesRndmGenSvc.h"
43#include "CLHEP/Random/RandomEngine.h"
44#include "cfortran/cfortran.h"
45
46using namespace std;
47using namespace CLHEP;
48
49using std::endl;
50using std::fstream;
51using std::ios;
52using std::ofstream;
53using std::resetiosflags;
54using std::setiosflags;
55using std::setw;
56
57int EvtPhokhara_LLB::nevtgen=0;
58int EvtPhokhara_LLB::nphokharadecays=0;
59EvtDecayBasePtr* EvtPhokhara_LLB::phokharadecays=0;
60int EvtPhokhara_LLB::ntable=0;
61
62int EvtPhokhara_LLB::ncommand=0;
63int EvtPhokhara_LLB::lcommand=0;
64std::string* EvtPhokhara_LLB::commands=0;
65int EvtPhokhara_LLB::nevt=0;
66
67EvtPhokhara_LLB::EvtPhokhara_LLB(){}
68EvtPhokhara_LLB::~EvtPhokhara_LLB(){
69 int i;
70 //the deletion of commands is really uggly!
71
72 if (nphokharadecays==0) {
73 delete [] commands;
74 commands=0;
75 return;
76 }
77
78 for(i=0;i<nphokharadecays;i++){
79 if (phokharadecays[i]==this){
80 phokharadecays[i]=phokharadecays[nphokharadecays-1];
81 nphokharadecays--;
82 if (nphokharadecays==0) {
83 delete [] commands;
84 commands=0;
85 }
86 return;
87 }
88 }
89
90 report(ERROR,"EvtGen") << "Error in destroying Phokhara model!"<<endl;
91
92}
93
94
95void EvtPhokhara_LLB::getName(std::string& model_name){
96
97 model_name="PHOKHARA_LLB";
98
99}
100
101EvtDecayBase* EvtPhokhara_LLB::clone(){
102
103 return new EvtPhokhara_LLB;
104
105}
106
107
108void EvtPhokhara_LLB::initProbMax(){
109
110 noProbMax();
111
112}
113
114
115void EvtPhokhara_LLB::init_mode(EvtParticle* p){
116 m_pion=9;
117 // mu+mu-(0),pi+pi-(1),2pi0pi+pi-(2),
118 // 2pi+2pi-(3),ppbar(4),nnbar(5),
119 // K+K-(6),K0K0bar(7),pi+pi-pi0(8),
120 // Lamb Lambbar->pi-pi+ppbar(9)
121#include "Phokhara_init_mode.txt"
122}
123
124
125
126void EvtPhokhara_LLB::init(){
127 checkNArg(0);
128
129 std::string locvp=getenv("BESEVTGENROOT");
130 system("cat $BESEVTGENROOT/share/phokhara_9.1.param>phokhara_9.1.param");
131 system("cat $BESEVTGENROOT/share/phokhara_9.1.fferr>phokhara_9.1.fferr");
132 system("cat $BESEVTGENROOT/share/phokhara_9.1.ffwarn>phokhara_9.1.ffwarn");
133
134
135 if (getParentId().isAlias()){
136
137 report(ERROR,"EvtGen") << "EvtPhokhara finds that you are decaying the"<<endl
138 << " aliased particle "
139 << EvtPDL::name(getParentId()).c_str()
140 << " with the Phokhara model"<<endl
141 << " this does not work, please modify decay table."
142 << endl;
143 report(ERROR,"EvtGen") << "Will terminate execution!"<<endl;
144 ::abort();
145
146 }
147
148 store(this);
149
150}
151
152
153std::string EvtPhokhara_LLB::commandName(){
154
155 return std::string("PhokharaPar");
156
157}
158
159void EvtPhokhara_LLB::command(std::string cmd){
160
161 if (ncommand==lcommand){
162
163 lcommand=10+2*lcommand;
164
165 std::string* newcommands=new std::string[lcommand];
166
167 int i;
168
169 for(i=0;i<ncommand;i++){
170 newcommands[i]=commands[i];
171 }
172
173 delete [] commands;
174
175 commands=newcommands;
176
177 }
178
179 commands[ncommand]=cmd;
180
181 ncommand++;
182
183}
184
185
186
187void EvtPhokhara_LLB::decay( EvtParticle *p){
188 EvtId myvpho=EvtPDL::getId("vpho");
189 if(p->getId()!=myvpho) {std::cout<<"Parent particle is required to be vpho for Phokhara model"<<std::endl;abort();}
190 if(nevtgen==0) {init_mode(p);}
191 //else{init_evt(p);}
192 else{init_mode(p);}
193
194 std::cout<<"PHOKHARA : Lambda anti-Lambda mode "<<std::endl;
195
196 int istdheppar=EvtPDL::getStdHep(p->getId());
197 int ntrials = 0;
198 int tr_old[3];
199 tr_old[0] = (int)maxima_.tr[0];
200 tr_old[1] = (int)maxima_.tr[1];
201 tr_old[2] = (int)maxima_.tr[2];
202
203 while( ntrials < 1000000)
204 {
205 ievent++;
206 RANLXDF(Ar_r,1);
207 Ar[1] = Ar_r[0];
208
209 if (Ar[1] <= (maxima_.Mmax[0]/(maxima_.Mmax[0]+maxima_.Mmax[1]+maxima_.Mmax[2]))) {
210 maxima_.count[0] = maxima_.count[0]+1.0;
211 GEN_0PH(2,qqmin,ctes_.Sp,cos3min,cos3max);
212 }else
213 if (Ar[1] <= ( (maxima_.Mmax[0]+maxima_.Mmax[1])/(maxima_.Mmax[0]+maxima_.Mmax[1]+maxima_.Mmax[2]))) {
214 maxima_.count[1] = maxima_.count[1]+1.0;
215 GEN_1PH(2,qqmin,qqmax,cos1min,cos1max,cos3min,cos3max);
216 }
217 else {
218 maxima_.count[2] = maxima_.count[2]+1.0;
219 GEN_2PH(2,qqmin,cos1min,cos1max,cos2min,cos2max,cos3min,cos3max);
220 }
221
222 if( ((int)maxima_.tr[0]+(int)maxima_.tr[1]+(int)maxima_.tr[2]) > (tr_old[0]+tr_old[1]+tr_old[2]) ) // event accepted after cuts
223 {
224 goto storedEvents;
225 }
226 ntrials ++;
227 }
228 std::cout <<"FATAL: Could not satisfy cuts after " << ntrials << "trials. Terminate." <<std::endl;
229 //----
230 storedEvents:
231 int more=0;
232 int numstable=0;
233 int numparton=0;
234 EvtId evtnumstable[100];//
235 EvtVector4R p4[20];
236
237 // except ISR photos, products depending on channel
238 if (flags_.pion == 0) { // mu+ mu-
239 // mu+
240 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-13);
241 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
242 numstable++;
243 // mu -
244 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(13);
245 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
246 numstable++;
247 }
248 if (flags_.pion == 1) { // pi+ pi-
249 // pi+
250 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(211);
251 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
252 numstable++;
253 // pi -
254 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-211);
255 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
256 numstable++;
257 }
258 if (flags_.pion == 2) { // pi+ pi-2pi0
259 // pi0
260 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(111);
261 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
262 numstable++;
263 // pi0
264 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(111);
265 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
266 numstable++;
267 // pi-
268 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-211);
269 p4[numstable].set(ctes_.momenta[0][7],ctes_.momenta[1][7], ctes_.momenta[2][7], ctes_.momenta[3][7]);
270 numstable++;
271 // pi +
272 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(211);
273 p4[numstable].set(ctes_.momenta[0][8],ctes_.momenta[1][8], ctes_.momenta[2][8], ctes_.momenta[3][8]);
274 numstable++;
275 }
276 if (flags_.pion == 3) { // 2(pi+ pi-)
277 // pi+
278 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(211);
279 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
280 numstable++;
281 // pi-
282 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-211);
283 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
284 numstable++;
285 // pi+
286 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-211);
287 p4[numstable].set(ctes_.momenta[0][7],ctes_.momenta[1][7], ctes_.momenta[2][7], ctes_.momenta[3][7]);
288 numstable++;
289 // pi -
290 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(211);
291 p4[numstable].set(ctes_.momenta[0][8],ctes_.momenta[1][8], ctes_.momenta[2][8], ctes_.momenta[3][8]);
292 numstable++;
293 }
294 if (flags_.pion == 4) { // ppbar
295 // pbar
296 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-2212);
297 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
298 numstable++;
299 // p
300 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(2212);
301 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
302 numstable++;
303 }
304 if (flags_.pion == 5) { // nnbar
305 // pbar
306 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-2112);
307 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
308 numstable++;
309 // p
310 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(2112);
311 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
312 numstable++;
313 }
314 if (flags_.pion == 6) { // K+ K-
315 // K+
316 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(321);
317 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
318 numstable++;
319 // K -
320 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-321);
321 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
322 numstable++;
323 }
324 if (flags_.pion == 7) { // K0K0bar
325 // Kbar
326 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(311);
327 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
328 numstable++;
329 // K0
330 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-311);
331 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
332 numstable++;
333 }
334 if (flags_.pion == 8) { // pi+ pi-pi0
335 // pi+
336 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(211);
337 p4[numstable].set(ctes_.momenta[0][5],ctes_.momenta[1][5], ctes_.momenta[2][5], ctes_.momenta[3][5]);
338 numstable++;
339 // pi-
340 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-211);
341 p4[numstable].set(ctes_.momenta[0][6],ctes_.momenta[1][6], ctes_.momenta[2][6], ctes_.momenta[3][6]);
342 numstable++;
343 // pi0
344 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(111);
345 p4[numstable].set(ctes_.momenta[0][7],ctes_.momenta[1][7], ctes_.momenta[2][7], ctes_.momenta[3][7]);
346 numstable++;
347 }
348 if (flags_.pion == 9) { //Lambda Lambdabar-> pi+ pi- ppbar
349 // pi+
350 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(211);
351 p4[numstable].set(ctes_.momenta[0][7],ctes_.momenta[1][7], ctes_.momenta[2][7], ctes_.momenta[3][7]);
352 numstable++;
353 // pbar
354 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-2212);
355 p4[numstable].set(ctes_.momenta[0][8],ctes_.momenta[1][8], ctes_.momenta[2][8], ctes_.momenta[3][8]);
356 numstable++;
357 // pi-
358 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(-211);
359 p4[numstable].set(ctes_.momenta[0][9],ctes_.momenta[1][9], ctes_.momenta[2][9], ctes_.momenta[3][9]);
360 numstable++;
361 // p
362 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(2212);
363 p4[numstable].set(ctes_.momenta[0][10],ctes_.momenta[1][10], ctes_.momenta[2][10], ctes_.momenta[3][10]);
364 numstable++;
365 }
366
367 // ISR gamma
368 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(22);
369 p4[numstable].set(ctes_.momenta[0][2],ctes_.momenta[1][2], ctes_.momenta[2][2], ctes_.momenta[3][2]);
370 numstable++;
371 if( ctes_.momenta[0][3] != 0 ) // second photon exists
372 {
373 evtnumstable[numstable]=EvtPDL::evtIdFromStdHep(22);
374 p4[numstable].set(ctes_.momenta[0][3],ctes_.momenta[1][3], ctes_.momenta[2][3], ctes_.momenta[3][3]);
375 numstable++;
376 }
377
378 int channel=EvtDecayTable::inChannelList(p->getId(),numstable,evtnumstable);
379 more=(channel!=-1);
380 if(more) {std::cout<<"Existence of mode "<<channel<<" in exclusive decay list has the same final state as this one"<<std::endl;abort(); }
381
382 p->makeDaughters(numstable,evtnumstable);
383 //double weight = p->initializePhaseSpace(getNDaug(),getDaugs());
384
385 int ndaugFound=0;
386 EvtVector4R SUMP4(0,0,0,0);
387 for(int i=0;i<numstable;i++){
388 p->getDaug(i)->init(evtnumstable[i],p4[i]);
389 ndaugFound++;
390 }
391 if ( ndaugFound == 0 ) {
392 report(ERROR,"EvtGen") << "Phokhara has failed to do a decay ";
393 report(ERROR,"EvtGen") << EvtPDL::name(p->getId()).c_str() << " " << p->mass()<<endl;
394 assert(0);
395 }
396
397 nevtgen++;
398 return ;
399
400}
401
402
403
404void EvtPhokhara_LLB::store(EvtDecayBase* jsdecay){
405
406 if (nphokharadecays==ntable){
407
408 EvtDecayBasePtr* newphokharadecays=new EvtDecayBasePtr[2*ntable+10];
409 int i;
410 for(i=0;i<ntable;i++){
411 newphokharadecays[i]=phokharadecays[i];
412 }
413 ntable=2*ntable+10;
414 delete [] phokharadecays;
415 phokharadecays=newphokharadecays;
416 }
417
418 phokharadecays[nphokharadecays++]=jsdecay;
419
420
421
422}
423
424
425void EvtPhokhara_LLB::PhokharaInit(int dummy){
426 static int first=1;
427 if (first){
428
429 first=0;
430 //for(int i=0;i<ncommand;i++)
431 // lugive0_(commands[i].c_str(),strlen(commands[i].c_str()));
432 }
433
434}
435
436
437
438void EvtPhokhara_LLB::init_evt(EvtParticle* p){
439 m_pion=9;
440 // mu+mu-(0),pi+pi-(1),2pi0pi+pi-(2),
441 // 2pi+2pi-(3),ppbar(4),nnbar(5),
442 // K+K-(6),K0K0bar(7),pi+pi-pi0(8),
443 // Lamb Lambbar->pi-pi+ppbar(9)
444#include "Phokhara_init_evt.txt"
445}
446
447
flags_
struct @17 flags_
GEN_1PH
#define GEN_1PH(I, QQMIN, QQMAX, COS1MIN, COS1MAX, COS3MIN, COS3MAX)
Definition: EvtPhokharaDef.hh:100
RANLXDF
#define RANLXDF(AR, VAL)
Definition: EvtPhokharaDef.hh:97
GEN_0PH
#define GEN_0PH(I, QQMIN, SP, COS3MIN, COS3MAX)
Definition: EvtPhokharaDef.hh:106
maxima_
struct @16 maxima_
ctes_
struct @10 ctes_
GEN_2PH
#define GEN_2PH(I, QQMIN, COS1MIN, COS1MAX, COS2MIN, COS2MAX, COS3MIN, COS3MAX)
Definition: EvtPhokharaDef.hh:103
EvtPhokhara_LLB.hh
report
ostream & report(Severity severity, const char *facility)
Definition: EvtReport.cc:36
ERROR
@ ERROR
Definition: EvtReport.hh:49
EvtDecayBase::noProbMax
void noProbMax()
Definition: EvtDecayBase.cc:304
EvtDecayBase::getParentId
EvtId getParentId()
Definition: EvtDecayBase.hh:60
EvtDecayBase::checkNArg
void checkNArg(int a1, int a2=-1, int a3=-1, int a4=-1)
Definition: EvtDecayBase.cc:482
EvtDecayTable::inChannelList
static int inChannelList(EvtId parent, int ndaug, EvtId *daugs)
Definition: EvtDecayTable.cc:795
EvtId
Definition: EvtId.hh:27
EvtPDL::getStdHep
static int getStdHep(EvtId id)
Definition: EvtPDL.hh:56
EvtPDL::evtIdFromStdHep
static EvtId evtIdFromStdHep(int stdhep)
Definition: EvtPDL.cc:244
EvtPDL::name
static std::string name(EvtId i)
Definition: EvtPDL.hh:64
EvtPDL::getId
static EvtId getId(const std::string &name)
Definition: EvtPDL.cc:287
EvtParticle::makeDaughters
void makeDaughters(int ndaug, EvtId *id)
Definition: EvtParticle.cc:1177
EvtParticle::init
virtual void init(EvtId part_n, const EvtVector4R &p4)=0
EvtParticle::getId
EvtId getId() const
Definition: EvtParticle.cc:113
EvtParticle::getDaug
EvtParticle * getDaug(int i)
Definition: EvtParticle.cc:85
EvtParticle::mass
double mass() const
Definition: EvtParticle.cc:127
EvtPhokhara_LLB::init_evt
void init_evt(EvtParticle *p)
Definition: EvtPhokhara_LLB.cc:438
EvtPhokhara_LLB::~EvtPhokhara_LLB
virtual ~EvtPhokhara_LLB()
Definition: EvtPhokhara_LLB.cc:68
EvtPhokhara_LLB::clone
EvtDecayBase * clone()
Definition: EvtPhokhara_LLB.cc:101
EvtPhokhara_LLB::EvtPhokhara_LLB
EvtPhokhara_LLB()
Definition: EvtPhokhara_LLB.cc:67
EvtPhokhara_LLB::commandName
std::string commandName()
Definition: EvtPhokhara_LLB.cc:153
EvtPhokhara_LLB::PhokharaInit
void PhokharaInit(int dummy)
Definition: EvtPhokhara_LLB.cc:425
EvtPhokhara_LLB::decay
void decay(EvtParticle *p)
Definition: EvtPhokhara_LLB.cc:187
EvtPhokhara_LLB::init
void init()
Definition: EvtPhokhara_LLB.cc:126
EvtPhokhara_LLB::getName
void getName(std::string &name)
Definition: EvtPhokhara_LLB.cc:95
EvtPhokhara_LLB::command
void command(std::string cmd)
Definition: EvtPhokhara_LLB.cc:159
EvtPhokhara_LLB::initProbMax
void initProbMax()
Definition: EvtPhokhara_LLB.cc:108
EvtPhokhara_LLB::init_mode
void init_mode(EvtParticle *p)
Definition: EvtPhokhara_LLB.cc:115
EvtVector4R::set
void set(int i, double d)
Definition: EvtVector4R.hh:183