Post Reply 
New Sum of Powers Log Function
03-30-2021, 04:01 PM (This post was last modified: 03-30-2021 04:41 PM by C.Ret.)
Post: #8
RE: New Sum of Powers Log Function
The french Silicium Forum have various implementations of Lambert W function for HP-Prime, SHARP PC-1211 and HP-15C

For example:
   
Code:
001- LBL A  CF 8  STO 0  1  +  LN  1  ENTER  e^x  +  LN  ÷  GTO 0
014- LBL B  CF 8  STO 0  1  e^x  ×  2  ENTER  CHS  ENTER  RCL 0  x²  LN   -  √x  ×  -  GTO 0
032- LBL C  STO 0  re↔im  STO 1  re↔im  LN  ENTER  ENTER  LN  -  x↔y  LSTx  ÷  1/x  +            
047- LBL 0
048-     CF 0  PSE  ENTER  ENTER  e^x  ENTER  R↑  ×  +  LSTx  FS? 8  GSB 1
060-     RCL-0  ENTER  ABS  RND  x>0?  SF 0
075-     R↓  x↔y  ÷  -  LSTx  ABS  RND  x=0?  CF 0
075-     R↓  FS? 0  GTO 0
078- RTN         
079- LBL 1  re↔im  RCL-1  re↔im  RTN

Set desired precision with FIX 1~9.
Enter argument x (or complex z) in first stack level X: and press:
f- A for real value of \( W_0(x) \) in main positive branch
f- B for real value of \(W_{-1}(x) \) in negative branch
f- C for complex value of \( W(z) \)
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
New Sum of Powers Log Function - Namir - 03-29-2021, 04:53 PM
RE: New Sum of Powers Log Function - C.Ret - 03-29-2021, 08:39 PM
RE: New Sum of Powers Log Function - Namir - 03-30-2021, 11:05 AM
RE: New Sum of Powers Log Function - Gene - 03-30-2021, 01:43 PM
RE: New Sum of Powers Log Function - C.Ret - 03-30-2021 04:01 PM
RE: New Sum of Powers Log Function - Namir - 03-30-2021, 05:56 PM
RE: New Sum of Powers Log Function - Namir - 03-31-2021, 01:27 PM
RE: New Sum of Powers Log Function - Namir - 03-31-2021, 02:19 PM
RE: New Sum of Powers Log Function - Namir - 04-01-2021, 06:05 PM
RE: New Sum of Powers Log Function - Namir - 04-01-2021, 11:55 PM
RE: New Sum of Powers Log Function - Namir - 04-04-2021, 03:41 PM



User(s) browsing this thread: 1 Guest(s)