17 U(2,2,0.), V(2,2,0.), N(4,4,0.),
18 Msup2(6,0.), Msdown2(6,0.), Msneutrino2(6,0.), Mselectron2(6,0.),
19 mch(2,0.), mneu(4,0.), m_su2(6,0.), m_sd2(6,0.), m_sn2(6,0.), m_se2(6,0.),
20 Ru(6,6,0.), Rd(6,6,0.), Rn(6,6,0.), Rl(6,6,0.)
34 mh[2] =
sqrt(mh[3] * mh[3] - Mw * Mw);
36 double temp = mh[2] * mh[2] + Mz * Mz;
37 double temp1 = 2.0 * mh[2] * Mz * cos2b;
38 double temp2 =
sqrt(temp * temp - temp1 * temp1);
41 mh[0] =
sqrt((temp - temp2)/2.0);
44 mh[1] =
sqrt((temp + temp2)/2.0);
47 saeff_i =
sin(atan((mh[2]*mh[2]+Mz*Mz)*
sqrt(1-cos2b*cos2b)/((mh[2]*mh[2]-Mz*Mz)*cos2b))/2.0);
67 Mchargino.singularvalue(Utmp, Vtmp, mch_i);
72 U_i = Utmp.transpose();
73 V_i = Vtmp.hconjugate();
82 double cW2 = Mw*Mw/Mz/Mz;
83 double cW =
sqrt(cW2);
84 double sW =
sqrt(1.0 - cW2);
119 Mdiag_tmp = Nright.hconjugate().transpose() *
Mneutralino * Nright.hconjugate();
122 for(
int i = 0; i < 4; i++)
135 double sW2 = 1.0 - Mw*Mw/Mz2;
147 + cos2b * Mz2 * (1.0/2.0 - 2.0/3.0 * sW2) * Id3 );
151 for(
int i = 0; i < 3; i++)
152 for(
int j = 0; j < 3; j++) {
153 Msup2.assign(i, j, uLL(i,j));
154 Msup2.assign(i, j+3, uLR(i,j));
155 Msup2.assign(i+3, j, uLR(j,i).conjugate());
156 Msup2.assign(i+3, j+3, uRR(i,j));
164 Msup2.eigensystem(RuTmp, m_su2_i);
166 Ru_i = RuTmp.hconjugate();
176 double sW2 = 1.0 - Mw*Mw/Mz2;
187 + cos2b * Mz2 * (- 1.0/2.0 + 1.0/3.0 * sW2) * Id3 );
191 for(
int i = 0; i < 3; i++)
192 for(
int j = 0; j < 3; j++) {
193 Msdown2.assign(i, j, dLL(i,j));
194 Msdown2.assign(i, j+3, dLR(i,j));
195 Msdown2.assign(i+3, j, dLR(j,i).conjugate());
196 Msdown2.assign(i+3, j+3, dRR(i,j));
204 Msdown2.eigensystem(RdTmp, m_sd2_i);
206 Rd_i = RdTmp.hconjugate();
241 for(
int i = 0; i < 3; i++) {
242 for(
int j = 0; j < 3; j++) {
256 m_sn2_i(0)=std::numeric_limits<double>::max();
257 m_sn2_i(1)=std::numeric_limits<double>::max();
258 m_sn2_i(2)=std::numeric_limits<double>::max();
259 Rn_i = RnTmp.hconjugate();
269 double sW2 = 1.0 - Mw*Mw/Mz2;
285 msLhat2modified.assign(0, 0, sLmass);
286 msLhat2modified.assign(1, 1, sLmass);
287 msLhat2modified.assign(2, 2, sLmass);
288 msLhat2modified.assign(0, 1, delta12*sLmass);
289 msLhat2modified.assign(1, 0, delta12*sLmass);
290 msLhat2modified.assign(0, 2, 0.);
291 msLhat2modified.assign(2, 0, 0.);
292 msLhat2modified.assign(1, 2, 0.);
293 msLhat2modified.assign(2, 1, 0.);
295 msEhat2modified.assign(0, 0, sLmass);
296 msEhat2modified.assign(1, 1, sLmass);
297 msEhat2modified.assign(2, 2, sLmass);
298 msEhat2modified.assign(0, 1, 0.);
299 msEhat2modified.assign(1, 0, 0.);
300 msEhat2modified.assign(0, 2, 0.);
301 msEhat2modified.assign(2, 0, 0.);
302 msEhat2modified.assign(1, 2, 0.);
303 msEhat2modified.assign(2, 1, 0.);
305 + cos2b * Mz2 * (- 1.0/2.0 + sW2) * Id3 );
319 for(
int i = 0; i < 3; i++)
321 for(
int j = 0; j < 3; j++)
337 Rl_i = RlTmp.hconjugate();
346 for (
int i = 0; i < 6; i++)
350 for (
int i = 0; i < 5; i++)
351 for (
int k = i + 1; k < 6; k++)
352 if (m_sf2(i) > m_sf2(k)) {
353 std::swap(m_sf2(i), m_sf2(k));
354 std::swap(newIndex[i], newIndex[k]);
360 for (
int i = 0; i < 6; i++)
361 for (
int k = 0; k < 6; k++)
362 myRf.assign(k, i, Rf(newIndex[k], i));
gslpp::matrix< gslpp::complex > msUhat2
A class for the chargino masses.
gslpp::matrix< gslpp::complex > msDhat2
double Ml_Q(const lepton l) const
bool CalcChargino(gslpp::matrix< gslpp::complex > &U_i, gslpp::matrix< gslpp::complex > &V_i, gslpp::vector< double > &mch_i)
Computes the chargino spectrum at tree level.
gslpp::matrix< gslpp::complex > getTUhat() const
Gets the trilinear-coupling matrix for up-type squarks.
virtual double Mw_tree() const
The tree-level mass of the boson, .
bool CalcSelectron(gslpp::matrix< gslpp::complex > &Rl_i, gslpp::vector< double > &m_se2_i)
Computes the charged-slepton spectrum at tree level.
A class for constructing and defining operations on real matrices.
bool CalcSdown(gslpp::matrix< gslpp::complex > &Rd_i, gslpp::vector< double > &m_sd2_i)
Computes the down-type squark spectrum at tree level.
gslpp::matrix< gslpp::complex > msNhat2
bool CalcHiggs(double mh[4], gslpp::complex &saeff_i)
Computes the Higgs spectrum at tree level.
gslpp::matrix< gslpp::complex > msLhat2
gslpp::matrix< gslpp::complex > getVCKM() const
A get method to retrieve the CKM matrix.
gslpp::matrix< gslpp::complex > getTEhat() const
Gets the trilinear-coupling matrix for charged sleptons.
SUSYSpectrum(const SUSY &SUSY_in)
A SUSYSpectrum constructor.
double getTanb() const
Gets .
gslpp::matrix< gslpp::complex > getTDhat() const
Gets the trilinear-coupling matrix for down-type squarks.
bool CalcSup(gslpp::matrix< gslpp::complex > &Ru_i, gslpp::vector< double > &m_su2_i)
Computes the up-type squark spectrum at tree level.
void SortSfermionMasses(gslpp::vector< double > &m_sf2, gslpp::matrix< gslpp::complex > &Rf) const
bool CalcNeutralino(gslpp::matrix< gslpp::complex > &N_i, gslpp::vector< double > &mneu_i)
Computes the neutralino spectrum at tree level.
double getSinb() const
Gets .
gslpp::matrix< gslpp::complex > Msneutrino2
double Mq_Q(const quark q) const
double getCosb() const
Gets .
A class for the CKM matrix elements.
gslpp::matrix< gslpp::complex > getTNhat() const
Gets the trilinear-coupling matrix for sneutrinos.
An observable class for the -boson mass.
gslpp::complex getM2() const
Gets the wino mass.
A class for constructing and defining operations on real vectors.
gslpp::matrix< gslpp::complex > Msdown2
gslpp::matrix< gslpp::complex > Msup2
Stores the tree-level Up-squark, Down-squark, Sneutrino, and Slepton mass matrix. ...
gslpp::matrix< gslpp::complex > Mselectron2
bool CalcSneutrino(gslpp::matrix< gslpp::complex > &Rn_i, gslpp::vector< double > &m_sn2_i)
Computes the sneutrino spectrum at tree level.
gslpp::complex getMuH() const
Gets the parameter in the superpotential.
gslpp::complex getM1() const
Gets the bino mass.
A class for defining operations on and functions of complex numbers.
A class for the neutralino masses.
complex sin(const complex &z)
gslpp::matrix< gslpp::complex > msQhat2
A base class for SUSY models.
double getMz() const
A get method to access the mass of the boson .
gslpp::matrix< gslpp::complex > Mneutralino
complex sqrt(const complex &z)