Initializes module.
92{
93
94 if (getNArg() < 2) checkNArg(2);
95 checkNDaug(3);
96
97 static EvtId D1P1P = EvtPDL::getId("D_1+");
98 static EvtId D1P1N = EvtPDL::getId("D_1-");
99 static EvtId D1P10 = EvtPDL::getId("D_10");
100 static EvtId D1P1B = EvtPDL::getId("anti-D_10");
101 static EvtId D3P2P = EvtPDL::getId("D_2*+");
102 static EvtId D3P2N = EvtPDL::getId("D_2*-");
103 static EvtId D3P20 = EvtPDL::getId("D_2*0");
104 static EvtId D3P2B = EvtPDL::getId("anti-D_2*0");
105
106 static EvtId DS1P = EvtPDL::getId("D_s1+");
107 static EvtId DS1M = EvtPDL::getId("D_s1-");
108 static EvtId DS2STP = EvtPDL::getId("D_s2*+");
109 static EvtId DS2STM = EvtPDL::getId("D_s2*-");
110
111 EvtId daughter = getDaug(0);
112
113 bool isNarrow = false;
114
115 if (daughter == D1P1P || daughter == D1P1N || daughter == D1P10 || daughter == D1P1B ||
116 daughter == D3P2P || daughter == D3P2N || daughter == D3P20 || daughter == D3P2B ||
117 daughter == DS1P || daughter == DS1M || daughter == DS2STP || daughter == DS2STM)
118 isNarrow = true;
119
120
121
122
123 checkSpinParent(EvtSpinType::SCALAR);
124 checkSpinDaughter(1, EvtSpinType::DIRAC);
125 checkSpinDaughter(2, EvtSpinType::NEUTRINO);
126
127 EvtSpinType::spintype mesontype = EvtPDL::getSpinType(getDaug(0));
128
129 if (isNarrow)
130 llswffmodel =
new EvtLLSWFF(getArg(0), getArg(1), getNArg() > 2 ? getArg(2) : 0., getNArg() > 3 ? getArg(3) : 0.);
131 else
133
134 if (mesontype == EvtSpinType::SCALAR) {
135 calcamp =
new EvtSemiLeptonicScalarAmp;
136 }
137 if (mesontype == EvtSpinType::VECTOR) {
138 calcamp =
new EvtSemiLeptonicVectorAmp;
139 }
140 if (mesontype == EvtSpinType::TENSOR) {
141 calcamp =
new EvtSemiLeptonicTensorAmp;
142 }
143
144}
The class provides the form factors for orbitally excited semileptonic decays.