LambertWoCoe.inc

From TORI
Revision as of 15:01, 20 June 2013 by Maintenance script (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

// LambertWoCoe.inc describes in C++ the coefficients in the expansion of the LambertW function at zero.

// The C++ text below is generated with the C++ code
/*
#include<math.h>
#include<stdio.h>
#include<stdlib.h>
main(){ int m,n; double c,p,q; FILE *o;
p=1.;
o=fopen("LambertWoCoe.inc","w");
fprintf(o,"DB LambertWoCoe[66]={1.\n");
for(m=1;m<51;m++){ p/=m; c=pow(m+1.,m-1); fprintf(o,",%28.14f\n",c*p);}
fprintf(o,"};\n"); fclose(o);
system("more LambertWoCoe.inc"); }
*/


DB LambertWoCoe[66]={1.
,            1.00000000000000
,            1.50000000000000
,            2.66666666666667
,            5.20833333333333
,           10.80000000000000
,           23.34305555555556
,           52.01269841269841
,          118.62522321428571
,          275.57319223985894
,          649.78717234347448
,         1551.16051948051950
,         3741.44970295923895
,         9104.50024115801898
,        22324.30851270660423
,        55103.62197290384211
,       136808.86090394295752
,       341422.05066583841108
,       855992.96599660767242
,      2154990.20609108870849
,      5445552.92231446318328
,     13807330.00216663256288
,     35117044.98513923585415
,     89568002.56102797389030
,    229041684.61879497766495
,    587103504.11717987060547
,   1508256053.85779309272766
,   3882630161.29318952560425
,  10013943136.65483093261719
,  25873567362.65761184692383
,  66962097093.58074951171875
, 173571165959.91983032226562
, 450568046564.23547363281250
,1171223178256.48754882812500
,3048462517882.44677734375000
,7944240398206.81152343750000
,20726462893727.05468750000000
,54134309927745.64062500000000
,141537001323842.75000000000000
,370420141783066.68750000000000
,970343148988291.75000000000000
,2544149870142830.00000000000000
,6676186549945614.00000000000000
,17533383884497606.00000000000000
,46082787899842400.00000000000000
,121208404038419968.00000000000000
,319031756001941888.00000000000000
,840290335422231168.00000000000000
,2214659548716029696.00000000000000
,5840571433838373888.00000000000000
,15412168778694733824.00000000000000
};

// //