comp_ellint_3.hpp

Go to the documentation of this file.

 
#pragma once
 
#include <cmath>
 
#if defined(__cpp_lib_math_special_functions) || !defined(NUMCPP_NO_USE_BOOST)
 
#include "NumCpp/Core/Internal/Error.hpp"
#include "NumCpp/Core/Internal/StaticAsserts.hpp"
#include "NumCpp/Core/Internal/StlAlgorithms.hpp"
#include "NumCpp/NdArray.hpp"
 
#ifndef __cpp_lib_math_special_functions
#include "boost/math/special_functions/ellint_3.hpp"
#endif
 
#include <type_traits>
 
namespace nc::special
{
    //============================================================================
    // Method Description:
    template<typename dtype1, typename dtype2>
    auto comp_ellint_3(dtype1 inK, dtype2 inV)
    {
        STATIC_ASSERT_ARITHMETIC(dtype1);
        STATIC_ASSERT_ARITHMETIC(dtype2);
 
#ifdef __cpp_lib_math_special_functions
        return std::comp_ellint_3(inK, inV);
#else
        return boost::math::ellint_3(inK, inV);
#endif
    }
 
    //============================================================================
    // Method Description:
    template<typename dtype1, typename dtype2>
    auto comp_ellint_3(const NdArray<dtype1>& inArrayK, const NdArray<dtype2>& inArrayV)
    {
        if (inArrayK.size() != inArrayV.size())
        {
            THROW_INVALID_ARGUMENT_ERROR("Shapes of inArrayk and inArrayV must match.");
        }
 
        NdArray<decltype(comp_ellint_3(dtype1{ 0 }, dtype2{ 0 }))> returnArray(inArrayK.shape());
 
        stl_algorithms::transform(inArrayK.cbegin(),
                                  inArrayK.cend(),
                                  inArrayV.cbegin(),
                                  returnArray.begin(),
                                  [](dtype1 inK, dtype2 inV) -> auto { return comp_ellint_3(inK, inV); });
 
        return returnArray;
    }
} // namespace nc::special
 
#endif // #if defined(__cpp_lib_math_special_functions) || !defined(NUMCPP_NO_USE_BOOST)