Ignore:
File:
1 edited

Legend:

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

    r74e9b5f r5181ccc  
    4242#if FLOAT_SIZE>4 
    4343//Cephes double pression function 
     44double cephes_j1(double x); 
    4445 
    4546constant double RPJ1[8] = { 
     
    105106    0.0 }; 
    106107 
    107 static 
    108108double cephes_j1(double x) 
    109109{ 
     
    155155#else 
    156156//Single precission version of cephes 
     157float cephes_j1f(float x); 
     158 
    157159constant float JPJ1[8] = { 
    158160    -4.878788132172128E-009, 
     
    188190    }; 
    189191 
    190 static 
    191192float cephes_j1f(float xx) 
    192193{ 
     
    239240 
    240241//Finally J1c function that equals 2*J1(x)/x 
    241 static 
     242double sas_2J1x_x(double x); 
    242243double sas_2J1x_x(double x) 
    243244{ 
Note: See TracChangeset for help on using the changeset viewer.