(12C) Newton's Method

[Gamo]

This program is an adaptation of the HP 25 Solver program from our Member name Dwight Sturrock under the topic (12C) Numeric Solver
I make update to this program from Dieter advice as well.

I have been looking for the Solver Program for HP-12C for a long time, I didn't notice before that Dwight post this since 2013
This is a very good all around Solver for HP-12C and this one work very well.

Newton's Method Solver work extreamly fast on HP-12C+ and I'm very satisfy with this program.

The program uses registers 0, 1, 2, 3 and 4.

>Put f(x) program to line 41
>End with GTO 19

Procedure:
1. Store initial guess to R1 (STO 1)
2. Store tolerance to R2 (STO 2)

Program:

Code:


CLx
STO 0
RCL 1
GTO 41
Rv
STO 4
1
STO 0
RCL 1
RCL 1
X=0
e^x
EXX
5
/
STO 3
+
GTO 41
X=0
GTO 39
RCL 0
X=0
GTO 05
Rv
RCL 4
/
1
-
1/x
RCL 3
x
STO-1
ENTER
x
SQRT
RCL 2
X<=Y
GTO 01
RCL 1
R/S
Line 41 (Start Program)
.
.
.
GTO 19 (End)

Example:
Solve for X^X=Y (X to power of X for the given Y)

X^X=1000

Formula use to solve this equation: LN(X)*X – LN(Y) = 0

Press [g] [GTO] 40 and Switch to Program Mode: Program start at Line 41
LN
LSTx
x
RCL 5
LN
-
GTO 19 (End)

Setup equation:
1. Initial Guess for 4 > STO 1
2. Tolerance > EEX CHS 6 > STO 2
3 1000 > STO 5 (This number can be change to any number you like to solve)
4. R/S to solve. Result 4.555535705

RCL 1 is the store answer of the problem.
RCL 4 to check for accuracy. [0.000000000] is the best result with ± estimation.

Gamo