TEvtGen/EvtGenModels/EvtKKLambdaCFF.cxx

   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: EvtSLPoleFF.cc
  12 //
  13 // Description: Routine to implement semileptonic form factors
  14 //              according to the model SLPoles
  15 //
  16 // Modification history:
  17 //
  18 //    DJL       April 17,1998       Module created
  19 //
  20 //------------------------------------------------------------------------
  21 //
  22 #include "EvtGenBase/EvtPatches.hh"
  23 #include "EvtGenBase/EvtPatches.hh"
  24 #include "EvtGenBase/EvtReport.hh"
  25 #include "EvtGenModels/EvtKKLambdaCFF.hh"
  26 #include <string>
  27 #include "EvtGenBase/EvtPDL.hh"
  28 #include <math.h>
  29 #include <stdlib.h>
  30
  31 EvtKKLambdaCFF::EvtKKLambdaCFF(int numarg, double *arglist) {
  32    _nargs = numarg;
  33    for (int i=0; i<numarg; i++) {
  34      _args[i] = arglist[i]; }
  35
  36    return;
  37 }
  38
  39 void EvtKKLambdaCFF::getbaryonff(EvtId parent,EvtId daught,
  40                  double t, double mass, double *f1v,
  41                  double *f1a, double *f2v, double *f2a ) {
  42
  43   *f1v=(_args[0])/(1.0-(t/(_args[1]*_args[1])));
  44
  45   *f2v=0.;
  46   *f2a=0.;
  47   *f1a=-1.0*(*f1v);
  48
  49 }
  50
  51 void EvtKKLambdaCFF::getscalarff(EvtId, EvtId,
  52                                  double, double, double*,
  53                                  double*){
  54
  55   report(ERROR,"EvtGen") << "Not implemented :getscalarff in EvtKKLambdaCFF.\n";
  56   ::abort();
  57
  58 }
  59
  60 void EvtKKLambdaCFF::getvectorff(EvtId, EvtId,
  61                                  double, double, double*,
  62                                  double*, double*, double* ){
  63
  64   report(ERROR,"EvtGen") << "Not implemented :getvectorff in EvtKKLambdaCFF.\n";
  65   ::abort();
  66
  67 }
  68
  69
  70 void EvtKKLambdaCFF::gettensorff(EvtId, EvtId, double, double, double*,
  71                                double*, double*, double*){
  72
  73   report(ERROR,"EvtGen") << "Not implemented :gettensorff in EvtKKLambdaCFF.\n";
  74   ::abort();
  75
  76 }