3752{
3768
3769 double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3770 + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3771 - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3772 double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3773 + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3774 - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3775 double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3776 + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3777 - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3778
3779 double uniNLO15a = -la1Q/(16.0*M_PI);
3780 double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3781 gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3782 gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
3783
3784 double uniNLO16a = -la2Q/(16.0*M_PI);
3785 double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3786 gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3787 gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
3788
3789 double uniNLO17a = -la5Q/(16.0*M_PI);
3790 double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3791 gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
3792 gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
3793
3794 gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
3795 gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
3796 gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
3797
3798 double R=0.01;
3799 double a0LO = uniNLO15a+uniNLO16a+sqrt((uniNLO15a-uniNLO16a)*(uniNLO15a-uniNLO16a)+4.0*uniNLO17a*uniNLO17a);
3800 gslpp::complex a0NLO = (uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3801 if(a0NLO.abs()>Rpeps)
3802 {
3803 R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3804 }
3805
3806 return R;
3807}
THDMcache * getMyTHDMCache() const
A method get the THDMCache.