Changeset 75898d4 in sasview for src/sas


Ignore:
Timestamp:
Mar 22, 2016 6:54:13 AM (9 years ago)
Author:
wojciech
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:
197260f
Parents:
a8787f9
Message:

Removing gammap function

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/sas/sascalc/calculator/c_extensions/libfunc.c

    r9e531f2 r75898d4  
    8787} 
    8888 
    89  
     89/* 
    9090double gamln(double xx) { 
    9191 
     
    103103    return -tmp+log(2.5066282746310005*ser/x); 
    104104} 
    105  
     105*/ 
    106106// calculate magnetic sld and return total sld 
    107107// bn : contrast (not just sld of the layer) 
     
    241241**/ 
    242242 
    243  
     243/* 
    244244#define ITMAX 100 
    245245#define EPS 3.0e-7 
     
    275275 
    276276} 
     277*/ 
    277278 
    278279/** 
     
    280281   representation 
    281282**/ 
    282  
     283/* 
    283284void gcf(float *gammcf, float a, float x, float *gln) { 
    284285  int i; 
     
    306307  return; 
    307308} 
    308  
     309*/ 
    309310 
    310311/** 
    311312   Represents incomplete error function, P(a,x) 
    312313**/ 
     314/* 
    313315float gammp(float a, float x) { 
    314316  float gamser,gammcf,gln; 
     
    322324  } 
    323325} 
    324  
     326*/ 
    325327/** 
    326328    Implementation of the error function, erf(x) 
    327329**/ 
    328  
     330/* 
    329331float erff(float x) { 
    330332  return x < 0.0 ? -gammp(0.5,x*x) : gammp(0.5,x*x); 
    331333} 
    332  
     334*/ 
Note: See TracChangeset for help on using the changeset viewer.