Changeset 0003cc3 in sasview for park-1.2.1


Ignore:
Timestamp:
Nov 30, 2011 8:37:38 AM (12 years ago)
Author:
Mathieu Doucet <doucetm@…>
Branches:
master, ESS_GUI, ESS_GUI_Docs, ESS_GUI_batch_fitting, ESS_GUI_bumps_abstraction, ESS_GUI_iss1116, ESS_GUI_iss879, ESS_GUI_iss959, ESS_GUI_opencl, ESS_GUI_ordering, ESS_GUI_sync_sascalc, costrafo411, magnetic_scatt, release-4.1.1, release-4.1.2, release-4.2.2, release_4.0.1, ticket-1009, ticket-1094-headless, ticket-1242-2d-resolution, ticket-1243, ticket-1249, ticket885, unittest-saveload
Children:
d36facf
Parents:
93f02d51
Message:

Re #5 fixing park compilation on MSVC

File:
1 edited

Legend:

Unmodified
Added
Removed
  • park-1.2.1/park/lib/resolution.c

    r93f02d51 r0003cc3  
    2121    // Save the sign of x 
    2222    int sign = 1; 
     23 
     24    double t; 
     25    double y; 
    2326    if (x < 0) 
    2427        sign = -1; 
     
    2629 
    2730    // A&S formula 7.1.26 
    28     double t = 1.0/(1.0 + p*x); 
    29     double y = 1.0 - (((((a5*t + a4)*t) + a3)*t + a2)*t + a1)*t*exp(-x*x); 
     31    t = 1.0/(1.0 + p*x); 
     32    y = 1.0 - (((((a5*t + a4)*t) + a3)*t + a2)*t + a1)*t*exp(-x*x); 
    3033 
    3134    return sign*y; 
Note: See TracChangeset for help on using the changeset viewer.