source: sasview/sansmodels/src/sans/models/c_extensions/sphere.c @ 5eb9154

ESS_GUIESS_GUI_DocsESS_GUI_batch_fittingESS_GUI_bumps_abstractionESS_GUI_iss1116ESS_GUI_iss879ESS_GUI_iss959ESS_GUI_openclESS_GUI_orderingESS_GUI_sync_sascalccostrafo411magnetic_scattrelease-4.1.1release-4.1.2release-4.2.2release_4.0.1ticket-1009ticket-1094-headlessticket-1242-2d-resolutionticket-1243ticket-1249ticket885unittest-saveload
Last change on this file since 5eb9154 was ae3ce4e, checked in by Mathieu Doucet <doucetm@…>, 17 years ago

Moving sansmodels to trunk

  • Property mode set to 100644
File size: 931 bytes
RevLine 
[ae3ce4e]1/**
2 * Scattering model for a sphere
3 * @author: Mathieu Doucet / UTK
4 */
5
6#include "sphere.h"
7#include "libSphere.h"
8#include <math.h>
9
10
11/**
12 * Function to evaluate 1D scattering function
13 * @param pars: parameters of the sphere
14 * @param q: q-value
15 * @return: function value
16 */
17double sphere_analytical_1D(SphereParameters *pars, double q) {
18        double dp[5];
19       
20        dp[0] = pars->scale;
21        dp[1] = pars->radius;
22        dp[2] = pars->contrast;
23        dp[3] = pars->background;
24       
25        return SphereForm(dp, q);
26}
27   
28/**
29 * Function to evaluate 2D scattering function
30 * @param pars: parameters of the sphere
31 * @param q: q-value
32 * @return: function value
33 */
34double sphere_analytical_2D(SphereParameters *pars, double q, double phi) {
35        return sphere_analytical_1D(pars,q);
36}
37
38double sphere_analytical_2DXY(SphereParameters *pars, double qx, double qy){
39        return sphere_analytical_1D(pars,sqrt(qx*qx+qy*qy));   
40}
Note: See TracBrowser for help on using the repository browser.