Fix for definitions for CINT
[u/mrichter/AliRoot.git] / TEvtGen / EvtGenModels / EvtTauScalarnu.cpp
1 //--------------------------------------------------------------------------
2 //
3 // Environment:
4 //      This software is part of the EvtGen package developed jointly
5 //      for the BaBar and CLEO collaborations.  If you use all or part
6 //      of it, please give an appropriate acknowledgement.
7 //
8 // Copyright Information: See EvtGen/COPYRIGHT
9 //      Copyright (C) 1998      Caltech, UCSB
10 //
11 // Module: EvtTauScalarnu.cc
12 //
13 // Description: The leptonic decay of the tau meson.
14 //              E.g., tau- -> e- nueb nut
15 //
16 // Modification history:
17 //
18 //    RYD       January 17, 1997       Module created
19 //
20 //------------------------------------------------------------------------
21 //
22 #include "EvtGenBase/EvtPatches.hh"
23 #include <stdlib.h>
24 #include <iostream>
25 #include <string>
26 #include "EvtGenBase/EvtParticle.hh"
27 #include "EvtGenBase/EvtPDL.hh"
28 #include "EvtGenBase/EvtGenKine.hh"
29 #include "EvtGenModels/EvtTauScalarnu.hh"
30 #include "EvtGenBase/EvtDiracSpinor.hh"
31 #include "EvtGenBase/EvtReport.hh"
32 #include "EvtGenBase/EvtVector4C.hh"
33
34 EvtTauScalarnu::~EvtTauScalarnu() {}
35
36 std::string EvtTauScalarnu::getName(){
37
38   return "TAUSCALARNU";     
39
40 }
41
42
43 EvtDecayBase* EvtTauScalarnu::clone(){
44
45   return new EvtTauScalarnu;
46
47 }
48
49 void EvtTauScalarnu::init(){
50
51   // check that there are 0 arguments
52   checkNArg(0);
53   checkNDaug(2);
54
55   checkSpinParent(EvtSpinType::DIRAC);
56
57   checkSpinDaughter(0,EvtSpinType::SCALAR);
58   checkSpinDaughter(1,EvtSpinType::NEUTRINO);
59
60 }
61
62 void EvtTauScalarnu::initProbMax(){
63
64   setProbMax(90.0);
65
66 }
67
68 void EvtTauScalarnu::decay(EvtParticle *p){
69
70   static EvtId TAUM=EvtPDL::getId("tau-");
71   p->initializePhaseSpace(getNDaug(),getDaugs());
72   
73   EvtParticle *nut;
74   nut = p->getDaug(1);
75   EvtVector4R momscalar = p->getDaug(0)->getP4();
76  
77   EvtVector4C tau1, tau2;
78   
79   if (p->getId()==TAUM) {
80     tau1=EvtLeptonVACurrent(nut->spParentNeutrino(),p->sp(0));
81     tau2=EvtLeptonVACurrent(nut->spParentNeutrino(),p->sp(1));
82   }
83   else{
84     tau1=EvtLeptonVACurrent(p->sp(0),nut->spParentNeutrino());
85     tau2=EvtLeptonVACurrent(p->sp(1),nut->spParentNeutrino());
86   }
87   
88   vertex(0,tau1*momscalar);
89   vertex(1,tau2*momscalar);
90
91   return;
92
93 }
94