]>
Commit | Line | Data |
---|---|---|
da0e9ce3 | 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 | } |