source: sasview/sansmodels/src/sans/models/c_extensions/prolate.c @ 72a90bd

/**
 * Scattering model for a prolate
 * @author: Gervaise B Alina/ UTK
 */

#include "prolate.h"
#include <math.h>
#include "libCylinder.h"
#include <stdio.h>
#include <stdlib.h>


/**
 * Function to evaluate 1D scattering function
 * @param pars: parameters of the prolate
 * @param q: q-value
 * @return: function value
 */
double prolate_analytical_1D(ProlateParameters *pars, double q) {
        double dp[10];
        
        // Fill paramater array
        dp[0] = pars->scale;
        dp[1] = pars->major_core;
        dp[2] = pars->minor_core;
        dp[3] = pars->major_shell;
        dp[4] = pars->minor_shell;
        dp[5] = pars->contrast;
        dp[6] = pars->sld_solvent;
        dp[7] = pars->background;
        dp[8] = pars->axis_theta;
        dp[9] = pars->axis_phi;
        
        // Call library function to evaluate model
        return ProlateForm(dp, q);      
}

/**
 * Function to evaluate 2D scattering function
 * @param pars: parameters of the prolate
 * @param q: q-value
 * @return: function value
 */
double prolate_analytical_2DXY(ProlateParameters *pars, double qx, double qy) {
        double q;
        q = sqrt(qx*qx+qy*qy);
    return prolate_analytical_2D_scaled(pars, q, qx/q, qy/q);
} 


/**
 * Function to evaluate 2D scattering function
 * @param pars: parameters of the prolate
 * @param q: q-value
 * @param phi: angle phi
 * @return: function value
 */
double prolate_analytical_2D(ProlateParameters *pars, double q, double phi) {
    return prolate_analytical_2D_scaled(pars, q, cos(phi), sin(phi));
} 
        
/**
 * Function to evaluate 2D scattering function
 * @param pars: parameters of the prolate
 * @param q: q-value
 * @param q_x: q_x / q
 * @param q_y: q_y / q
 * @return: function value
 */
double prolate_analytical_2D_scaled(ProlateParameters *pars, double q, double q_x, double q_y) {
        
        return 1.0;
}