HP Forums

Program use for Equation Solving solution of f(x)=0

This program can be use for three type of solvers

[A] Bisection Method use Two Guess X1 [ENTER] X2
[B] Secant Method use Two Guess X1 [ENTER] X2
[C] Newton Method Use One Guess

The accuracy result is based on you decimal setting. FIX 0 - 9

Program is credit to J T Patterson who make this possible.

More information at his page at: http://www.jepspectro.com/htmDoc/BisecnewtP.htm

--------------------------------------------

Example:

To solve for X^X = 12345

Put f(x) = 0 routine at [LBL] E
LN
LSTx
x
RCL 6 // use Storage Register 6 for 12345
LN
-
RTN

Steps to run solver: USER mode and FIX 5

12345 STO 6
4 ENTER 6 [A] display 5.51659

Answer: X = 5.51659 using guess X1_4 and X2_6
---------------------------------------------
Program:

Gamo

This solver is good to run on HP-11C, it run fast by depending on
your FIX accuracy value and user who not good at stacks manipulation.
This solver use Register 1 for the unknow X in the equation simply use
R1 for all X in your equations as shown in the example below.

Enter your equations with your X on R1
Enter educated guess and press [A]

Example: [USER] [FIX 4]

Find X with this equation: 55X^3 + 21X^2 - 11X - 1111 = 0

Enter f(x) equation to Lable [E]

[GTO] [E] g [P/R] this steps direct to f(x) routine

RCL 1
3
Y^X
55
x
RCL 1
X^2
21
x
+
RCL 1
11
x
-
1111
-
RTN

g [P/R]

Enter Guess: 4 [A] took about 20 second answer X=2.6253

Program:

Gamo 6/22/2020