Cone.cpp

Go to the documentation of this file.

//  ************************************************************************************************
//
//  BornAgain: simulate and fit reflection and scattering
//
//! @file      Sample/HardParticle/Cone.cpp
//! @brief     Implements class Cone.
//!
//! @homepage  http://www.bornagainproject.org
//! @license   GNU General Public License v3 or higher (see COPYING)
//! @copyright Forschungszentrum Jülich GmbH 2018
//! @authors   Scientific Computing Group at MLZ (see CITATION, AUTHORS)
//
//  ************************************************************************************************
 
#include "Sample/HardParticle/Cone.h"
#include "Base/Math/Bessel.h"
#include "Base/Math/Constants.h"
#include "Base/Math/Functions.h"
#include "Base/Math/IntegratorGK.h"
#include "Sample/Shapes/DoubleEllipse.h"
#include <limits>
 
Cone::Cone(const std::vector<double> P)
    : IFormFactor(P)
    , m_radius(m_P[0])
    , m_height(m_P[1])
    , m_alpha(m_P[2])
{
    checkNodeArgs();
    m_cot_alpha = Math::cot(m_alpha);
    if (!std::isfinite(m_cot_alpha) || m_cot_alpha < 0)
        throw std::runtime_error("pyramid angle alpha out of bounds");
    if (m_cot_alpha * m_height > m_radius) {
        std::ostringstream ostr;
        ostr << "Cone() -> Error in class initialization ";
        ostr << "with parameters radius:" << m_radius;
        ostr << " m_height:" << m_height;
        ostr << " alpha[rad]:" << m_alpha << "\n\n";
        ostr << "Check for 'height <= radius*tan(alpha)' failed.";
        throw std::runtime_error(ostr.str());
    }
    m_cot_alpha = Math::cot(m_alpha);
    double radius2 = m_radius - m_height * m_cot_alpha;
    m_shape3D = std::make_unique<DoubleEllipseZ>(m_radius, m_radius, m_height, radius2, radius2);
}
 
Cone::Cone(double radius, double height, double alpha)
    : Cone(std::vector<double>{radius, height, alpha})
{
}
 
complex_t Cone::formfactor_at_bottom(C3 q) const
{
    if (std::abs(q.mag()) < std::numeric_limits<double>::epsilon()) {
        double R = m_radius;
        double H = m_height;
        if (m_cot_alpha == 0.0)
            return M_PI * R * R * H; // cylinder case
        double R2 = R - H * m_cot_alpha;
        double apex_height = R / m_cot_alpha;
        return M_PI / 3. * (R * R * H + (R * R - R2 * R2) * (apex_height - H));
    }
    complex_t integral = ComplexIntegrator().integrate(
        [=](double Z) {
            double Rz = m_radius - Z * m_cot_alpha;
            complex_t q_p = std::sqrt(q.x() * q.x() + q.y() * q.y()); // sqrt(x*x + y*y)
            return Rz * Rz * Math::Bessel::J1c(q_p * Rz) * exp_I(q.z() * Z);
        },
        0., m_height);
    return M_TWOPI * integral;
}