HP Forums
(42S) Lambert w Function Programme for Reals - Printable Version

+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Software Libraries (/forum-10.html)
+--- Forum: General Software Library (/forum-13.html)
+--- Thread: (42S) Lambert w Function Programme for Reals (/thread-7692.html)



(42S) Lambert w Function Programme for Reals - Gerald H - 01-31-2017 06:06 PM

For real input the programme returns the value of the Lambert w function.

For info see

https://en.wikipedia.org/wiki/Lambert_W_function

Code:

0.    { 42-Byte Prgm }
1.    LBL “LAM w”
2.    PGMSLV "W"
3.    STO "X"
4.    LN
5.    ABS
6.    ENTER
7.    LN
8.    -
9.    STO "W"
10.    SOLVE "W"
11.    R↓
12.    RTN
13.    LBL "W"
14.    RCL "W"
15.    ENTER
16.    E^X
17.    *
18.    RCL- "X"
19.    END