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: EvtSLPoleFF.cc 00012 // 00013 // Description: Routine to implement semileptonic form factors 00014 // according to the model SLPoles 00015 // 00016 // Modification history: 00017 // 00018 // DJL April 17,1998 Module created 00019 // 00020 //------------------------------------------------------------------------ 00021 // 00022 #include "EvtGenBase/EvtPatches.hh" 00023 #include "EvtGenBase/EvtPatches.hh" 00024 #include "EvtGenBase/EvtReport.hh" 00025 #include "EvtGenModels/EvtKKLambdaCFF.hh" 00026 #include <string> 00027 #include "EvtGenBase/EvtPDL.hh" 00028 #include <math.h> 00029 00030 EvtKKLambdaCFF::EvtKKLambdaCFF(int numarg, double *arglist) { 00031 _nargs = numarg; 00032 for (int i=0; i<numarg; i++) { 00033 _args[i] = arglist[i]; } 00034 00035 return; 00036 } 00037 00038 void EvtKKLambdaCFF::getbaryonff(EvtId parent,EvtId daught, 00039 double t, double mass, double *f1v, 00040 double *f1a, double *f2v, double *f2a ) { 00041 00042 *f1v=(_args[0])/(1.0-(t/(_args[1]*_args[1]))); 00043 00044 *f2v=0.; 00045 *f2a=0.; 00046 *f1a=-1.0*(*f1v); 00047 00048 }