Post Reply 
HP49-50G: help for recursive
02-06-2024, 08:53 PM (This post was last modified: 02-06-2024 11:11 PM by Gil.)
Post: #15
RE: HP49-50G: help for recursive
True, and thanks, David.

But understanding new ways permits also to accept and learn from them and adopt them when we think that they are better than our initial answer/solution.

And, very often, HP Forum solutions are most inspiring for me — when simply reproduced or, better, understood.

Just as a remembrsnce, the basic idea is/was to reproduce, with a recursion on the HP50G, this following small recursive program from Albert Chan:

200 DEF FNL(X) ! = ln(1+X) - X, but more accurate
210 IF ABS(X)>=.4 THEN X=X/(SQRT(1+X)+1) @ FNL=FNL(X)*2-X*X @ GOTO 250
220 X2=X/(X+2) @ X4=X2*X2
230 X4=X4*(5005-X4*(5082-X4*969))/(15015-X4*(24255-X4*(11025-X4*1225)))
240 FNL=X2*(X4+X4-X)

F(.3) —>-3.76357355325E-2
F(2.) —> -.901387711332
F(100.) —> -95.3848794836

Regards,
Gil
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
HP49-50G: help for recursive - Gil - 02-02-2024, 12:46 PM
RE: HP49-50G: help for recursive - Gil - 02-02-2024, 01:52 PM
RE: HP49-50G: help for recursive - Gil - 02-02-2024, 06:13 PM
RE: HP49-50G: help for recursive - Gil - 02-03-2024, 10:19 AM
RE: HP49-50G: help for recursive - Gil - 02-04-2024, 12:06 PM
RE: HP49-50G: help for recursive - Gil - 02-06-2024, 11:57 AM
RE: HP49-50G: help for recursive - DavidM - 02-06-2024, 01:14 PM
RE: HP49-50G: help for recursive - Gil - 02-06-2024, 01:29 PM
RE: HP49-50G: help for recursive - DavidM - 02-06-2024, 03:51 PM
RE: HP49-50G: help for recursive - Gil - 02-06-2024, 05:48 PM
RE: HP49-50G: help for recursive - DavidM - 02-06-2024, 08:51 PM
RE: HP49-50G: help for recursive - Gil - 02-06-2024 08:53 PM



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