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: EvtSLPole.cc
      12             : //
      13             : // Description: Routine to implement semileptonic decays according
      14             : //              to light cone sum rules
      15             : //
      16             : // Modification history:
      17             : //
      18             : //    DJL       April 23, 1998       Module created
      19             : //
      20             : //------------------------------------------------------------------------
      21             : // 
      22             : #include "EvtGenBase/EvtPatches.hh"
      23             : #include <stdlib.h>
      24             : #include "EvtGenBase/EvtParticle.hh"
      25             : #include "EvtGenBase/EvtGenKine.hh"
      26             : #include "EvtGenBase/EvtPDL.hh"
      27             : #include "EvtGenBase/EvtReport.hh"
      28             : #include "EvtGenModels/EvtSLPole.hh"
      29             : #include "EvtGenModels/EvtSLPoleFF.hh"
      30             : #include "EvtGenBase/EvtSemiLeptonicScalarAmp.hh"
      31             : #include "EvtGenBase/EvtSemiLeptonicVectorAmp.hh"
      32             : #include "EvtGenBase/EvtSemiLeptonicTensorAmp.hh"
      33             : #include <string>
      34             : 
      35           0 : EvtSLPole::~EvtSLPole() {}
      36             : 
      37             : std::string EvtSLPole::getName(){
      38             : 
      39           0 :   return "SLPOLE";     
      40             : 
      41             : }
      42             : 
      43             : 
      44             : EvtDecayBase* EvtSLPole::clone(){
      45             : 
      46           0 :   return new EvtSLPole;
      47             : 
      48           0 : }
      49             : 
      50             : void EvtSLPole::decay( EvtParticle *p ){
      51             : 
      52           0 :   p->initializePhaseSpace(getNDaug(),getDaugs(),_resetDaughterTree);
      53           0 :   calcamp->CalcAmp(p,_amp2,SLPoleffmodel);
      54           0 :   return;
      55             : }
      56             : 
      57             : void EvtSLPole::initProbMax(){
      58             : 
      59           0 : EvtId parnum,mesnum,lnum,nunum;
      60             : 
      61           0 : parnum = getParentId();
      62           0 : mesnum = getDaug(0);
      63           0 : lnum = getDaug(1);
      64           0 : nunum = getDaug(2);
      65             : 
      66           0 : double mymaxprob = calcamp->CalcMaxProb(parnum,mesnum,
      67           0 :                            lnum,nunum,SLPoleffmodel);
      68             : 
      69           0 : setProbMax(mymaxprob);
      70             : 
      71           0 : }
      72             : 
      73             : 
      74             : void EvtSLPole::init(){
      75             :   
      76           0 :   checkNDaug(3);
      77             : 
      78             :   //We expect the parent to be a scalar 
      79             :   //and the daughters to be X lepton neutrino
      80             : 
      81           0 :   checkSpinParent(EvtSpinType::SCALAR);
      82           0 :   checkSpinDaughter(1,EvtSpinType::DIRAC);
      83           0 :   checkSpinDaughter(2,EvtSpinType::NEUTRINO);
      84             : 
      85           0 :   EvtSpinType::spintype mesontype=EvtPDL::getSpinType(getDaug(0));
      86             : 
      87           0 :   SLPoleffmodel = new EvtSLPoleFF(getNArg(),getArgs());
      88             :   
      89           0 :   if ( mesontype==EvtSpinType::SCALAR ) { 
      90           0 :     calcamp = new EvtSemiLeptonicScalarAmp; 
      91           0 :   }
      92           0 :   if ( mesontype==EvtSpinType::VECTOR ) { 
      93           0 :     calcamp = new EvtSemiLeptonicVectorAmp; 
      94           0 :   }
      95           0 :   if ( mesontype==EvtSpinType::TENSOR ) { 
      96           0 :     calcamp = new EvtSemiLeptonicTensorAmp; 
      97           0 :   }
      98             : 
      99           0 :   _resetDaughterTree=false;
     100           0 :   if ( getArgStr(getNArg()-1) == "true") _resetDaughterTree=true;
     101             :   
     102           0 : }
     103             :