gm2_2loop_c.cpp

Go to the documentation of this file.

/* ====================================================================
 * This file is part of GM2Calc.
 *
 * GM2Calc is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published
 * by the Free Software Foundation, either version 3 of the License,
 * or (at your option) any later version.
 *
 * GM2Calc is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with GM2Calc.  If not, see
 * <http://www.gnu.org/licenses/>.
 * ==================================================================== */
 
#include "gm2calc/gm2_2loop.h"
#include "gm2calc/gm2_2loop.hpp"
 
#include <limits>
 
/**
 * @file gm2_2loop_c.cpp
 * @brief contains definitions of C interface functions for 2-loop calculation
 *
 * This file contains the definitions for the C interface functions
 * used to calculate \f$a_\mu\f$ at the 2-loop level.
 */
 
extern "C" {
 
/** calculates best 2-loop SUSY contributions to a_mu in the MSSM (with tan(beta) resummation) */
double gm2calc_mssmnofv_calculate_amu_2loop(const MSSMNoFV_onshell* model)
{
   double amu = std::numeric_limits<double>::quiet_NaN();
 
   try {
      amu = gm2calc::calculate_amu_2loop(
         *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
   } catch (...) {}
 
   return amu;
}
 
/** calculates best 2-loop SUSY contributions to a_mu in the MSSM (no tan(beta) resummation) */
double gm2calc_mssmnofv_calculate_amu_2loop_non_tan_beta_resummed(const MSSMNoFV_onshell* model)
{
   double amu = std::numeric_limits<double>::quiet_NaN();
 
   try {
      amu = gm2calc::calculate_amu_2loop_non_tan_beta_resummed(
         *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
   } catch (...) {}
 
   return amu;
}
 
/* === 2-loop fermion/sfermion approximations === */
 
double gm2calc_mssmnofv_amu2LFSfapprox(const MSSMNoFV_onshell* model)
{
   return gm2calc::amu2LFSfapprox(
      *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
}
 
double gm2calc_mssmnofv_amu2LFSfapprox_non_tan_beta_resummed(const MSSMNoFV_onshell* model)
{
   return gm2calc::amu2LFSfapprox_non_tan_beta_resummed(
      *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
}
 
/* === photonic 2-loop corrections === */
 
double gm2calc_mssmnofv_amu2LChipmPhotonic(const MSSMNoFV_onshell* model)
{
   return gm2calc::amu2LChipmPhotonic(
      *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
}
 
double gm2calc_mssmnofv_amu2LChi0Photonic(const MSSMNoFV_onshell* model)
{
   return gm2calc::amu2LChi0Photonic(
      *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
}
 
/* === SUSY 2L(a) diagrams === */
 
double gm2calc_mssmnofv_amu2LaSferm(const MSSMNoFV_onshell* model)
{
   return gm2calc::amu2LaSferm(
      *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
}
 
double gm2calc_mssmnofv_amu2LaCha(const MSSMNoFV_onshell* model)
{
   return gm2calc::amu2LaCha(
      *reinterpret_cast<const gm2calc::MSSMNoFV_onshell*>(model));
}
 
} /* extern "C" */