Line data    Source code

       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: EvtTaulnunu.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/EvtTaulnunu.hh"
      30             : #include "EvtGenBase/EvtDiracSpinor.hh"
      31             : #include "EvtGenBase/EvtReport.hh"
      32             : #include "EvtGenBase/EvtVector4C.hh"
      33             : 
      34           0 : EvtTaulnunu::~EvtTaulnunu() {}
      35             : 
      36             : std::string EvtTaulnunu::getName(){
      37             : 
      38           0 :   return "TAULNUNU";     
      39             : 
      40             : }
      41             : 
      42             : 
      43             : EvtDecayBase* EvtTaulnunu::clone(){
      44             : 
      45           0 :   return new EvtTaulnunu;
      46             : 
      47           0 : }
      48             : 
      49             : void EvtTaulnunu::init(){
      50             : 
      51             :   // check that there are 0 arguments
      52           0 :   checkNArg(0);
      53           0 :   checkNDaug(3);
      54             : 
      55           0 :   checkSpinParent(EvtSpinType::DIRAC);
      56             : 
      57           0 :   checkSpinDaughter(0,EvtSpinType::DIRAC);
      58           0 :   checkSpinDaughter(1,EvtSpinType::NEUTRINO);
      59           0 :   checkSpinDaughter(2,EvtSpinType::NEUTRINO);
      60             : 
      61           0 : }
      62             : 
      63             : void EvtTaulnunu::initProbMax(){
      64             : 
      65           0 :   setProbMax(650.0);
      66             : 
      67           0 : }
      68             : 
      69             : void EvtTaulnunu::decay(EvtParticle *p){
      70           0 :   static EvtId TAUM=EvtPDL::getId("tau-");
      71             : 
      72           0 :   p->initializePhaseSpace(getNDaug(),getDaugs());
      73             : 
      74             :   EvtParticle *l, *nul, *nut;
      75             : 
      76           0 :   l = p->getDaug(0);
      77           0 :   nul = p->getDaug(1);
      78           0 :   nut = p->getDaug(2);
      79             :   
      80           0 :   EvtVector4C l1, l2, tau1, tau2;
      81             : 
      82           0 :   if (p->getId()==TAUM) {
      83             : 
      84           0 :     tau1=EvtLeptonVACurrent(nut->spParentNeutrino(),p->sp(0));
      85           0 :     tau2=EvtLeptonVACurrent(nut->spParentNeutrino(),p->sp(1));
      86           0 :     l1=EvtLeptonVACurrent(l->spParent(0),nul->spParentNeutrino());
      87           0 :     l2=EvtLeptonVACurrent(l->spParent(1),nul->spParentNeutrino());
      88             : 
      89           0 :   }
      90             :   else{
      91           0 :     tau1=EvtLeptonVACurrent(p->sp(0),nut->spParentNeutrino());
      92           0 :     tau2=EvtLeptonVACurrent(p->sp(1),nut->spParentNeutrino());
      93           0 :     l1=EvtLeptonVACurrent(nul->spParentNeutrino(),l->spParent(0));
      94           0 :     l2=EvtLeptonVACurrent(nul->spParentNeutrino(),l->spParent(1));
      95             :   }
      96             : 
      97           0 :   vertex(0,0,tau1*l1);
      98           0 :   vertex(0,1,tau1*l2);
      99           0 :   vertex(1,0,tau2*l1);
     100           0 :   vertex(1,1,tau2*l2);
     101             :   
     102             :   return;
     103             : 
     104           0 : }
     105             :