Changeset ee60aa7 in sasmodels for sasmodels/models/spherical_sld.c


Ignore:
Timestamp:
Sep 10, 2018 4:16:46 PM (22 months ago)
Author:
Paul Kienzle <pkienzle@…>
Branches:
master, core_shell_microgels, magnetic_model, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests
Children:
d299327
Parents:
3f818b2
Message:

clean up effective radius functions; improve mono_gauss_coil accuracy; start moving VR into C

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sasmodels/models/spherical_sld.c

    rd277229 ree60aa7  
    1 static double form_volume( 
    2     double fp_n_shells, 
    3     double thickness[], 
    4     double interface[]) 
    5 { 
    6     int n_shells= (int)(fp_n_shells + 0.5); 
    7     double r = 0.0; 
    8     for (int i=0; i < n_shells; i++) { 
    9         r += thickness[i] + interface[i]; 
    10     } 
    11     return M_4PI_3*cube(r); 
    12 } 
    13  
    141static double 
    15 effective_radius(int mode, double fp_n_shells, double thickness[], double interface[]) 
     2outer_radius(double fp_n_shells, double thickness[], double interface[]) 
    163{ 
    174    int n_shells= (int)(fp_n_shells + 0.5); 
     
    218    } 
    229    return r; 
     10} 
     11 
     12static double form_volume( 
     13    double fp_n_shells, 
     14    double thickness[], 
     15    double interface[]) 
     16{ 
     17    return M_4PI_3*cube(outer_radius(fp_n_shells, thickness, interface)); 
     18} 
     19 
     20static double 
     21effective_radius(int mode, double fp_n_shells, double thickness[], double interface[]) 
     22{ 
     23    // case 1: outer radius 
     24    return outer_radius(fp_n_shells, thickness, interface); 
    2325} 
    2426 
Note: See TracChangeset for help on using the changeset viewer.