Re: Lambert W (HP-41) Message #31 Posted by Gerson W. Barbosa on 12 Sept 2012, 1:19 p.m., in response to message #30 by Paul Dale
Yesterday I tried this program, but it is not accurate near -1/e:
x Wp(x) Actual Wp(x)
--------------------------------------------------------------------------------------------
5 1,3267246652422002236350992297758080 1,32672466524220022363509929775807966
2 0,8526055020137254913464724146953176 0,85260550201372549134647241469531747
1 0,5671432904097838729999686622103554 0,56714329040978387299996866221035555
0,5 0,3517337112491958260249093009299512 0,35173371124919577956902116966375615
0,2 0,1689159734991095651164749037058184 0,16891597349910958403285121676162817
0,1 0,0912765271608622642998957214231796 0,09127652716086226414304860554693732
1e-10 9,9999999990000000001499999999733330e-10 9,9999999990000000001499999999733333e-10
0 0,0000000000000000000000000000000000 0,00000000000000000000000000000000000
-0,1 -0,1118325591589629658335694568202658 -0,1118325591589629658395566025319567
-0,2 -0,2591711018190737450566519502154066 -0,2591711018190737125799216755694943
-0,3 -0,4894022271802149690362312519962932 -0,4894022271802149215425004058488412
-0,36 -0,8060843159708177782855213616209925 -0,8060843159708176441924365462909918
-0,3655 -0,8903632797650515808736815032956873 -0,8903632797650511410125773181789555
-0,367 -0,9323991847479284837164661908793559 -0,9323991847479277117471951896732207
-0,3678 -0,9793607149578284774761844434886448 -0,9793607149578289483571325035882182
-0,36787 -0,9928527298215372443479364374257017 -0,9928527298215230612044024383067153
-0,367879 -0,9984521037807272593182949803064360 -0,9984521037807256860219240479636937
-0,3678794 -0,9995269666075681262606395538798757 -0,9995269666076291859013736029737629
-0,36787944 -0,9999201984851193714121109223924577 -0,9999201984851193714121109223924577
-0,367879441 -0,9999694707005488274010434842119125 -0,9999694706971019586561055803031195
-0,3678794411 -0,9999802922445170178816356178098493 -0,9999802922403187022126758165541105
-0,36787944117 -0,9999971997752715886211339967727831 -0,9999971997513460442164046071411576
-0,367879441171 -0,9999984492882199170281330426992986 -0,9999984493035449784059665034874342
-e^(-1) -0,9999999999999998752093661285259866 -1,0000000000000000000000000000000000
x Wm(x) Actual Wm(x)
-------------------------------------------------------------------------------------------------
-1e-10 -26,295238819246925694110128821854920 -26,2952388192469256941101288218549182
-0,1 -3,577152063957297218409391963511995 -3,5771520639572971234088072378654033
-0,2 -2,542641357773526424293806156661848 -2,5426413577735260673762240912765265
-0,3 -1,781337023421627611974170281512745 -1,7813370234216276966066061504534446
-0,36 -1,222770133978505953142938073423862 -1,2227701339785062017995187488850206
-0,3655 -1,118287472596987280228640736301493 -1,1182874725969877971465393784455955
-0,367 -1,070791886768051874079258725213193 -1,0707918867680525920604850398376584
-0,3678 -1,020927239409427553738750824109443 -1,0209272394094270897113574392278679
-0,36787 -1,007181488951068775696115597981675 -1,0071814889510830592911361236474477
-0,367879 -1,001549495191275425771845523319594 -1,0015494951912768950563759062788449
-0,3678794 -1,000473182613217871681553793568512 -1,0004731826131567640203456903691404
-0,36787944 -1,000079805761663777082544792855552 -1,0000798057620190473215870952117257
-0,367879441 -1,000030529920822569299901895542387 -1,0000305299242695511452438950072974
-0,3678794411 -1,000019708014416801577108775092207 -1,0000197080186152831515755678992718
-0,36787944117 -1,000002800229955926824084223846546 -1,0000028002538814408950429424294271
-0,367879441171 -1,000001550713383222645797579566477 -1,0000015506980581836415922225569375
-e^(-1) -1,000000000000000000000000000000000 -1,0000000000000000000000000000000000
|