/home/bes3soft/bes3soft/Boss/7.0.2/dist/7.0.2/Generator/BesEvtGen/BesEvtGen-00-03-58/src/EvtGen/EvtGenModels/EvtTauScalarnu.cc

Go to the documentation of this file.
00001 //--------------------------------------------------------------------------
00002 //
00003 // Environment:
00004 //      This software is part of the EvtGen package developed jointly
00005 //      for the BaBar and CLEO collaborations.  If you use all or part
00006 //      of it, please give an appropriate acknowledgement.
00007 //
00008 // Copyright Information: See EvtGen/COPYRIGHT
00009 //      Copyright (C) 1998      Caltech, UCSB
00010 //
00011 // Module: EvtTauScalarnu.cc
00012 //
00013 // Description: The leptonic decay of the tau meson.
00014 //              E.g., tau- -> e- nueb nut
00015 //
00016 // Modification history:
00017 //
00018 //    RYD       January 17, 1997       Module created
00019 //
00020 //------------------------------------------------------------------------
00021 //
00022 #include "EvtGenBase/EvtPatches.hh"
00023 #include <stdlib.h>
00024 #include <iostream>
00025 #include <string>
00026 #include "EvtGenBase/EvtParticle.hh"
00027 #include "EvtGenBase/EvtPDL.hh"
00028 #include "EvtGenBase/EvtGenKine.hh"
00029 #include "EvtGenModels/EvtTauScalarnu.hh"
00030 #include "EvtGenBase/EvtDiracSpinor.hh"
00031 #include "EvtGenBase/EvtReport.hh"
00032 #include "EvtGenBase/EvtVector4C.hh"
00033 
00034 EvtTauScalarnu::~EvtTauScalarnu() {}
00035 
00036 void EvtTauScalarnu::getName(std::string& model_name){
00037 
00038   model_name="TAUSCALARNU";     
00039 
00040 }
00041 
00042 
00043 EvtDecayBase* EvtTauScalarnu::clone(){
00044 
00045   return new EvtTauScalarnu;
00046 
00047 }
00048 
00049 void EvtTauScalarnu::init(){
00050 
00051   // check that there are 0 arguments
00052   checkNArg(0);
00053   checkNDaug(2);
00054 
00055   checkSpinParent(EvtSpinType::DIRAC);
00056 
00057   checkSpinDaughter(0,EvtSpinType::SCALAR);
00058   checkSpinDaughter(1,EvtSpinType::NEUTRINO);
00059 
00060 }
00061 
00062 void EvtTauScalarnu::initProbMax(){
00063 
00064   setProbMax(90.0);
00065 
00066 }
00067 
00068 void EvtTauScalarnu::decay(EvtParticle *p){
00069 
00070   static EvtId TAUM=EvtPDL::getId("tau-");
00071   p->initializePhaseSpace(getNDaug(),getDaugs());
00072   
00073   EvtParticle *nut;
00074   nut = p->getDaug(1);
00075   EvtVector4R momscalar = p->getDaug(0)->getP4();
00076  
00077   EvtVector4C tau1, tau2;
00078   
00079   if (p->getId()==TAUM) {
00080     tau1=EvtLeptonVACurrent(nut->spParentNeutrino(),p->sp(0));
00081     tau2=EvtLeptonVACurrent(nut->spParentNeutrino(),p->sp(1));
00082   }
00083   else{
00084     tau1=EvtLeptonVACurrent(p->sp(0),nut->spParentNeutrino());
00085     tau2=EvtLeptonVACurrent(p->sp(1),nut->spParentNeutrino());
00086   }
00087   
00088   vertex(0,tau1*momscalar);
00089   vertex(1,tau2*momscalar);
00090 
00091   return;
00092 
00093 }
00094 

Generated on Tue Nov 29 23:12:23 2016 for BOSS_7.0.2 by  doxygen 1.4.7