FairRoot/PandaRoot
PndJPsiPhi.C
Go to the documentation of this file.
1 // $Id: PndJPsiPhi.C,v 1.4 2003/07/15 12:03:58 carsten Exp $
2 //
3 // C.Schwarz, GSI, Darmstadt, Germany. 2-Apr-2003
4 //
5 // Macro for the PANDA event generator. It samples the reaction
6 // pbar + p --> J/psi + phi at 8.5 GeV
7 //
8 // modified by A.Galoyan
9 
10 {
11  // load shared libraries
12  gROOT->Reset();
13  gSystem->Load("libPhysics.so");
14  gSystem->Load("libEG.so");
15  gSystem->Load("lib/libPndJRGen.so");
16 
17 
18  // define beam - target system
19 
20  if (!(TDatabasePDG::Instance())->GetParticle(999))
21  (TDatabasePDG::Instance())->AddParticle("BeamTarget",
22  "Title",
23  4.0,
24  0,
25  4.0,
26  0,
27  "Unknown",
28  999);
29 
30  Int_t array[2]={443,333}; // J/psi phi
31  ((TDatabasePDG::Instance())->GetParticle(999))
32  -> AddDecayChannel(1, 1.0, 2, array);
33 
34  TLorentzVector Vertex, Beam, Target, s;
35  Beam. SetXYZM(0.,0.,8.5,((TDatabasePDG::Instance())
36  -> GetParticle(-2212)) -> Mass());
37  Target.SetXYZM(0.,0.,0.0,((TDatabasePDG::Instance())
38  -> GetParticle( 2212)) -> Mass());
39  s = Beam+Target;
40 
41  // mean location of the target
42  Vertex.SetXYZT(0,0,0,0); // zero by default
43 
44  // smearing of the primary vertex (Gauss with the above mean, and this sigma)
45  //TVector3 VtxRes(.1,.1,.2); // what target smearing do you want???
46  TVector3 VtxRes(0,0,0);
47  TParticle BeamTarget(999,1,0,0,0,0,s,Vertex);
48 
49  PndReaction reaction( BeamTarget, VtxRes, "Gen_JPsiPhi.root");
50 
51  reaction.Loop(10001);
52 
53 }
54 // $Log: PndJPsiPhi.C,v $
55 // Revision 1.4 2003/07/15 12:03:58 carsten
56 // 100000 evts
57 //
58 // Revision 1.3 2003/04/10 09:20:07 carsten
59 // direct definition of J/psi phi
60 //
61 // Revision 1.2 2003/04/01 15:33:50 carsten
62 // added log
63 //
PndReaction reaction(BeamTarget, VtxRes,"Gen_2K02Pi0.root")
TLorentzVector s
Definition: Pnd2DStar.C:50
TFile * Target
Definition: hadd.C:35
TLorentzVector Vertex
Definition: Pnd2DStar.C:50
TParticle BeamTarget(999, 1, 0, 0, 0, 0, s, Vertex)
Beam SetXYZM(0., 0., 8,((TDatabasePDG::Instance()) -> GetParticle(-2212)) -> Mass())
TLorentzVector Beam
Definition: Pnd2DStar.C:50
TVector3 VtxRes(.1,.1,.2)