LambertWoCoe.inc
Revision as of 15:01, 20 June 2013 by Maintenance script (talk | contribs)
// 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
};
// //