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: 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           0 : EvtKKLambdaCFF::EvtKKLambdaCFF(int numarg, double *arglist) {
      32           0 :    _nargs = numarg;
      33           0 :    for (int i=0; i<numarg; i++) {
      34           0 :      _args[i] = arglist[i]; }
      35             : 
      36           0 :    return;
      37           0 : }
      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           0 :   *f1v=(_args[0])/(1.0-(t/(_args[1]*_args[1])));
      44             : 
      45           0 :   *f2v=0.;
      46           0 :   *f2a=0.;
      47           0 :   *f1a=-1.0*(*f1v);
      48             :   
      49           0 : }
      50             : 
      51             : void EvtKKLambdaCFF::getscalarff(EvtId, EvtId,
      52             :                                  double, double, double*,
      53             :                                  double*){
      54             :   
      55           0 :   report(Severity::Error,"EvtGen") << "Not implemented :getscalarff in EvtKKLambdaCFF.\n";  
      56           0 :   ::abort();
      57             : 
      58             : }
      59             : 
      60             : void EvtKKLambdaCFF::getvectorff(EvtId, EvtId,
      61             :                                  double, double, double*,
      62             :                                  double*, double*, double* ){
      63             :   
      64           0 :   report(Severity::Error,"EvtGen") << "Not implemented :getvectorff in EvtKKLambdaCFF.\n";  
      65           0 :   ::abort();
      66             : 
      67             : }
      68             : 
      69             :   
      70             : void EvtKKLambdaCFF::gettensorff(EvtId, EvtId, double, double, double*, 
      71             :                                double*, double*, double*){
      72             :   
      73           0 :   report(Severity::Error,"EvtGen") << "Not implemented :gettensorff in EvtKKLambdaCFF.\n";  
      74           0 :   ::abort();
      75             : 
      76             : }
      77             : 
      78             : void EvtKKLambdaCFF::getdiracff(EvtId, EvtId, double, double, double*, double*,
      79             :                                 double*, double*, double*, double*) {
      80             :   
      81           0 :   report(Severity::Error,"EvtGen") << "Not implemented :getdiracff in EvtKKLambdaCFF.\n";
      82           0 :   ::abort();
      83             : 
      84             : }
      85             : 
      86             : void EvtKKLambdaCFF::getraritaff(EvtId, EvtId, double, double, double*, double*, 
      87             :                                  double*, double*, double*, double*, double*, double*) {
      88             :   
      89           0 :   report(Severity::Error,"EvtGen") << "Not implemented :getraritaff in EvtKKLambdaCFF.\n";
      90           0 :   ::abort();
      91             : 
      92             : }