Changeset 994d77f in sasmodels for sasmodels/models/lib/gauss20.c


Ignore:
Timestamp:
Oct 30, 2014 12:33:53 PM (9 years ago)
Author:
Paul Kienzle <pkienzle@…>
Branches:
master, core_shell_microgels, costrafo411, magnetic_model, release_v0.94, release_v0.95, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests
Children:
ef2861b
Parents:
d087487b
Message:

Convert double to float rather than using real

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sasmodels/models/lib/gauss20.c

    r14de349 r994d77f  
    99 
    1010// Gaussians 
    11 constant real Gauss20Wt[20]={ 
    12         REAL(.0176140071391521), 
    13         REAL(.0406014298003869), 
    14         REAL(.0626720483341091), 
    15         REAL(.0832767415767047), 
    16         REAL(.10193011981724), 
    17         REAL(.118194531961518), 
    18         REAL(.131688638449177), 
    19         REAL(.142096109318382), 
    20         REAL(.149172986472604), 
    21         REAL(.152753387130726), 
    22         REAL(.152753387130726), 
    23         REAL(.149172986472604), 
    24         REAL(.142096109318382), 
    25         REAL(.131688638449177), 
    26         REAL(.118194531961518), 
    27         REAL(.10193011981724), 
    28         REAL(.0832767415767047), 
    29         REAL(.0626720483341091), 
    30         REAL(.0406014298003869), 
    31         REAL(.0176140071391521) 
     11constant double Gauss20Wt[20]={ 
     12        .0176140071391521, 
     13        .0406014298003869, 
     14        .0626720483341091, 
     15        .0832767415767047, 
     16        .10193011981724, 
     17        .118194531961518, 
     18        .131688638449177, 
     19        .142096109318382, 
     20        .149172986472604, 
     21        .152753387130726, 
     22        .152753387130726, 
     23        .149172986472604, 
     24        .142096109318382, 
     25        .131688638449177, 
     26        .118194531961518, 
     27        .10193011981724, 
     28        .0832767415767047, 
     29        .0626720483341091, 
     30        .0406014298003869, 
     31        .0176140071391521 
    3232}; 
    3333 
    34 constant real Gauss20Z[20]={ 
    35         REAL(-.993128599185095), 
    36         REAL(-.963971927277914), 
    37         REAL(-.912234428251326), 
    38         REAL(-.839116971822219), 
    39         REAL(-.746331906460151), 
    40         REAL(-.636053680726515), 
    41         REAL(-.510867001950827), 
    42         REAL(-.37370608871542), 
    43         REAL(-.227785851141645), 
    44         REAL(-.076526521133497), 
    45         REAL(.0765265211334973), 
    46         REAL(.227785851141645), 
    47         REAL(.37370608871542), 
    48         REAL(.510867001950827), 
    49         REAL(.636053680726515), 
    50         REAL(.746331906460151), 
    51         REAL(.839116971822219), 
    52         REAL(.912234428251326), 
    53         REAL(.963971927277914), 
    54         REAL(.993128599185095) 
     34constant double Gauss20Z[20]={ 
     35        -.993128599185095, 
     36        -.963971927277914, 
     37        -.912234428251326, 
     38        -.839116971822219, 
     39        -.746331906460151, 
     40        -.636053680726515, 
     41        -.510867001950827, 
     42        -.37370608871542, 
     43        -.227785851141645, 
     44        -.076526521133497, 
     45        .0765265211334973, 
     46        .227785851141645, 
     47        .37370608871542, 
     48        .510867001950827, 
     49        .636053680726515, 
     50        .746331906460151, 
     51        .839116971822219, 
     52        .912234428251326, 
     53        .963971927277914, 
     54        .993128599185095 
    5555}; 
Note: See TracChangeset for help on using the changeset viewer.