source: sasview/sansmodels/src/sans/models/c_extensions/oblate.c @ 793c988

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 793c988 was 27a0771, checked in by Gervaise Alina <gervyh@…>, 15 years ago

add more models

  • Property mode set to 100644
File size: 1.8 KB
Line 
1/**
2 * Scattering model for a oblate
3 * @author: Gervaise B Alina/ UTK
4 */
5
6#include "oblate.h"
7#include <math.h>
8#include "libCylinder.h"
9#include <stdio.h>
10#include <stdlib.h>
11
12
13/**
14 * Function to evaluate 1D scattering function
15 * @param pars: parameters of the oblate
16 * @param q: q-value
17 * @return: function value
18 */
19double oblate_analytical_1D(OblateParameters *pars, double q) {
20        double dp[10];
21       
22        // Fill paramater array
23        dp[0] = pars->scale;
24        dp[1] = pars->major_core;
25        dp[2] = pars->minor_core;
26        dp[3] = pars->major_shell;
27        dp[4] = pars->minor_shell;
28        dp[5] = pars->contrast;
29        dp[6] = pars->sld_solvent;
30        dp[7] = pars->background;
31        dp[8] = pars->axis_theta;
32        dp[9] = pars->axis_phi;
33       
34        // Call library function to evaluate model
35        return OblateForm(dp, q);       
36}
37
38/**
39 * Function to evaluate 2D scattering function
40 * @param pars: parameters of the oblate
41 * @param q: q-value
42 * @return: function value
43 */
44double oblate_analytical_2DXY(OblateParameters *pars, double qx, double qy) {
45        double q;
46        q = sqrt(qx*qx+qy*qy);
47    return oblate_analytical_2D_scaled(pars, q, qx/q, qy/q);
48} 
49
50
51/**
52 * Function to evaluate 2D scattering function
53 * @param pars: parameters of the oblate
54 * @param q: q-value
55 * @param phi: angle phi
56 * @return: function value
57 */
58double oblate_analytical_2D(OblateParameters *pars, double q, double phi) {
59    return oblate_analytical_2D_scaled(pars, q, cos(phi), sin(phi));
60} 
61       
62/**
63 * Function to evaluate 2D scattering function
64 * @param pars: parameters of the oblate
65 * @param q: q-value
66 * @param q_x: q_x / q
67 * @param q_y: q_y / q
68 * @return: function value
69 */
70double oblate_analytical_2D_scaled(OblateParameters *pars, double q, double q_x, double q_y) {
71       
72        return 1.0;
73}
74   
Note: See TracBrowser for help on using the repository browser.